aşağıdaki kod işinizi görecektir sanırım;
Kod:
<%
URL = ""
For Each I In Request.QueryString
If Len(URL) >0 then
URL = URL & "&"
Else
URL = URL & "?"
End If
URL = URL & I & "="& Request.QueryString(I)
Next
URL = Request.ServerVariables("SCRIPT_NAME") & URL
Response.Write URL
%>