popup not working

The following line doesn't dismiss my Popup after one second when called
from my html. It does work however when run on the desktop in VBScript. What
I was looking for was just a brief message indicating a program was started
and running. Instead I get a Popup I must dismiss manually. What gives?

CreateObject("WScript.Shell").Popup "Running: " & MyProg , 1, "Publish
KCenter", 64

Parameter "64" gives me button OK and the information icon. Is there a way
to call a Popup without any button?

thanks
LJB

v-phuang
Wed Dec 03 02:51:26 CST 2003

Hi,

I have replied to another post in the group.

Subject: wscript.shell Popup not working?
Newsgroups: microsoft.public.scripting.vbscript

You may go to take a look, if you have any concern please post there, I
will follow up in that thread.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.

Fosco
Sun Dec 07 00:24:33 CST 2003

"ljb"
> Parameter "64" gives me button OK and the information icon.
> Is there a way to call a Popup without any button?

Set oSH = CreateObject("WScript.Shell")
Const nSecToWait = 3
Const typButtonless = &HB
sMsg = " "
oSH.Popup sMsg, nSecToWait, "", typButtonless
--
Fosco

Michael
Sun Dec 07 19:10:40 CST 2003

Fosco wrote:
> "ljb"
>> Parameter "64" gives me button OK and the information icon.
>> Is there a way to call a Popup without any button?
>
> Set oSH = CreateObject("WScript.Shell")
> Const nSecToWait = 3
> Const typButtonless = &HB
> sMsg = " "
> oSH.Popup sMsg, nSecToWait, "", typButtonless


That hack was discussed at length on the scripting NGs a few years ago.

It it doesn't work on W2K (as I recall it only ever worked on Win9x)...

Google Groups: View Thread "Popup method problem with Windows 2000"
http://groups.google.com/groups?th=d8090e8baa14dff8



--
Michael Harris
Microsoft.MVP.Scripting

Windows 2000 Scripting Guide
Microsoft® Windows®2000 Scripting Guide
http://www.microsoft.com/technet/scriptcenter/scrguide/sagsas_overview.asp

TechNet Script Center Sample Scripts
http://www.microsoft.com/downloads/release.asp?ReleaseID=38942

WSH 5.6 documentation download
http://www.microsoft.com/downloads/details.aspx?FamilyId=01592C48-207D-4BE1-8A76-1C4099D7BBB9&displaylang=en