Funzione INSTR

[Utente]

Ciao ragazzi ho un problemino con la funzione in oggetto per la ricerca di un testo in una stringa.

La stringa da cercare nel testo è la seguente:

il problema riguarda il carattere:

"

non viene letto...e quindi lo script non trova il testo cercato...anche se c'è...

Ho sostituito:

"

con

& # 34;

ma non cambia nulla...

Grazie

[Mems]

inStr(stringa,"""")

[optime]

invece di " usa CHR(34)

[Utente]

Il problema permane....ho fatto un

response.write

per entrambe le soluzioni che mi avete proposto...la stringa viene riportata in maniera corretta ma lo script non trova il testo cercato...

[Utente]

Lo script:

if instr(testoincuicercare, stringadacercare )>0 then
   response.write ("link presente")
else
   response.write ("link non presente")
end if

funziona se cerco:

stringadacercare = "http://www.sito.xx"

se invece cerco:

stringadacercare = "[img][/img] "

non va...

[optime]

mi piacerebbe vedere come hai fatto con chr(34)... comunque si fa così

stringadacercare = "<a href=" & chr(34) & "http://www.sito.xx" & chr(34) & " target=.....


una bella rottura

[Utente]

Ho fatto sia così:

stringa = "[img] & chr(34) & [/img]"

così:

stringa = "[url="&#34;[url]http://www.sito.xx"target="_blank"[/url]><img"][/url]" 

e così:

stringa = "[img][/img]"

...il risultato non cambia...

Originariamente inviato da optime
una bella rottura

...non dirlo a me...

[FxAndrea]

Anche se non è molto chiaro se a te serve uno script per cercare dentro del codice html di una pagina(in quel caso devi usare fso per aprirti il file e poi farti una bella ricerchina), non si capisce bene il tuo problema.

Dim StrSrch
Dim Txt

StrSrch = Server.HTMLEncode("hello world")
Txt = Server.HTMLEncode("hello world and so on...")

If InStr(1,Txt,StrSrch,1) > 0 Then
 Response.Write "Ricerca eseguita con successo:
"
 Response.Write Replace(Txt,StrSrch,"<u>" & StrSrch & "</u>",1,1,1)
Else
 Response.Write "La stringa cercata non &egrave; stata trovata"
End If

Questo cerca e trova tranquillamente il link dentro la variabile testo, inoltre te lo sottolinea in fase di rapporto dei risultati(1 volta sola perchè vogliamo essere leggeri )

Byeeezzz

[Utente]

Grazie FxAndrea !!!

Sai dove sbagliavo?

Txt = Server.HTMLEncode ("hello world and so on...")

come puoi vedere dai post sopra, avevo dimenticato di contenere la stringa da ricercare nell'oggetto Server HTMLEncode...

Grazie