Stringa Html Parse (Non File) in VBScript

Question

Ho una stringa html (Non ho alcun tipo di file e non voglio prima salvare la mia stringa come file html e poi caricarla) e voglio ottenere alcuni link e testi tra alcuni tag. Ho provato a cercare ma non ho trovato fortuna. Qualcuno potrebbe aiutarmi a risolvere questo problema. Grazie in anticipo.

Answer 1

Bene, non conosco abbastanza bene gli strumenti, quindi facciamolo manualmente; In primo luogo, cerchiamo di dare il via indesiderati ritorni a capo:

myChain = Replace(myChain, Chr(13), "") 
myChain = Replace(myChain, Chr(10), "") 

Ora, cerchiamo di trovare la prima occorrenza del tag:

beginLink = Instr(1, myChain, "<mytag>") + Len("<mytag>") 
endLink = Instr(1, myChain, "</mytag>") 
lenLink = endLink - beginLink 
myLink = Mid(myChain, beginLink, lenLink) 

e se avete bisogno di cercare una successiva occorrenza dello stesso tag, sostituire il 1 alla fine dei tag precedenti

newPosition = endLink + Len("<mytag>") 
beginLink = Instr(newPosition , myChain, "<mytag>") + Len("<mytag>") 
endLink = Instr(newPosition , myChain, "</mytag>") 

ecc ...

vi lascio fare un ciclo adeguato lì.