p1 = "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FormSuggest PW Ask" Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.RegWrite p1,"yes" Set WshShell = Nothing x = MsgBox("Internet Explorer will now prompt for passwords.",4096,"Finished")