Comment Re:Put me down for 2 netbooks upgraded to linux. (Score 3, Insightful) 389
Serious question..
Serious question..
Obviously you have never talked to a police officer, I'd guess that only half of them could tell their left from their right.
set oShell= Wscript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile "u:\scripts\test.vbs", "C:\temp\test.vbs"
oShell.Run "runas
WScript.Sleep 100
oShell.Sendkeys "password~"
Wscript.Quit ()
You are totally correct in saying that Office Web components won't be affected, I was just replying to the previous poster. Still anyone worth their weight as an admin wouldn't install Office Web components on anything.
"HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\BrowserFlags",00000008,"REG_DWORD"
I didn't put it in place for this vulnerability though, just because a lot of people use macros and don't know how to save as.
The hardest part of climbing the ladder of success is getting through the crowd at the bottom.