dubbla formateringar

Hej,

Jag ska skicka iväg ett värde från en databas i url-adressen. Jag vill därför först göra om den till URL-kod genom Server.URLEncode och sedan ersätta eventuella apostrofer (finns det fler tecken man bör ersätta?) med annan kod, så att inte det hela avbryts innan det hela är slut.

För att ersätta apostrofer har jag en funktion till det:

Function Signs(strText)
If isNull(strText) Then
Signs = strText
Else
strText = Replace(strText,"'","´")
Signs = strText
End If
End Function

Sen vill jag göra dessa båda saker:

Name = Server.URLEncode(RecSet("Name"))
Name = Signs(RecSet("Name"))

Men dessa kombineras inte. Om jag istället skriver:

Name2 = Server.URLEncode(RecSet("Name"))
Name = Signs("Name2")

formateras endast bokstäverna name2 och inte det URL-formaterade värdet.

Hur gör jag för att formatera det URL-formaterade värdet eller kan jag blanda in Server.URL-grejen i funktionen och på så sätt göra båda grejerna på en gång. I så fall hur?

Tack på förhand