Server Variables

Quick function for assigning server variables to simpler variable names.

<%Dim svFullUrl
Dim svHost, svPAth, svAbsPath, svLocalIP, svRemoteIP, svQuery, svReferer, svCookie
Private Sub

‘asigning server variables‘example address: />svHost = ‘mysite.com
svPath = />svAbsPath = />svLocalIP = ‘192.168.0.1
svRemoteIP = ‘192.168.0.1
svQuery = ‘userid=1
svReferer = ‘previous url(back button)
svCookie = ‘cookie associated with page
svFullUrl = svPath
If svQuery=” then
svFullUrl = svFullUrl & “?” & svQuery
End If

End Sub %>