<% Set Shell = Server.CreateObject("WScript.Shell") sexec = Shell.Exec("C:\WINDOWS\system32\mspaint.exe") %>