Platforms to show: All Mac Windows Linux Cross-Platform
FAQ.How to sleep a Mac?
dim ae as appleeventae=newappleEvent("FNDR","slep","MACS")if not ae.send then msgBox "The computer doesn't want to sleep."end if