Veja, neste código, uma forma dinâmica de criar uma lista das variaveis de ambiente e os componentes instalados no servidor web.
Abaixo está uma lista com algumas variaveis do servidor.. e descrição de cada uma delas
ALL_HTTP
Contém a lista interira de cabeçalho fora do padrão do formulário HTTP_NAME: valor.
ALL_RAW
Similar ao ALL_HTTP, exceto por aparecer apenas quando elas são recebidas sem o prefixo HTTP e outro formato.
APPL_MD_PATH
Contém o caminho lógico do arquivo.
APPL_PHYSICAL_PATH
Contém o caminho físico do arquivo.
AUTH_PASSWORD
Uma senha informada se a autenticação básica é usada.
AUTH_TYPE
Tipo de autenticação de segurança que foi usada.
Faça o download do arquivo em anexo e veja todas as variáveis de ambiente e também os componentes instalados no seu servidor.
<%@Language="VBScript"%> <% on error resume next response.buffer = True server.scripttimeout = 1000 installedCOMs = 0 onNum = 0 lastUpdate = "1/8/2002" constAutor = "© 2001, James Harris. Todos direitos reservados.
Tradução by Freecode.com.br." ' COMPONENTES ' formatação: comObject|comURL|comName|comCategoria|comCategoria2 com = "CDONTS.NewMail|https://www.microsoft.com|CDONTS (free)|1|" com = com & "|.|" & "CDO.Message|https://www.microsoft.com|CDOSYS (free)|1|" com = com & "|.|" & "SMTPsvg.Mailer|https://www.serverobjects.com|Server Objects - ASPMail|1|" com = com & "|.|" & "SMTPsvg.Mailer|https://www.serverobjects.com|Server Objects - ASPQMail|1|" com = com & "|.|" & "AspImage.Image|https://www.serverobjects.com|Server Objects - ASPImage|4|" com = com & "|.|" & "POP3svg.Mailer|https://www.serverobjects.com|Server Objects - ASPPop3|1|" com = com & "|.|" & "AspNNTP.Conn|https://www.serverobjects.com|Server Objects - AspNNTP|0|" com = com & "|.|" & "AspFile.FileObj|https://www.serverobjects.com|ServerObjects - AspFile|6|" com = com & "|.|" & "AspConv.Expert|https://www.serverobjects.com|ServerObjects - AspConv|0|" com = com & "|.|" & "AspHTTP.Conn|https://www.serverobjects.com|ServerObjects - AspHTTP|0|" com = com & "|.|" & "AspDNS.Lookup|https://www.serverobjects.com|ServerObjects - AspDNS|0|" com = com & "|.|" & "AspMX.Lookup|https://www.serverobjects.com|ServerObjects - AspMX|1|" com = com & "|.|" & "WaitFor.Comp|https://www.serverobjects.com|ServerObjects - Waitfor (free)|0|" com = com & "|.|" & "LastMod.FileObj|https://www.serverobjects.com|ServerObjects - Last Modified (free)|6|" com = com & "|.|" & "ImgSize.Check|https://www.serverobjects.com|ServerObjects - Image Size (free)|4|"