Grazie a tutti
Saluti
>Salve a tutti , che %variabile% di sistema bisogna usare per
>lanciare IExplore.exe su pc che hanno installato windows
>su volumi diversi da C:\ e che si trova di solito in
>Programmi\Internet Explorer\IExplore.exe
Vedi quale ti può essere utile tra queste variabili di ambiente.
Oppure prova il comando dos SET (magari redirigi l'output su un file con SET
>PROVA.TXT).
Giovanni.
'***************************************************
' File: Environment.vbs (WSH sample in VBScript)
' Author: (c) G. Born
'
' Displaying environment variables by using the
' WshShell object
'***************************************************
Option Explicit
Dim Message, Title
Dim WshShell, objEnv
' Get the WshShell object.
Set WshShell = CreateObject("WScript.Shell")
' Get collection by using the Environment property.
Set objEnv = WshShell.Environment("Process")
' Read environment variables.
Message = "Environment variables" & vbCrLf & vbCrLf
Message = Message & "Path: " & objEnv("PATH") & vbCrLf
Message = Message & "Extensions: " & objEnv("PATHEXT") & vbCrLf
Message = Message & "Prompt: " & objEnv("PROMPT") & vbCrLf
Message = Message & "System Drive: " & objEnv("SYSTEMDRIVE") & vbCrLf
Message = Message & "System Root: " & objEnv("SYSTEMROOT") & vbCrLf
Message = Message & "Windows Directory: " & objEnv("WINDIR") & vbCrLf
Message = Message & "TEMP: " & objEnv("TEMP") & vbCrLf
Message = Message & "TMP: " & objEnv("TMP") & vbCrLf
Message = Message & "OS: " & objEnv("OS") & vbCrLf
' Get user-defined environment variable.
Message = Message & "Blaster: " & objEnv("BLASTER") & vbCrLf
' Initialize title text.
Title = "WSH sample " & WScript.ScriptName & " - by G. Born"
MsgBox Message, vbInformation & vbOKOnly, Title
'*** End
--
Giovanni Cenati (Aosta, Italy)
Write to user "Reventlov" and domain at katamail com
http://digilander.libero.it/Cenati (Esempi e programmi in VbScript)
--