'Creates a popup with no buttons in Win98.
' Does not work in NT.  Haven't checked Win95.
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "This Window will disappear " & _
  "after 10 seconds.", 10, "IMPORTANT NOTICE!", 11 + 48

--

Bill James
Microsoft MVPDTS

?Free Win9x VBScript Utilities?
http://www.*-*-*.com/ ~wgjames/vbspage/

Popup MessagesI would like to have a message popup and stay on the screen for 30 seconds then go away.. I can do this with object.popup but there are always a button on the popup.. Can I get rid of the buttons??

No, you could make a webpage appear using IE, (without status bar etc.) About a week ago MH posted a cool IE script that does what you want, check the VBScript and WSH newsgroups till you find it.

Dominic Marks

set IE = CreateObject("InternetExplorer.Application")
ie.menubar = 0
ie.toolbar = 0
ie.statusbar = 0
ie.resizable = 0
IE.navigate "about:blank"
while ie.readystate <> 4 : wend
set doc = ie.document
doc.write "This is an important message!"
doc.title = "An Important Message"
doc.parentwindow.resizeto 400,100
IE.visible = true
c = 0
seconds = 5
while typename(doc) <> "Object" _
  and c < seconds
  wscript.sleep 1000
  c = c + 1
wend
on error resume next
ie.quit
msgbox "done"

--
Michael Harris
MVP - Windows Script

No, you could make a webpage appear using IE, (without status bar etc.) About a week ago MH posted a cool IE script that does what you want, check the VBScript and WSH newsgroups till you find it.

Dominic Marks

Add a value of 11 to the "natType" argument.  Demo:

'Creates a popup with no buttons in Win98.
' Does not work in NT.  Haven't checked Win95.
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "This Window will disappear " & _
  "after 10 seconds.", 10, "IMPORTANT NOTICE!", 11 + 48

--

Bill James
Microsoft MVPDTS