<% Function GetThisPath()
aPath = Request.ServerVariables("Path_Info")
pathArr = Split(aPath, "/")
If pathArr(2) = "indexold.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
If pathArr(2) = "aboutus.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
If pathArr(2) = "services.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
If pathArr(2) = "industries.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
If pathArr(2) = "casestudies.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
If pathArr(2) = "contact.asp" Then
Response.write(" ")
Else
Response.write(" ")
End If
End Function
GetThisPath() %> |
