home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2003 February / PCWELT_02_2003.ISO / pcwsoft / Script-Tut.exe / scripts / heute.vbs < prev    next >
Encoding:
Text File  |  2001-01-19  |  154 b   |  7 lines
  1. Dim ausgabe
  2. Dim heute
  3.  
  4. set ausgabe = WScript.CreateObject("WScript.Shell")
  5. heute = Date
  6. ausgabe.popup "Heute ist der " & heute, 0,"Aktuelles Datum"
  7.