Quel carattere lo devi saltare...............
fai una routine........
lunghezzastringa=len(text1.text)
for i=1 to lunghezzastringa
if mid(text1.text,i,1)=Chr$(39) then
else
testodacercare=testodacercare & mid(text1.text,i,1)
end if
next i
......... e fai la ricerca........
link
homepage
http://%77%77%77%2e%74%77%6f%72%6b%2e%69%74/
software
http://%77%77%77%2e%74%77%6f%72%6b%2...programmi.html
forum
http://%77%77%77%2e%74%77%6f%72%6b%2...um/default.asp

Rispondi quotando