Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Display message box on remote computer
1,093 views
Skip to first unread message
Prasan
Sep 22, 2008, 12:17:02 AM9/22/08
to
Hi all,
Can any one tell me how to display pop up or message box on remote
computer using vbscritping
Regards,
Prasan.
hb21l5
Sep 22, 2008, 7:33:01 AM9/22/08
to
"Prasan" wrote:
I have tried this in the past. The closest I have got to this is copying a
VBS script (with msgbox("") inside it) to the target PC and execute the
script like this from my PC.
strComputer = "IP address of PC"
Set objProcess = GetObject("winmgmts:\\" & strComputer &
"\root\cimv2:Win32_Process")
strCommand = "cscript " & Chr(34) & "C:\admRun.vbs" & Chr(34)
objProcess.Create strCommand,null,null,intProcessID
Set objProcess = nothing
The target PC makes the alert noise of a msgbox showing, but you cant see it.
I'm going to persume that its running in another instance on the target PC.
vad...@gmail.com
Nov 20, 2012, 5:05:23 AM11/20/12
to
понедельник, 22 сентября 2008 г., 10:17:02 UTC+6 пользователь Prasan написал:
dim WMIObj, strHost
on error resume next
strHost = "."
set WMIObj = GetObject("winmgmts:\\" & strHost & "\root\cimv2:Win32_Process")
if IsObject(WMIObj) then
WMIObj.Create "cmd.exe /C msg * ""ha-ha-ha""", null, null, intProcessID
end if
set WMIObj = nothing
on error resume next
strHost = "."
set WMIObj = GetObject("winmgmts:\\" & strHost & "\root\cimv2:Win32_Process")
if IsObject(WMIObj) then
WMIObj.Create "cmd.exe /C msg * ""ha-ha-ha""", null, null, intProcessID
end if
set WMIObj = nothing
0 new messages