vuoi dire che se facessi:
codice:
url=Request.ServerVariables("HTTP_REFERER")
function trovaStringaRegExp (valoreStringa, str_cerca)
set re = Server.CreateObject("VBScript.RegExp")
re.Pattern = str_cerca & "=([^&]*)&?"
'response.Write(re.Pattern)
re.Global=true
set risultati = re.Execute(valoreStringa)
if risultati.count>0 then
set risultato = risultati(0)
'Response.Write risultato.SubMatches(0) & "
" & Server.URLEncode(risultato.SubMatches(0))
trovaStringaRegExp = risultato.SubMatches(0)
else
trovaStringaRegExp = 0
end if
end function
response.Write( trovaStringaRegExp ( url, "q") )
otterrei ciò?