Your Ad Here

advanced code snippet search

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.

Expand | Embed | Plain Text 
  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.