url i string

et her virker upåklageligt:

Function ofunc()
   
    Dim olsen As String
   
    olsen = \"klik.asp?kategori=intern&user=kasper&link=http://www.etellerandet.dk/vis.asp?mode=2&session=wert\"
   
    Debug.Print olsen
   
End Function

Bemærk lige, at det kun er eksperten, der laver det blåt og laver det om til en link.

jeg kender ikke en urlencode i vb - men du kan da \"simulere den\" vha. en løkke

link = \"http://www.etellerandet.dk/vis.asp?mode=2&session=wert\"

strFind = \":|/|.|&|?|=\"
strReplace = \"%3A|%2F|%2E|%26|%3F|%3D\"

arrFind = Split(strFind,\"|\")
arrReplace = Split(strReplace,\"|\")

for i = 0 to ubound(arrFind)
    link = replace(link,arrFind(i),arrReplace(i))
next i

debug.print link



sådan :)

/nuno