hitmill.com
hitmill.com logo

 

 

ECHO of ASP-Derived Information:
An Active Server Pages Tutorial


 
This is a Test page to determine functions used in ASP.
Code is © Tom L. Price, 2000-2009.

Your request was: <% Response.write Request.ServerVariables("QUERY_STRING") %>

Your IP Address is:   <% Response.write Request.ServerVariables("REMOTE_ADDR") %>

Your Domain appears to be:   <% ' stuff from the guys at CentralInfo.net '--------------------------------------- on error resume next set Ping1=server.createobject("catalyst.pingctrl.1") Ping1.AutoResolve=True Ping1.Blocking=True Ping1.UseSocket = False Ping1.HostName = trim(Request.ServerVariables("REMOTE_ADDR")) Ping1.TimeOut = 3000 Response.write Ping1.HostName set Ping1 = nothing %>

Local address came thru on: <% Response.write "http://"& Request.ServerVariables("SERVER_NAME") & " -- " & Request.ServerVariables("LOCAL_ADDR") %>

Server software is: <% Response.write Request.ServerVariables("SERVER_SOFTWARE") %>

 


 
<% Set bc = Server.CreateObject("MSWC.BrowserType") %>
Browser <%= bc.browser %>
Version <%= bc.version %>
 
Frames <% if (bc.frames = TRUE) then %> TRUE <% else %> FALSE <% end if %>
Tables <% if (bc.tables = TRUE) then %> TRUE <% else %> FALSE <% end if %>
BackgroundSounds <% if (bc.BackgroundSounds = TRUE) then %> TRUE <% else %> FALSE <% end if %>
VBScript <% if (bc.vbscript = TRUE) then %> TRUE <% else %> FALSE <% end if %>
JScript <% if (bc.javascript = TRUE) then %> TRUE <% else %> FALSE <% end if %>

 
Contact Webmaster
 
Updated
http://www.hitmill.com/dhtml/css/lesson1example.html
© hitmill.com
All Rights Reserved
Rev.8/08cg