VBScript question
Thread Starter
Scooby Regular
Joined: Nov 1999
Posts: 10,504
Likes: 1
From: Scotland, UK
VBScript question
Right, I have a very simple script file which installs some printers for a workstation. Now I want to run this for every user, but not through a login script.
I tried using AT and PSEXEC to push the script out to the clients, but the don't like (or simply won't) execute VBScript.
Can a script file be compiled into an .exe binary or do I need to re-write it in VB (or whatever else)?
Stefan
I tried using AT and PSEXEC to push the script out to the clients, but the don't like (or simply won't) execute VBScript.
Can a script file be compiled into an .exe binary or do I need to re-write it in VB (or whatever else)?
Code:
'VB script to add printers
Set WshNetwork = CreateObject("WScript.Network")
Dim MyVar
PrinterPath = "\\svr-liv-dc1\HP4050N"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc1\HP4050NA"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc1\HP4050NB"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc1\HP1220C"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc1\EPC900"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc2\HP4050N"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc2\HP4050NA"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc2\HP4050NB"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc2\HP1220C"
WshNetwork.AddWindowsPrinterConnection PrinterPath
PrinterPath = "\\svr-liv-dc2\EPC900"
WshNetwork.AddWindowsPrinterConnection PrinterPath
Scooby Regular
Joined: Nov 2001
Posts: 15,239
Likes: 1
From: Leeds - It was 562.4bhp@28psi on Optimax, How much closer to 600 with race fuel and a bigger turbo?
How do you want it to run.. if your using something like at then did you use /interactive..
What OS are on the remote machines? what rights do you have on them.. I have a script that will remotely execute things??
What OS are on the remote machines? what rights do you have on them.. I have a script that will remotely execute things??
Scooby Regular
Joined: Nov 2001
Posts: 15,239
Likes: 1
From: Leeds - It was 562.4bhp@28psi on Optimax, How much closer to 600 with race fuel and a bigger turbo?
Code:
strComputer = "webserver"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_Process")
Error = objWMIService.Create("notepad.exe", null, null, intProcessID)
If Error = 0 Then
Wscript.Echo "Notepad was started with a process ID of " _
& intProcessID & "."
Else
Wscript.Echo "Notepad could not be started due to error " & _
Error & "."
End If
Thread Starter
Scooby Regular
Joined: Nov 1999
Posts: 10,504
Likes: 1
From: Scotland, UK
Jods,
No, I've never heard of those otherwise I would have
David,
Machines are all XP and I have full admin rights to our domain and PC's. If I save my code as .vbs it runs perfectly. Rather than asking the users to run it I want it to launch on their workstations (as the current logged in user). Basically as if I walked up to the desktops and just asked the user to run the VBScript.
Stefan
No, I've never heard of those otherwise I would have
David,
Machines are all XP and I have full admin rights to our domain and PC's. If I save my code as .vbs it runs perfectly. Rather than asking the users to run it I want it to launch on their workstations (as the current logged in user). Basically as if I walked up to the desktops and just asked the user to run the VBScript.
Stefan
Thread Starter
Scooby Regular
Joined: Nov 1999
Posts: 10,504
Likes: 1
From: Scotland, UK
Even tried using Dameware, but all the remote commands want to use my username and profile. I need to use the currently logged on users profile/environment to launch the utility.
Oh, well looks like I'll need to get them to run the file themselves.
Stefan
Oh, well looks like I'll need to get them to run the file themselves.
Stefan
Trending Topics
Scooby Regular
Joined: Nov 2001
Posts: 15,239
Likes: 1
From: Leeds - It was 562.4bhp@28psi on Optimax, How much closer to 600 with race fuel and a bigger turbo?
Bored? Work in IT?
I'm bored...
Save the following as something like lock.vbs
ammend the computernamehere to the target pc's hostname....
then type cscript lock.vbs
and there pc locks.. funny as **** watching their faces..
David
Save the following as something like lock.vbs
ammend the computernamehere to the target pc's hostname....
then type cscript lock.vbs
and there pc locks.. funny as **** watching their faces..
David
Code:
strComputer = "ComputerNameHere"
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_Process")
Error = objWMIService.Create("rundll32.exe user32.dll,LockWorkStation", null, null, intProcessID)
If Error = 0 Then
Wscript.Echo "Sucesss"
Else
Wscript.Echo "Failed"
End If
Scooby Regular
Joined: Jul 2003
Posts: 141
Likes: 0
The task scheduler should be able to launch VBS. Did you explicitly prefix the command with the CSCRIPT.EXE interpreter? Not sure how this will work with the currently logged on user. I agree /interactive will get it to run on the desktop, but still not sure who's HKCU reg hive gets updated.
You say you don't want to run it as part of the logon script - any reason?
You say you don't want to run it as part of the logon script - any reason?
Thread
Thread Starter
Forum
Replies
Last Post