Matt
The message box just sits there infinitely, it does not continue...
Select Case WSH.Popup("Open an Excel file?!", cTime, "Question", vbYesNo) should this be vbok?
Case vbOK
MsgBox "You clicked OK"
Case vbCancel
MsgBox "You clicked Cancel"
Case -1
MsgBox "Timed out"
Case Else
End Select
Mark