Classic ASP Discussion - Identify your ASP Components

Print Page | Close Window

Identify your ASP Components

Printed From: Web Wiz Forums
Category: General Discussion
Forum Name: Classic ASP Discussion
Forum Description: Discussion on Active Server Pages (Classic ASP).
URL: https://forums.webwiz.net/forum_posts.asp?TID=11198
Printed Date: 28 March 2026 at 10:56am
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com

Topic: Identify your ASP Components

Posted By: dpyers
Subject: Identify your ASP Components
Date Posted: 15 July 2004 at 12:02pm

Lot of new to asp people around lately so thought I'd post this...

This site has a couple of scripts you can upload to your site to list the ASP components you have available, or just the mail components.
http://www.pensaworks.com/prg_com.asp - http://www.pensaworks.com/prg_com.asp

This is a script that called variables.asp that will list all of your Server. Application and Session variables. Useful for debugging some things.

<%
'
' List Server, Application and Session Variables
'
On Error Resume Next
dim strName 
response.write "SERVER Variables Count = " & Request.ServerVariables.Count & "<br /><br />"
For Each strName In Request.ServerVariables 
 If strname ="ALL_HTTP" OR strname ="ALL_RAW" then
  response.write "Server Variable " & strName &" = <br />" & Request.ServerVariables(strName) & "<br /><br />"
 Else
  response.write "Server Variable " & strName &" =  " & Request.ServerVariables(strName) & "<br />"
 End If
Next
response.write "<br /><br /><hr />"

response.write "APPLICATION Variables Count = " & Application.Contents.Count & "<br /><br />"
For Each strName in Application.Contents
 response.write "Application Variable " & strName &" =  " & Application(strName) & "<br />"
Next
response.write "<br /><br /><hr />"

response.write "SESSION Variables Count = " & Session.Contents.Count & "<br /><br />"
For Each strName in Session.Contents
 response.write "Session Variable " & strName &" =  " & Session(strName) & "<br />"
Next
response.write "<br /><br /><hr />"

response.write "MISCELLANEOUS<br /><br />"
dim objAdoVer
Set objAdoVer = Server.CreateObject("adodb.connection")
response.write "ADOVersion = " & objAdoVer.Version
Set objAdoVer = Nothing
%>

-------------

Lead me not into temptation... I know the short cut, follow me.