Usar variable windor en vbs
Publicado por clavi (5 intervenciones) el 27/06/2008 17:35:16
Necesito poder usar la variable de sistema %windir% en un script ya que se ejecutara en diferentes sistemas operativos... pero no se como hacerlo...
Os dejo el codigo por si alguien me puede echar una mano.....
Gracias de antemano
Rem Crea un objeto Shell para mostrar el mensaje de bienvenida hecho en Visual Basic
Set objShell = CreateObject("Wscript.Shell")
Rem Ejecutar el saludo localmente
Dim strEjecutable, strOrigen, strDestino
strEjecutable = "saludo.exe"
strOrigen = "\qui pongo la ruta" & strEjecutable
strDestino = "C:windowssystem32" & strEjecutable
Set objFSO = CreateObject("Scripting.FileSystemObject")
If Not objFSO.FileExists(strEjecutable) Then
objFSO.CopyFile strOrigen , strDestino
End If
objShell.Run strDestino
Set objFSO=Nothing
Os dejo el codigo por si alguien me puede echar una mano.....
Gracias de antemano
Rem Crea un objeto Shell para mostrar el mensaje de bienvenida hecho en Visual Basic
Set objShell = CreateObject("Wscript.Shell")
Rem Ejecutar el saludo localmente
Dim strEjecutable, strOrigen, strDestino
strEjecutable = "saludo.exe"
strOrigen = "\qui pongo la ruta" & strEjecutable
strDestino = "C:windowssystem32" & strEjecutable
Set objFSO = CreateObject("Scripting.FileSystemObject")
If Not objFSO.FileExists(strEjecutable) Then
objFSO.CopyFile strOrigen , strDestino
End If
objShell.Run strDestino
Set objFSO=Nothing
Valora esta pregunta


0