Nessun risultato. Prova con un altro termine.
Guide
Notizie
Software
Tutorial

Qual è il sistema operativo?

Tra le variabili server messe a disposizione da ASP ne esiste una in grado di restituire informazioni sul software del server.

Parliamo della variabile:

Request.ServerVariables("SERVER_SOFTWARE")



che se stampata da una pagina ASP su un pc con sistema operativo Windows XP restituisce ad esempio una stringa del tipo Microsoft-IIS/5.1 .

Realizziamo una funzione per individuare i possibili sistemi operativi:


<%

public function getServerOS()

Dim lvServer
Dim lvServerVar

' Attribuisce alla variabile il valore della Variabile Server
lvServerVar = Request.ServerVariables("SERVER_SOFTWARE")

' Controlla il valore di IIS
' univoco per ogni sistema operativo
if Instr(lvServerVar, "IIS/4") > 0 then
lvServer = "Microsoft Windows NT"
elseif Instr(lvServerVar, "IIS/5.0") > 0 then
lvServer = "Microsoft Windows 2000"
elseif Instr(lvServerVar, "IIS/5.1") > 0 then
lvServer = "Microsoft Windows XP"
elseif Instr(lvServerVar, "IIS/6") > 0 then
lvServer = "Microsoft Windows 2003"
end if

' Valore di ritorno della funzione
getServerOS = lvServer

end function

' Stampa a video il valore
Response.Write(getServerOS())

%>

Tra le variabili server messe a disposizione da ASP ne esiste una in grado di restituire informazioni sul software del server.

Parliamo della variabile:

Request.ServerVariables("SERVER_SOFTWARE")



che se stampata da una pagina ASP su un pc con sistema operativo Windows XP restituisce ad esempio una stringa del tipo Microsoft-IIS/5.1 .

Realizziamo una funzione per individuare i possibili sistemi operativi:


<%

public function getServerOS()

Dim lvServer
Dim lvServerVar

' Attribuisce alla variabile il valore della Variabile Server
lvServerVar = Request.ServerVariables("SERVER_SOFTWARE")

' Controlla il valore di IIS
' univoco per ogni sistema operativo
if Instr(lvServerVar, "IIS/4") > 0 then
lvServer = "Microsoft Windows NT"
elseif Instr(lvServerVar, "IIS/5.0") > 0 then
lvServer = "Microsoft Windows 2000"
elseif Instr(lvServerVar, "IIS/5.1") > 0 then
lvServer = "Microsoft Windows XP"
elseif Instr(lvServerVar, "IIS/6") > 0 then
lvServer = "Microsoft Windows 2003"
end if

' Valore di ritorno della funzione
getServerOS = lvServer

end function

' Stampa a video il valore
Response.Write(getServerOS())

%>

Link copiato negli appunti

Tra le variabili server messe a disposizione da ASP ne esiste una in grado di restituire informazioni sul software del server.

Parliamo della variabile:

Request.ServerVariables("SERVER_SOFTWARE")

che se stampata da una pagina ASP su un pc con sistema operativo Windows XP restituisce ad esempio una stringa del tipo Microsoft-IIS/5.1 .

Realizziamo una funzione per individuare i possibili sistemi operativi:


<%

public function getServerOS()

Dim lvServer

Dim lvServerVar

' Attribuisce alla variabile il valore della Variabile Server

lvServerVar = Request.ServerVariables("SERVER_SOFTWARE")

' Controlla il valore di IIS

' univoco per ogni sistema operativo

if Instr(lvServerVar, "IIS/4") > 0 then

lvServer = "Microsoft Windows NT"

elseif Instr(lvServerVar, "IIS/5.0") > 0 then

lvServer = "Microsoft Windows 2000"

elseif Instr(lvServerVar, "IIS/5.1") > 0 then

lvServer = "Microsoft Windows XP"

elseif Instr(lvServerVar, "IIS/6") > 0 then

lvServer = "Microsoft Windows 2003"

end if

' Valore di ritorno della funzione

getServerOS = lvServer

end function

' Stampa a video il valore

Response.Write(getServerOS())

%>