Posted By

sikwan on 10/15/10


Tagged

url


Versions (?)

Who likes this?

1 person have marked this snippet as a favorite

ddtfish


Current Url With Parameters


 / Published in: ASP
 

This function return the current Url, including the Get parameters.

  1. Function CurrentURLWithParams()
  2.  
  3. Dim Temp
  4. Temp = "http://" & Request.ServerVariables("SERVER_NAME")
  5. Temp = Temp & Request.ServerVariables("SCRIPT_NAME")
  6.  
  7. If Request.ServerVariables("QUERY_STRING") <> "" Then
  8. Temp = Temp & "?" & Request.ServerVariables("QUERY_STRING")
  9. End If
  10.  
  11. CurrentURLWithParams = Temp
  12.  
  13. End Function

Report this snippet  

You need to login to post a comment.