Using Server Variables in ASP.NET

Category:

C#, VB.NET, ASP.NET

Type:

Snippets

Difficulty:

Beginning

Author:

Intelligent Solutions Inc.

Version Compatibility: ASP.NET

More information:

These are five functions that demonstrate how to access the ServerVariables collection in ASP.NET. The first outputs all the ServerVariables (key and value) to the browser; running this function will give you an idea of what's available to use. The 2nd allows you to request a Server Variable value by key name, the 3rd-5th demonstrate using user-defined function in case you are only interested in a few of these variables and want to hard code their names.

Instructions: Copy the declarations and code below and paste directly into your VB project.

Declarations:
' (None)

Code:

<SCRIPT LANGUAGE="vb" runat="server">
Public Sub AllServerVariables()
		Dim intCtr as integer
		Dim coll As System.Collections.Specialized.NameValueCollection
		coll = System.Web.HttpContext.Current.Request.ServerVariables
		For intCtr = 0 To coll.keys.count - 1
			Response.Write(coll.keys(intCtr) & ": ")
			Response.Write(coll.item(intCtr))
			response.write(" ")
		Next 
End Sub

'Request one by name
Public Function GetServerVariable(VariableName as string) as string
	return Request.ServerVariables(VariableName)
End Function
'You may prefer to just focus on a few of interest
'by hard coding their names in a function such as below
Public Function ApplicationPath as string
	return Request.ServerVariables("APPL_PHYSICAL_PATH")
End Function
Public Function LoggedOnUser as string
	return Request.ServerVariables("LOGON_USER")
End Function
Public Function CurrentPage() as string
	return Request.ServerVariables("SCRIPT_NAME")
End Function

</script>
<%
'demo
response.write("All Variables: ")
AllServerVariables()
response.write("")
response.write("requesting full path to page by name of variable ")
response.write(GetServerVariable("PATH_TRANSLATED"))
response.write("")
response.write("Requesting Current Page via user-defined function: ")
response.write(CurrentPage) 
%>