Rcp Posted January 26, 2002 Share Posted January 26, 2002 http://www.liquid2k.com/exsen5/currentdtop.JPG i'd like some feedback if u don't mind :) Download Here. right click save as.. after download.. rename .gif back to .zip and unzip using winzip. Link to comment Share on other sites More sharing options...
Faction Posted January 26, 2002 Share Posted January 26, 2002 Its pretty good, id like it better with no text though ;D Link to comment Share on other sites More sharing options...
napes22 Posted January 27, 2002 Share Posted January 27, 2002 how do you put a link to shutting down on the desktop?? Link to comment Share on other sites More sharing options...
Rcp Posted January 27, 2002 Author Share Posted January 27, 2002 ianswer = msgbox("Shut Down Windows?", _ vbYesNo, "Shut Down") if ianswer = vbYes then Const EWX_LOGOFF = 0 Const EWX_SHUTDOWN = 1 Const EWX_REBOOT = 2 Const EWX_FORCE = 4 Const EWX_POWEROFF = 8 Set wmi = GetObject("winmgmts:{(Shutdown)}") set objset = wmi.instancesof("win32_operatingsystem") for each obj in objset set os = obj : exit For next '=== ' uncomment whichever you want to use... '=== 'os.shutdown 'os.reboot ' this one will do a *power off*: os.win32shutdown EWX_POWEROFF end if copy and save it into shutdown.vbs and double click it u wanna shutdown Link to comment Share on other sites More sharing options...
Recommended Posts