1112 lines
76 KiB
Plaintext
1112 lines
76 KiB
Plaintext
|
OPTION EXPLICIT
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----Windows Script Host script to generate components needed to run HTA
|
||
|
'-----under Windows PE.
|
||
|
'-----Copyright 2001, Microsoft Corporation
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----DIM, DEFINE VARIABLES, SET SOME GLOBAL OBJECTS
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
DIM strCmdArg, strCmdSwitch, arg, strCmdArray, CDDriveCollection, CDDrive, CDSource, FSO, Folder, HDDColl
|
||
|
DIM HDD, FirstHDD, strAppend, WSHShell, strDesktop, strOptDest, strDestFolder
|
||
|
DIM FILE, strCMDExpand, strCMDMid, strJobTitle, strNeedCD, iAmPlatform, iArchDir
|
||
|
DIM iAmQuiet,iHaveSource, iHaveDest, iWillBrowse, WshSysEnv, strOSVer, strWantToView, strFolderName, intOneMore
|
||
|
DIM strCMDado, strCMDmsadc, strCMDOle_db, strIDir, strSysDir
|
||
|
Const ForAppending = 8
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----OFFER/TAKE CMDLINE PARAMETERS
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
If WScript.Arguments.Count <> 0 Then
|
||
|
For each arg in WScript.Arguments
|
||
|
strCmdArg = (arg)
|
||
|
strCmdArray = Split(strCmdArg, ":", 2, 1)
|
||
|
IF lcase(strCmdArray(0)) = "/s" or lcase(strCmdArray(0)) = "-s" THEN
|
||
|
iHaveSource = 1
|
||
|
CDSource = TRIM(strCmdArray(1))
|
||
|
END IF
|
||
|
IF lcase(strCmdArray(0)) = "/d" or lcase(strCmdArray(0)) = "-d" THEN
|
||
|
iHaveDest = 1
|
||
|
strOptDest = TRIM(strCmdArray(1))
|
||
|
END IF
|
||
|
IF lcase(strCmdArray(0)) = "/?" OR lcase(strCmdArray(0)) = "-?" THEN
|
||
|
MsgBox "The following command-line arguments are accepted by this script:"&vbCRLF&vbCRLF&_
|
||
|
"""/s:filepath"" - alternate source location other than the CD-ROM drive."&vbCRLF&vbCRLF&"Examples:"&vbCRLF&_
|
||
|
"/S:C:\"&vbCRLF&_
|
||
|
"-s:Z:\"&vbCRLF&_
|
||
|
"or"&vbCRLF&_
|
||
|
"-S:\\Myserver\Myshare"&vbCRLF&vbCRLF&_
|
||
|
"The script will still attempt to verify the presence of Windows XP files."&vbCrLF&vbCrLF&_
|
||
|
"/D - Destination. Opposite of CD - specifies build destination. Otherwise placed on desktop."&vbCRLF&vbCRLF&_
|
||
|
"/64 - build for Itanium. Generates scripts for Windows on the Itanium Processor Family."&vbCRLF&vbCRLF&_
|
||
|
"/Q - run without any dialog. This will not confirm success, will notify on failure."&vbCRLF&vbCRLF&_
|
||
|
"/E - explore completed files. Navigate to the created files when completed.", vbInformation, "Command-line arguments"
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
IF lcase(strCmdArray(0)) = "/64" OR lcase(strCmdArray(0)) = "-64" THEN
|
||
|
iAmPlatform = "Itanium"
|
||
|
END IF
|
||
|
IF lcase(strCmdArray(0)) = "/q" OR lcase(strCmdArray(0)) = "-q" THEN
|
||
|
iAmQuiet = 1
|
||
|
END IF
|
||
|
IF lcase(strCmdArray(0)) = "/e" OR lcase(strCmdArray(0)) = "-e" THEN
|
||
|
iWillBrowse = 1
|
||
|
END IF
|
||
|
Next
|
||
|
ELSE
|
||
|
iHaveSource = 0
|
||
|
END IF
|
||
|
IF strOptDest = "" THEN
|
||
|
iHaveDest = 0
|
||
|
ELSEIF INSTR(UCASE(strOptDest), "I386\") <> 0 OR INSTR(UCASE(strOptDest), "IA64\") <> 0 OR INSTR(UCASE(strOptDest), "SYSTEM32") <> 0 THEN
|
||
|
MsgBox "The destination path needs to be the root of your newly created WinPE install - remove any extraneous path information, such as ""I386"" or ""System32""", vbCritical, "Destination Path Incorrect"
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
IF iAmQuiet <> 1 THEN
|
||
|
iAmQuiet = 0
|
||
|
END IF
|
||
|
IF iAmPlatform <> "Itanium" THEN
|
||
|
iAmPlatform = "x86"
|
||
|
END IF
|
||
|
|
||
|
IF Right(strOptDest, 1) = "\" THEN
|
||
|
strOptDest = Left(strOptDest, LEN(strOptDest)-1)
|
||
|
END IF
|
||
|
IF Right(CDSource, 1) = "\" THEN
|
||
|
CDSource = Left(CDSource, LEN(CDSource)-1)
|
||
|
END IF
|
||
|
IF iAmPlatform = "Itanium" THEN
|
||
|
iArchDir = "ia64"
|
||
|
ELSEIF iAmPlatform = "x86" THEN
|
||
|
iArchDir = "i386"
|
||
|
END IF
|
||
|
|
||
|
|
||
|
strJobTitle = "HTA Component Generation"
|
||
|
|
||
|
SET WshShell = WScript.CreateObject("WScript.Shell")
|
||
|
SET WshSysEnv = WshShell.Environment("SYSTEM")
|
||
|
SET FSO = CreateObject("Scripting.FileSystemObject")
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----ERROR OUT IF NOT RUNNING ON Windows 2000 OR HIGHER
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
strOSVer = WshSysEnv("OS")
|
||
|
|
||
|
IF strOSVer <> "Windows_NT" THEN
|
||
|
MsgBox "This script must be run on Windows 2000 or Windows XP", vbCritical, "Incorrect Windows Version"
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----GENERATE COLLECTION OF CD-ROM DRIVES VIA WMI. PICK FIRST AVAILABLE
|
||
|
'-----ERROR OUT IF NO DRIVES FOUND
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
IF iHaveSource = 0 THEN
|
||
|
SET CDDriveCollection = GetObject("winmgmts:").ExecQuery("SELECT * FROM Win32_CDROMDrive")
|
||
|
IF CDDriveCollection.Count <= 0 THEN
|
||
|
MsgBox "No CD-ROM drives found. Exiting Script.", vbCritical, "No CD-ROM drive found"
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
FOR EACH CDDrive IN CDDriveCollection
|
||
|
CDSource = CDDrive.Drive(0)
|
||
|
EXIT FOR
|
||
|
NEXT
|
||
|
END IF
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----PROMPT FOR WINDOWS CD - QUIT IF CANCELLED
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
IF iAmQuiet = 0 THEN
|
||
|
strNeedCD = MsgBox("This script will place a folder on your desktop containing all necessary files needed to "&_
|
||
|
"install HTA (HTML Applications) support under Windows PE."&vbCrLF&vbCrLF&"Please ensure that your "&_
|
||
|
"Windows XP Professional CD or Windows XP Professional binaries are available now on: "&vbCrLF&CDSource&vbCrLF&vbCrLF&"This script is only designed to be used with Windows PE/Windows XP RC1 "&_
|
||
|
"or newer.", 65, strJobTitle)
|
||
|
END IF
|
||
|
|
||
|
IF strNeedCD = 2 THEN
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----TEST VIA WMI TO INSURE MEDIA IS PRESENT AND READABLE
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
IF iHaveSource = 0 THEN
|
||
|
TestForMedia()
|
||
|
END IF
|
||
|
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----TESTS FOR EXISTANCE OF SEVERAL KEY FILES, AND A FILE COUNT IN I386 or IA64 TO INSURE
|
||
|
'-----WINDOWS XP PRO MEDIA
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
Validate(iArchDir)
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----FIND THE USER'S DESKTOP. PUT NEW FOLDER THERE. APPEND TIMESTAMP IF THE FOLDER
|
||
|
'-----ALREADY EXISTS.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
strDesktop = WshShell.SpecialFolders("Desktop")
|
||
|
strFolderName = "HTA Build Files ("&iArchDir&")"
|
||
|
IF iHaveDest = 0 THEN
|
||
|
strDestFolder = strDesktop&"\"&strFolderName
|
||
|
IF FSO.FolderExists(strDestFolder) THEN
|
||
|
GetUnique()
|
||
|
strDestFolder = strDestFolder&strAppend
|
||
|
strFolderName = strFolderName&strAppend
|
||
|
END IF
|
||
|
FSO.CreateFolder(strDestFolder)
|
||
|
ELSE
|
||
|
strDestFolder = strOptDest
|
||
|
IF NOT FSO.FolderExists(strDestFolder) THEN
|
||
|
FSO.CreateFolder(strDestFolder)
|
||
|
END IF
|
||
|
END IF
|
||
|
IF iHaveDest = 1 THEN
|
||
|
strIDir = strDestFolder&"\"&iArchDir
|
||
|
strSysDir = strDestFolder&"\"&iArchDir&"\System32"
|
||
|
strDestFolder = strSysDir
|
||
|
END IF
|
||
|
IF FSO.FileExists(strDestFolder&"\autoexec.cmd") THEN
|
||
|
SET FILE = FSO.OpenTextFile(strDestFolder&"\autoexec.cmd", ForAppending, true)
|
||
|
FILE.WriteLine("call HTA.bat")
|
||
|
FILE.Close()
|
||
|
END IF
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----SET COMMON VARIABLES SO THE STRINGS AREN'T SO LARGE
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
strCMDExpand = "EXPAND """&CDSource&"\"&iArchDir&"\"
|
||
|
strCMDMid = """ """&strDestFolder&"\"
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----SHELL OUT THE EXPANSION OF core HTA Files. (EXE, TLB, DLL, OCX)
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
WshShell.Run strCMDExpand&"mshta.ex_"&strCMDMid&"mshta.exe""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"msdatsrc.tl_"&strCMDMid&"msdatsrc.tlb""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"mshtml.tl_"&strCMDMid&"mshtml.tlb""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"asctrls.oc_"&strCMDMid&"asctrls.ocx""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"plugin.oc_"&strCMDMid&"plugin.ocx""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"actxprxy.dl_"&strCMDMid&"actxprxy.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"advpack.dl_"&strCMDMid&"advpack.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"corpol.dl_"&strCMDMid&"corpol.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"cryptdlg.dl_"&strCMDMid&"cryptdlg.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"ddrawex.dl_"&strCMDMid&"ddrawex.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"dispex.dl_"&strCMDMid&"dispex.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"dxtmsft.dl_"&strCMDMid&"dxtmsft.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"dxtrans.dl_"&strCMDMid&"dxtrans.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"hlink.dl_"&strCMDMid&"hlink.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"iedkcs32.dl_"&strCMDMid&"iedkcs32.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"iepeers.dl_"&strCMDMid&"iepeers.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"iesetup.dl_"&strCMDMid&"iesetup.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"inseng.dl_"&strCMDMid&"inseng.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"itircl.dl_"&strCMDMid&"itircl.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"itss.dl_"&strCMDMid&"itss.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"licmgr10.dl_"&strCMDMid&"licmgr10.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"mlang.dl_"&strCMDMid&"mlang.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"mshtml.dl_"&strCMDMid&"mshtml.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"mshtmled.dl_"&strCMDMid&"mshtmled.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"msrating.dl_"&strCMDMid&"msrating.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"mstime.dl_"&strCMDMid&"mstime.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"pngfilt.dl_"&strCMDMid&"pngfilt.dll""", 0, FALSE
|
||
|
WshShell.Run strCMDExpand&"sendmail.dl_"&strCMDMid&"sendmail.dll""", 0, FALSE
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----CREATE the INF to associate HTAS.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SET FILE = fso.CreateTextFile(strDestFolder&"\HTA.inf", True)
|
||
|
FILE.WriteLine (";;; HTA simple file association Information File")
|
||
|
FILE.WriteLine (";;; Copyright (c) 2001 Microsoft Corporation")
|
||
|
FILE.WriteLine (";;; 06/12/01 09:31:03 (X86 2490)")
|
||
|
FILE.WriteLine (";;;")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("[Version]")
|
||
|
FILE.WriteLine ("Signature = ""$Chicago$""")
|
||
|
FILE.WriteLine ("AdvancedINF=2.0")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("[DefaultInstall]")
|
||
|
FILE.WriteLine ("AddReg = AddReg.Extensions")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("[AddReg.Extensions]")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("; .HTA")
|
||
|
FILE.WriteLine ("HKCR, "".HTA"","""",,""HTAFile""")
|
||
|
FILE.WriteLine ("HKCR, ""HTAFile"","""",,""%DESC_DOTHTA%""")
|
||
|
FILE.WriteLine ("HKCR, ""HTAFile"",""IsShortcut"",,""Yes""")
|
||
|
FILE.WriteLine ("HKCR, ""HTAFile\DefaultIcon"","""",FLG_ADDREG_TYPE_EXPAND_SZ,""%11%\MSHTA.exe,1""")
|
||
|
FILE.WriteLine ("HKCR, ""HTAFile\Shell\Open"","""",,""%MENU_OPEN%""")
|
||
|
FILE.WriteLine ("HKCR, ""HTAFile\Shell\Open\Command"",,FLG_ADDREG_TYPE_EXPAND_SZ,""%11%\MSHTA.exe """"%1"""" %*""")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("[Strings]")
|
||
|
FILE.WriteLine ("; Localizable strings")
|
||
|
FILE.WriteLine ("DESC_DOTHTA = ""Microsoft Windows HTML Application""")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("MENU_OPEN = ""&Open""")
|
||
|
FILE.WriteLine ("MENU_CONOPEN = ""Open &with Command Prompt""")
|
||
|
FILE.WriteLine ("MENU_DOSOPEN = ""Open &with MS-DOS Prompt""")
|
||
|
FILE.WriteLine ("MENU_EDIT = ""&Edit""")
|
||
|
FILE.WriteLine ("MENU_PRINT = ""&Print""")
|
||
|
FILE.Close
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----CREATE the INF to install MSHTML.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SET FILE = fso.CreateTextFile(strDestFolder&"\mshtml.inf", True)
|
||
|
FILE.WriteLine("[Version]")
|
||
|
FILE.WriteLine("Signature=""$CHICAGO$""")
|
||
|
FILE.WriteLine("[Reg]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.DllReg")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=Classes.Reg, Protocols.Reg, InetPrint.Reg, Misc.Reg")
|
||
|
FILE.WriteLine("DelReg=BaseDel.Reg, !RemoveInsertable")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[!RemoveInsertable]")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\Insertable""")
|
||
|
FILE.WriteLine("[RegCompatTable]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.DllReg")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=CompatTable.Reg")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegUrlCompatTable]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.DllReg")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=UrlCompatTable.Reg")
|
||
|
FILE.WriteLine("DelReg=UrlCompatTableDel.Reg")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegJPEG]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=JPEG.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegJPG]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=JPG.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegJPE]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=JPE.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegPNG]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=PNG.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegPJPG]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=PJPG.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegXBM]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=XBM.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[RegGIF]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=GIF.Inst")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[Unreg]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.DllReg")
|
||
|
FILE.WriteLine("AdvOptions=260")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[Install]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("ComponentVersion=6.0")
|
||
|
FILE.WriteLine("AdvOptions=36")
|
||
|
FILE.WriteLine("AddReg=FileAssoc.Inst, MIME.Inst, Misc.Inst")
|
||
|
FILE.WriteLine("DelReg=BaseDel.Inst,IE3TypeLib,mshtmlwbTypeLib")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[Uninstall]")
|
||
|
FILE.WriteLine("ComponentName=mshtml.Install")
|
||
|
FILE.WriteLine("AdvOptions=260")
|
||
|
FILE.WriteLine("NoBackupPlatform=NT5.1")
|
||
|
FILE.WriteLine("[Classes.Reg]")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImgCtx%,,,""IImgCtx""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImgCtx%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImgCtx%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImgCtx%\ProgID,,,""IImgCtx""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CBackgroundPropertyPage%,,,""Microsoft HTML Background Page""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CBackgroundPropertyPage%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CBackgroundPropertyPage%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDAnchorPropertyPage%,,,""Microsoft HTML Anchor Page""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDAnchorPropertyPage%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDAnchorPropertyPage%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDGenericPropertyPage%,,,""Microsoft HTML Generic Page""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDGenericPropertyPage%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CCDGenericPropertyPage%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CDwnBindInfo%,,,""Microsoft HTML DwnBindInfo""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CDwnBindInfo%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CDwnBindInfo%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CInlineStylePropertyPage%,,,""Microsoft HTML Inline Style Page""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CInlineStylePropertyPage%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_CInlineStylePropertyPage%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLWindowProxy%,,,""Microsoft HTML Window Security Proxy""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLWindowProxy%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLWindowProxy%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_JSProtocol%,,,""Microsoft HTML Javascript Pluggable Protocol""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_JSProtocol%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_JSProtocol%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ResProtocol%,,,""Microsoft HTML Resource Pluggable Protocol""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ResProtocol%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ResProtocol%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_AboutProtocol%,,,""Microsoft HTML About Pluggable Protocol""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_AboutProtocol%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_AboutProtocol%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_MailtoProtocol%,,,""Microsoft HTML Mailto Pluggable Protocol""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_MailtoProtocol%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_MailtoProtocol%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_SysimageProtocol%,,,""Microsoft HTML Resource Pluggable Protocol""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_SysimageProtocol%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_SysimageProtocol%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%"",,,""HTML Document""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\DefaultIcon"",,%REG_EXPAND_SZ%,""%IEXPLORE%,1""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\MiscStatus"",,,""2228625""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\ProgID"",,,""htmlfile""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\Version"",,,""6.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\EnablePlugin\.css"",,%REG_EXPAND_SZ%,""PointPlus plugin""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%"",,,""Microsoft HTA Document 6.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%\MiscStatus"",,,""2228625""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTADocument%\Version"",,,""6.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%"",,,""MHTML Document""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\DefaultIcon"",,%REG_EXPAND_SZ%,""%IEXPLORE%,1""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\MiscStatus"",,,""2228625""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\ProgID"",,,""mhtmlfile""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_MHTMLDocument%\Version"",,,""6.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%"",,,""Microsoft HTML Document 6.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%\MiscStatus"",,,""0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPluginDocument%\ProgID"",,,""htmlfile_FullWindowEmbed""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLServerDoc%,,,""Microsoft HTML Server Document 6.0""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLServerDoc%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLServerDoc%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLLoadOptions%,,,""Microsoft HTML Load Options""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLLoadOptions%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_HTMLLoadOptions%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IntDitherer%,,,""IntDitherer Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IntDitherer%\InProcServer32,,131072,%_SYS_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IntDitherer%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%"",,,""Microsoft CrSource 4.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\DefaultIcon"",,%REG_EXPAND_SZ%,""%IEXPLORE%,1""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\EnablePlugin\.css"",,%REG_EXPAND_SZ%,""PointPlus plugin""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\MiscStatus"",,,""2228625""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\ProgID"",,,""CrSource""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CrSource%\Version"",,,""4.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%"",,,""Microsoft Scriptlet Component""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\Control""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\MiscStatus"",,,""0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\MiscStatus\1"",,,""131473""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\ProgID"",,,""ScriptBridge.ScriptBridge.1""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\Programmable""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\ToolboxBitmap32"",,,""%IEXPLORE%,1""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\TypeLib"",,,""{3050f1c5-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\Version"",,,""4.0""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_Scriptlet%\VersionIndependentProgID"",,,""ScriptBridge.ScriptBridge""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CPeerHandler%"",,,""Microsoft Scriptlet Element Behavior Handler""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CPeerHandler%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CPeerHandler%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CPeerHandler%\ProgID"",,,""Scriptlet.Behavior""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHiFiUses%"",,,""Microsoft Scriptlet HiFiTimer Uses""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHiFiUses%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHiFiUses%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHiFiUses%\ProgID"",,,""Scriptlet.HiFiTimer""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CRecalcEngine%"",,,""Microsoft HTML Recalc""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CRecalcEngine%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CRecalcEngine%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CSvrOMUses%"",,,""Microsoft Scriptlet svr om Uses""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CSvrOMUses%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CSvrOMUses%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CSvrOMUses%\ProgID"",,,""Scriptlet.SvrOm""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHtmlComponentConstructor%"",,,""Microsoft Html Component""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHtmlComponentConstructor%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CHtmlComponentConstructor%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopup%"",,,""Microsoft Html Popup Window""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopup%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopup%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopupDoc%"",,,""Microsoft Html Document for Popup Window""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopupDoc%\InProcServer32"",,,""%_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLPopupDoc%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CAnchorBrowsePropertyPage%"",,,""%Microsoft Anchor Element Browse Property Page%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CAnchorBrowsePropertyPage%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CAnchorBrowsePropertyPage%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CImageBrowsePropertyPage%"",,,""%Microsoft Image Element Browse Property Page%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CImageBrowsePropertyPage%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CImageBrowsePropertyPage%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CDocBrowsePropertyPage%"",,,""%Microsoft Document Browse Property Page%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CDocBrowsePropertyPage%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_CDocBrowsePropertyPage%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ExternalFrameworkSite%,,,""Microsoft HTML External Document""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ExternalFrameworkSite%\InProcServer32,,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_ExternalFrameworkSite%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_TridentAPI%"",,,""%Trident API%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_TridentAPI%\InProcServer32"",,%REG_EXPAND_SZ%,""%_SYS_MOD_PATH%""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_TridentAPI%\InProcServer32"",""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("[Protocols.Reg]")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\javascript"",""CLSID"",,""%CLSID_JSProtocol%""")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\vbscript"",""CLSID"",,""%CLSID_JSProtocol%""")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\about"",""CLSID"",,""%CLSID_AboutProtocol%""")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\res"",""CLSID"",,""%CLSID_ResProtocol%""")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\mailto"",""CLSID"",,""%CLSID_MailtoProtocol%""")
|
||
|
FILE.WriteLine("HKCR,""PROTOCOLS\Handler\sysimage"",""CLSID"",,""%CLSID_SysImageProtocol%""")
|
||
|
FILE.WriteLine("[CompatTable.Reg]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility"", ""Version"",,""5.16""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_VivoViewer%"", ""Compatibility Flags"",%REG_COMPAT%,0x8")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MSInvestorNews%"", ""Compatibility Flags"",%REG_COMPAT%,0x180")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ActiveMovie%"", ""Compatibility Flags"",%REG_COMPAT%,0x10000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_Plugin%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_AppletOCX%"", ""Compatibility Flags"",%REG_COMPAT%,0x10000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_SaxCanvas%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MediaPlayer%"", ""Compatibility Flags"",%REG_COMPAT%,0x110000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_CitrixWinframe%"", ""Compatibility Flags"",%REG_COMPAT%,0x1000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_GregConsDieRoll%"", ""Compatibility Flags"",%REG_COMPAT%,0x2020")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_VActive%"", ""Compatibility Flags"",%REG_COMPAT%,0x8")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IEMenu%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_WebBrowser%"", ""Compatibility Flags"",%REG_COMPAT% ,0x21")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_Forms3Optionbutton%"", ""Compatibility Flags"",%REG_COMPAT%,0x1")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_SurroundVideo%"", ""Compatibility Flags"",%REG_COMPAT%,0x40")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_SheridanCommand%"", ""Compatibility Flags"",%REG_COMPAT%,0x2000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MCSITree%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MSTreeView%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_Acrobat%"", ""Compatibility Flags"",%REG_COMPAT%,0x8008")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MSInvestor%"", ""Compatibility Flags"",%REG_COMPAT%,0x10")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_PowerPointAnimator%"", ""Compatibility Flags"",%REG_COMPAT%,0x240")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_PowerPointAnimator%"", ""MiscStatus Flags"",%REG_COMPAT%,0x180")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_NCompassBillboard%"", ""Compatibility Flags"",%REG_COMPAT%,0x4000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_NCompassLightboard%"", ""Compatibility Flags"",%REG_COMPAT%,0x4000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ProtoviewTreeView%"", ""Compatibility Flags"",%REG_COMPAT%,0x4000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ActiveEarthTime%"", ""Compatibility Flags"",%REG_COMPAT%,0x4000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_LeadControl%"", ""Compatibility Flags"",%REG_COMPAT%,0x4000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_TextX%"", ""Compatibility Flags"",%REG_COMPAT%,0x2000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IISForm%"", ""Compatibility Flags"",%REG_COMPAT%,0x2")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_GreetingsUpload%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_GreetingsDownload%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_COMCTLTree%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_COMCTLProg%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_COMCTLListview%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_COMCTLImageList%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_COMCTLSbar%"", ""Compatibility Flags"",%REG_COMPAT%,0x820")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MCSIMenu%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MSNVer%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_RichTextCtrl%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IETimer%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_SubScr%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_Scriptlet%"", ""Compatibility Flags"",%REG_COMPAT%,0x20")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_OldXsl%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MMC%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IE4ShellFolderIcon%"", ""Compatibility Flags"",%REG_COMPAT%,0x20000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IE4ShellPieChart%"", ""Compatibility Flags"",%REG_COMPAT%,0x20000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_RealAudio%"", ""Compatibility Flags"",%REG_COMPAT%,0x10000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_WebCalc%"", ""Compatibility Flags"",%REG_COMPAT%,0x40000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_AnswerList%"", ""Compatibility Flags"",%REG_COMPAT%,0x80000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_PreLoader%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_EyeDog%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ImgAdmin%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ImgThumb%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_HHOpen%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_RegWiz%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_SetupCtl%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ImgEdit%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ImgEdit2%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_ImgScan%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_IELabel%"", ""Compatibility Flags"",%REG_COMPAT%,0x40000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_HomePubRender%"", ""Compatibility Flags"",%REG_COMPAT%,0x00100000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MGIPhotoSuiteBtn%"", ""Compatibility Flags"",%REG_COMPAT%,0x00200000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MGIPhotoSuiteSlider%"", ""Compatibility Flags"",%REG_COMPAT%,0x00200000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MGIPrintShopSlider%"", ""Compatibility Flags"",%REG_COMPAT%,0x00200000")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_RunLocExe%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_Launchit2%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\ActiveX Compatibility\%CLSID_MS_MSHTA%"", ""Compatibility Flags"",%REG_COMPAT%,0x400")
|
||
|
FILE.WriteLine("[UrlCompatTable.Reg]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility"", ""Version"",,""5.1""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\~/CWIZINTR.HTM"",""Compatibility Flags"",%REG_COMPAT%,0x4")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\~/CONNWIZ.HTM"",""Compatibility Flags"",%REG_COMPAT%,0x4")
|
||
|
FILE.WriteLine("[UrlCompatTableDel.Reg]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/START.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/TOOLBAR.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/WEL2.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/WELCOME.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/ENG/DEMOBIN/CONTBAR.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/ENG/DEMOBIN/START.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/ENG/DEMOBIN/TOOLBAR.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/ENG/DEMOBIN/WELCOME.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/WEBPAGES/CACHED/CARPOINT/DEFAULT.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/WEL2.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN31/ENG/DEMOBIN/WELCOME.HTM""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\URL Compatibility\_:/WIN95/ENG/DEMOBIN/WELCOME.HTM""")
|
||
|
FILE.WriteLine("[InetPrint.Reg]")
|
||
|
FILE.WriteLine("HKCR,""InternetShortcut\shell\print\command"",,%REG_EXPAND_SZ%,""rundll32.exe %_SYS_MOD_PATH%,PrintHTML """"%%1""""""")
|
||
|
FILE.WriteLine("HKCR,""InternetShortcut\shell\printto\command"",,%REG_EXPAND_SZ%,""rundll32.exe %_SYS_MOD_PATH%,PrintHTML """"%%1"""" """"%%2"""" """"%%3"""" """"%%4""""""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\shell\print\command"",,%REG_EXPAND_SZ%,""rundll32.exe %_SYS_MOD_PATH%,PrintHTML """"%%1""""""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\shell\printto\command"",,%REG_EXPAND_SZ%,""rundll32.exe %_SYS_MOD_PATH%,PrintHTML """"%%1"""" """"%%2"""" """"%%3"""" """"%%4""""""")
|
||
|
FILE.WriteLine("[Misc.Reg]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\Version Vector"", ""IE"",,""6.0000""")
|
||
|
FILE.WriteLine("HKCR,IImgCtx,,,""IImgCtx""")
|
||
|
FILE.WriteLine("HKCR,IImgCtx\CLSID,,,%CLSID_IImgCtx%")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.Behavior,,,""Element Behavior Handler""")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.Behavior\CLSID,,,%CLSID_CPeerHandler%")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.HiFiTimer,,,""HiFiTimer Uses""")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.HiFiTimer\CLSID,,,%CLSID_CHiFiUses%")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.SvrOm,,,""Server OM Uses""")
|
||
|
FILE.WriteLine("HKCR,Scriptlet.SvrOm\CLSID,,,%CLSID_CSvrOMUses%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%,,,""CoGIFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,,,%_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\ProgID,,,""GIFFilter.CoGIFFilter.1""")
|
||
|
FILE.WriteLine("HKCR,GIFFilter.CoGIFFilter,,,""CoGIFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,GIFFilter.CoGIFFilter\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,GIFFilter.CoGIFFilter.1,,,""CoGIFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,GIFFilter.CoGIFFilter.1\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%,,,""CoJPEGFilter Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,,,%_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\ProgID,,,""JPEGFilter.CoJPEGFilter.1""")
|
||
|
FILE.WriteLine("HKCR,JPEGFilter.CoJPEGFilter,,,""CoJPEGFilter Class""")
|
||
|
FILE.WriteLine("HKCR,JPEGFilter.CoJPEGFilter\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,JPEGFilter.CoJPEGFilter.1,,,""CoJPEGFilter Class""")
|
||
|
FILE.WriteLine("HKCR,JPEGFilter.CoJPEGFilter.1\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%,,,""CoBMPFilter Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,,,%_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\ProgID,,,""BMPFilter.CoBMPFilter.1""")
|
||
|
FILE.WriteLine("HKCR,BMPFilter.CoBMPFilter,,,""CoBMPFilter Class""")
|
||
|
FILE.WriteLine("HKCR,BMPFilter.CoBMPFilter\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,BMPFilter.CoBMPFilter.1,,,""CoBMPFilter Class""")
|
||
|
FILE.WriteLine("HKCR,BMPFilter.CoBMPFilter.1\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%,,,""CoWMFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,,,%_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\ProgID,,,""WMFFilter.CoWMFFilter.1""")
|
||
|
FILE.WriteLine("HKCR,WMFFilter.CoWMFFilter,,,""CoWMFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,WMFFilter.CoWMFFilter\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,WMFFilter.CoWMFFilter.1,,,""CoWMFFilter Class""")
|
||
|
FILE.WriteLine("HKCR,WMFFilter.CoWMFFilter.1\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%,,,""CoICOFilter Class""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,,,%_MOD_PATH%")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\InProcServer32,""ThreadingModel"",,""Apartment""")
|
||
|
FILE.WriteLine("HKCR,CLSID\%CLSID_IImageDecodeFilter%\ProgID,,,""ICOFilter.CoICOFilter.1""")
|
||
|
FILE.WriteLine("HKCR,ICOFilter.CoICOFilter,,,""CoICOFilter Class""")
|
||
|
FILE.WriteLine("HKCR,ICOFilter.CoICOFilter\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,ICOFilter.CoICOFilter.1,,,""CoICOFilter Class""")
|
||
|
FILE.WriteLine("HKCR,ICOFilter.CoICOFilter.1\CLSID,,,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("[FileAssoc.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".bmp"",""Content Type"",,""image/bmp""")
|
||
|
FILE.WriteLine("HKCR,"".css"",""Content Type"",,""text/css""")
|
||
|
FILE.WriteLine("HKCR,"".htc"",""Content Type"",,""text/x-component""")
|
||
|
FILE.WriteLine("HKCR,"".dib"",""Content Type"",,""image/bmp""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile"",,,""HTML Document""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""ScriptBridge.ScriptBridge"",,,""Microsoft Scriptlet Component""")
|
||
|
FILE.WriteLine("HKCR,""ScriptBridge.ScriptBridge\CurVer"",,,""ScriptBridge.ScriptBridge.1""")
|
||
|
FILE.WriteLine("HKCR,""ScriptBridge.ScriptBridge.1"",,,""Microsoft Scriptlet Component""")
|
||
|
FILE.WriteLine("HKCR,""ScriptBridge.ScriptBridge.1\CLSID"",,,""%CLSID_Scriptlet%""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile_FullWindowEmbed"",,,""HTML Plugin Document""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile_FullWindowEmbed\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile_FullWindowEmbed\CLSID"",,,""%CLSID_HTMLPluginDocument%""")
|
||
|
FILE.WriteLine("HKCR,"".mhtml"",,,""mhtmlfile""")
|
||
|
FILE.WriteLine("HKCR,"".mhtml"",""Content Type"",,""message/rfc822""")
|
||
|
FILE.WriteLine("HKCR,"".mht"",,,""mhtmlfile""")
|
||
|
FILE.WriteLine("HKCR,"".mht"",""Content Type"",,""message/rfc822""")
|
||
|
FILE.WriteLine("HKCR,""mhtmlfile"",,,""MHTML Document""")
|
||
|
FILE.WriteLine("HKCR,""mhtmlfile\BrowseInPlace"",,,""""")
|
||
|
FILE.WriteLine("HKCR,""mhtmlfile\CLSID"",,,""%CLSID_MHTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,"".txt"",""Content Type"",,""text/plain""")
|
||
|
FILE.WriteLine("HKCR,"".ico"",""Content Type"",,""image/x-icon""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\DefaultIcon"",,%REG_EXPAND_SZ%,""%IEXPLORE%,1""")
|
||
|
FILE.WriteLine("[GIF.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".gif"",,,""giffile""")
|
||
|
FILE.WriteLine("HKCR,"".gif"",""Content Type"",,""image/gif""")
|
||
|
FILE.WriteLine("HKCR,""giffile"",,,""%GIF_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""giffile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""giffile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""giffile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""giffile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""giffile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""giffile\DefaultIcon"",,,""%IEXPLORE%,9""")
|
||
|
FILE.WriteLine("[PJPG.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".jfif"",,,""pjpegfile""")
|
||
|
FILE.WriteLine("HKCR,"".jfif"",""Content Type"",,""image/pjpeg""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile"",,,""%JPEG_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""pjpegfile\DefaultIcon"",,,""%IEXPLORE%,8""")
|
||
|
FILE.WriteLine("[XBM.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".xbm"",""Content Type"",,""image/x-xbitmap""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile"",,,""%XBM_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""xbmfile\DefaultIcon"",,,""%IEXPLORE%,9""")
|
||
|
FILE.WriteLine("[JPEG.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".jpeg"",,,""jpegfile""")
|
||
|
FILE.WriteLine("HKCR,"".jpeg"",""Content Type"",,""image/jpeg""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile"",,,""%JPEG_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\DefaultIcon"",,,""%IEXPLORE%,8""")
|
||
|
FILE.WriteLine("[JPE.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".jpe"",,,""jpegfile""")
|
||
|
FILE.WriteLine("HKCR,"".jpe"",""Content Type"",,""image/jpeg""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile"",,,""%JPEG_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\DefaultIcon"",,,""%IEXPLORE%,8""")
|
||
|
FILE.WriteLine("[JPG.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".jpg"",,,""jpegfile""")
|
||
|
FILE.WriteLine("HKCR,"".jpg"",""Content Type"",,""image/jpeg""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile"",,,""%JPEG_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""jpegfile\DefaultIcon"",,,""%IEXPLORE%,8""")
|
||
|
FILE.WriteLine("[PNG.Inst]")
|
||
|
FILE.WriteLine("HKCR,"".png"",,,""pngfile""")
|
||
|
FILE.WriteLine("HKCR,"".png"",""Content Type"",,""image/png""")
|
||
|
FILE.WriteLine("HKCR,""pngfile"",,,""%PNG_IMAGE%""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\CLSID"",,,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\shell\open\command"",,,""""""%IEXPLORE%"""" -nohome""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\shell\open\ddeexec"",,,""""""file:%%1"""",,-1,,,,,""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\shell\open\ddeexec\Application"",,,""IExplore""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\shell\open\ddeexec\Topic"",,,""WWW_OpenURL""")
|
||
|
FILE.WriteLine("HKCR,""pngfile\DefaultIcon"",,,""%IEXPLORE%,9""")
|
||
|
FILE.WriteLine("[MIME.Inst]")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/bmp"",""Extension"",,"".bmp""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/bmp"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/bmp\Bits"",""0"",1,02,00,00,00,FF,FF,42,4D")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/gif"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/gif"",""Extension"",,"".gif""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/gif"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/gif\Bits"",""0"",1,04,00,00,00,FF,FF,FF,FF,47,49,46,38")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/jpeg"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/jpeg"",""Extension"",,"".jpg""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/jpeg\Bits"",""0"",1,02,00,00,00,FF,FF,FF,D8")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/jpeg"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/pjpeg"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/pjpeg"",""Extension"",,"".jpg""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/pjpeg\Bits"",""0"",1,02,00,00,00,FF,FF,FF,D8")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/pjpeg"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/xbm"",""Extension"",,"".xbm""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-jg"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-xbitmap"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-xbitmap"",""Extension"",,"".xbm""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-wmf"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-wmf\Bits"",""0"",1,04,00,00,00,FF,FF,FF,FF,D7,CD,C6,9A")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\message/rfc822"",""CLSID"",,""%CLSID_MHTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/png"",""Extension"",,"".png""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-png"",""Extension"",,"".png""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/css"",""Extension"",,"".css""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/html"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/html"",""Extension"",,"".htm""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/html"",""Encoding"",1,08,00,00,00")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/plain"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/plain"",""Extension"",,"".txt""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/plain"",""Encoding"",1,07,00,00,00")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/x-component"",""CLSID"",,""%CLSID_CHtmlComponentConstructor%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/x-component"",""Extension"",,"".htc""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\text/x-scriptlet"",""CLSID"",,""%CLSID_Scriptlet%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-icon"",""CLSID"",,""%CLSID_HTMLDocument%""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-icon"",""Extension"",,"".ico""")
|
||
|
FILE.WriteLine("HKCR,""MIME\Database\Content Type\image/x-icon"",""Image Filter CLSID"",,%CLSID_IImageDecodeFilter%")
|
||
|
FILE.WriteLine("[Misc.Inst]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\AboutURLs"",""blank"",2,""res://mshtml.dll/blank.htm""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\AboutURLs"",""PostNotCached"",2,""res://mshtml.dll/repost.htm""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\AboutURLs"",""mozilla"",2,""res://mshtml.dll/about.moz""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\Default Behaviors"",""VML"",, ""CLSID:10072CEC-8CC1-11D1-986E-00A0C955B42E""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\Default Behaviors"",""TIME"",, ""CLSID:476C391C-3E0D-11D2-B948-00C04FA32195""")
|
||
|
FILE.WriteLine("[BaseDel.Reg]")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\DocObject""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\Protocol""")
|
||
|
FILE.WriteLine("HKCR,""htmlfile\Insertable""")
|
||
|
FILE.WriteLine("HKLM,""Software\Classes\htmlfile\DocObject""")
|
||
|
FILE.WriteLine("HKLM,""Software\Classes\htmlfile\Protocol""")
|
||
|
FILE.WriteLine("HKLM,""Software\Classes\htmlfile\Insertable""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\DocObject""")
|
||
|
FILE.WriteLine("HKCR,""CLSID\%CLSID_HTMLDocument%\Insertable""")
|
||
|
FILE.WriteLine("[BaseDel.Inst]")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\PageSetup"",""header_left"",2,""&w""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\PageSetup"",""header_right"",2,""Page &p of &P""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\PageSetup"",""footer_left"",2,""&u%""")
|
||
|
FILE.WriteLine("HKLM,""Software\Microsoft\Internet Explorer\PageSetup"",""footer_right"",2,""&d""")
|
||
|
FILE.WriteLine("[IE3TypeLib]")
|
||
|
FILE.WriteLine("HKCR, ""TypeLib\{3E76DB61-6F74-11CF-8F20-00805F2CD064}""")
|
||
|
FILE.WriteLine("[mshtmlwbTypeLib]")
|
||
|
FILE.WriteLine("HKCR, ""TypeLib\{AE24FDA0-03C6-11D1-8B76-0080C744F389}""")
|
||
|
FILE.WriteLine("[Strings]")
|
||
|
FILE.WriteLine("CLSID_CBackgroundPropertyPage = ""{3050F232-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_CCDAnchorPropertyPage = ""{3050F1FC-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_CCDGenericPropertyPage = ""{3050F17F-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_CDwnBindInfo = ""{3050F3C2-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_CInlineStylePropertyPage = ""{3050F296-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_HTMLDocument = ""{25336920-03F9-11cf-8FD0-00AA00686F13}""")
|
||
|
FILE.WriteLine("CLSID_Scriptlet = ""{AE24FDAE-03C6-11D1-8B76-0080C744F389}""")
|
||
|
FILE.WriteLine("CLSID_HTADocument = ""{3050F5C8-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_MHTMLDocument = ""{3050F3D9-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_HTMLPluginDocument = ""{25336921-03F9-11CF-8FD0-00AA00686F13}""")
|
||
|
FILE.WriteLine("CLSID_HTMLWindowProxy = ""{3050F391-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_IImgCtx = ""{3050F3D6-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_JSProtocol = ""{3050F3B2-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_ResProtocol = ""{3050F3BC-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_AboutProtocol = ""{3050F406-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_MailtoProtocol = ""{3050f3DA-98B5-11CF-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("CLSID_SysimageProtocol = ""{76E67A63-06E9-11D2-A840-006008059382}""")
|
||
|
FILE.WriteLine("CLSID_HTMLLoadOptions = ""{18845040-0fa5-11d1-ba19-00c04fd912d0}""")
|
||
|
FILE.WriteLine("CLSID_CRecalcEngine = ""{3050f499-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_HTMLServerDoc = ""{3050f4e7-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CrSource = ""{65014010-9F62-11d1-A651-00600811D5CE}""")
|
||
|
FILE.WriteLine("CLSID_TridentAPI = ""{429AF92C-A51F-11d2-861E-00C04FA35C89}""")
|
||
|
FILE.WriteLine("CLSID_CCSSFilterHandler = ""{5AAF51B1-B1F0-11d1-B6AB-00A0C90833E9}""")
|
||
|
FILE.WriteLine("CLSID_CPeerHandler = ""{5AAF51B2-B1F0-11d1-B6AB-00A0C90833E9}""")
|
||
|
FILE.WriteLine("CLSID_CHiFiUses = ""{5AAF51B3-B1F0-11d1-B6AB-00A0C90833E9}""")
|
||
|
FILE.WriteLine("CLSID_CSvrOMUses = ""{3050f4f0-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CPersistShortcut = ""{3050f4c6-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CPersistHistory = ""{3050f4c8-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CPersistSnapshot = ""{3050f4c9-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_VivoViewer = ""{02466323-75ed-11cf-a267-0020af2546ea}""")
|
||
|
FILE.WriteLine("CLSID_MSInvestorNews = ""{025B1052-CB0B-11CF-A071-00A0C9A06E05}""")
|
||
|
FILE.WriteLine("CLSID_ActiveMovie = ""{05589fa1-c356-11ce-bf01-00aa0055595a}""")
|
||
|
FILE.WriteLine("CLSID_Plugin = ""{06DD38D3-D187-11CF-A80D-00C04FD74AD8}""")
|
||
|
FILE.WriteLine("CLSID_AppletOCX = ""{08B0e5c0-4FCB-11CF-AAA5-00401C608501}""")
|
||
|
FILE.WriteLine("CLSID_SaxCanvas = ""{1DF67C43-AEAA-11CF-BA92-444553540000}""")
|
||
|
FILE.WriteLine("CLSID_MediaPlayer = ""{22D6F312-B0F6-11D0-94AB-0080C74C7E95}""")
|
||
|
FILE.WriteLine("CLSID_CitrixWinframe = ""{238f6f83-b8b4-11cf-8771-00a024541ee3}""")
|
||
|
FILE.WriteLine("CLSID_GregConsDieRoll = ""{46646B43-EA16-11CF-870C-00201801DDD6}""")
|
||
|
FILE.WriteLine("CLSID_VActive = ""{5A20858B-000D-11D0-8C01-444553540000}""")
|
||
|
FILE.WriteLine("CLSID_IEMenu = ""{7823A620-9DD9-11CF-A662-00AA00C066D2}""")
|
||
|
FILE.WriteLine("CLSID_WebBrowser = ""{8856F961-340A-11D0-A96B-00C04FD705A2}""")
|
||
|
FILE.WriteLine("CLSID_Forms3Optionbutton = ""{8BD21D50-EC42-11CE-9E0D-00AA006002F3}""")
|
||
|
FILE.WriteLine("CLSID_SurroundVideo = ""{928626A3-6B98-11CF-90B4-00AA00A4011F}""")
|
||
|
FILE.WriteLine("CLSID_SheridanCommand = ""{AAD093B2-F9CA-11CF-9C85-0000C09300C4}""")
|
||
|
FILE.WriteLine("CLSID_MCSITree = ""{B3F8F451-788A-11D0-89D9-00A0C90C9B67}""")
|
||
|
FILE.WriteLine("CLSID_MSTreeView = ""{B9D029D3-CDE3-11CF-855E-00A0C908FAF9}""")
|
||
|
FILE.WriteLine("CLSID_Acrobat = ""{CA8A9780-280D-11CF-A24D-444553540000}""")
|
||
|
FILE.WriteLine("CLSID_MSInvestor = ""{D2F97240-C9F4-11CF-BFC4-00A0C90C2BDB}""")
|
||
|
FILE.WriteLine("CLSID_PowerPointAnimator = ""{EFBD14F0-6BFB-11CF-9177-00805F8813FF}""")
|
||
|
FILE.WriteLine("CLSID_IISForm = ""{812AE312-8B8E-11CF-93C8-00AA00C08FDF}""")
|
||
|
FILE.WriteLine("CLSID_IntDitherer = ""{05f6fe1a-ecef-11d0-aae7-00c04fc9b304}""")
|
||
|
FILE.WriteLine("CLSID_NCompassBillboard = ""{6059B947-EC52-11CF-B509-00A024488F73}""")
|
||
|
FILE.WriteLine("CLSID_NCompassLightboard = ""{B2F87B84-26A6-11D0-B50A-00A024488F73}""")
|
||
|
FILE.WriteLine("CLSID_ProtoviewTreeView = ""{B283E214-2CB3-11D0-ADA6-00400520799C}""")
|
||
|
FILE.WriteLine("CLSID_ActiveEarthTime = ""{9590092D-8811-11CF-8075-444553540000}""")
|
||
|
FILE.WriteLine("CLSID_LeadControl = ""{00080000-B1BA-11CE-ABC6-F5B2E79D9E3F}""")
|
||
|
FILE.WriteLine("CLSID_TextX = ""{5B84FC03-E639-11CF-B8A0-00A024186BF1}""")
|
||
|
FILE.WriteLine("CLSID_GreetingsUpload = ""{03405265-b4e2-11d0-8a77-00aa00a4fbc5}""")
|
||
|
FILE.WriteLine("CLSID_GreetingsDownload = ""{03405269-b4e2-11d0-8a77-00aa00a4fbc5}""")
|
||
|
FILE.WriteLine("CLSID_COMCTLTree = ""{0713E8A2-850A-101B-AFC0-4210102A8DA7}""")
|
||
|
FILE.WriteLine("CLSID_COMCTLProg = ""{0713E8D2-850A-101B-AFC0-4210102A8DA7}""")
|
||
|
FILE.WriteLine("CLSID_COMCTLListview = ""{58DA8D8A-9D6A-101B-AFC0-4210102A8DA7}""")
|
||
|
FILE.WriteLine("CLSID_COMCTLImageList = ""{58DA8D8F-9D6A-101B-AFC0-4210102A8DA7}""")
|
||
|
FILE.WriteLine("CLSID_COMCTLSbar = ""{6B7E638F-850A-101B-AFC0-4210102A8DA7}""")
|
||
|
FILE.WriteLine("CLSID_MCSIMenu = ""{275E2FE0-7486-11D0-89D6-00A0C90C9B67}""")
|
||
|
FILE.WriteLine("CLSID_MSNVer = ""{A123D693-256A-11d0-9DFE-00C04FD7BF41}""")
|
||
|
FILE.WriteLine("CLSID_RichTextCtrl = ""{3B7C8860-D78F-101B-B9B5-04021C009402}""")
|
||
|
FILE.WriteLine("CLSID_IETimer = ""{59CCB4A0-727D-11CF-AC36-00AA00A47DD2}""")
|
||
|
FILE.WriteLine("CLSID_SubScr = ""{78A9B22E-E0F4-11D0-B5DA-00C0F00AD7F8}""")
|
||
|
FILE.WriteLine("CLSID_IImageDecodeFilter = ""{607fd4e8-0a03-11d1-ab1d-00c04fc9b304}""")
|
||
|
FILE.WriteLine("CLSID_OldXsl = ""{2BD0D2F2-52EC-11D1-8C69-0E16BC000000}""")
|
||
|
FILE.WriteLine("CLSID_MMC = ""{D306C3B7-2AD5-11D1-9E9A-00805F200005}""")
|
||
|
FILE.WriteLine("CLSID_MacromediaSwFlash = ""{D27CDB6E-AE6D-11cf-96B8-444553540000}""")
|
||
|
FILE.WriteLine("CLSID_CHtmlComponentConstructor = ""{3050f4f8-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CAnchorBrowsePropertyPage = ""{3050f3BB-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CImageBrowsePropertyPage = ""{3050f3B3-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_CDocBrowsePropertyPage = ""{3050f3B4-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_IE4ShellFolderIcon = ""{E5DF9D10-3B52-11D1-83E8-00A0C90DC849}""")
|
||
|
FILE.WriteLine("CLSID_IE4ShellPieChart = ""{1D2B4F40-1F10-11D1-9E88-00C04FDCAB92}""")
|
||
|
FILE.WriteLine("CLSID_RealAudio = ""{CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA}""")
|
||
|
FILE.WriteLine("CLSID_WebCalc = ""{0002E510-0000-0000-C000-000000000046}""")
|
||
|
FILE.WriteLine("CLSID_AnswerList = ""{8F2C1D40-C3CD-11D1-A08F-006097BD9970}""")
|
||
|
FILE.WriteLine("CLSID_PreLoader = ""{16E349E0-702C-11CF-A3A9-00A0C9034920}""")
|
||
|
FILE.WriteLine("CLSID_HTMLPopup = ""{3050f667-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_HTMLPopupDoc = ""{3050f67D-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_EyeDog = ""{06A7EC63-4E21-11D0-A112-00A0C90543AA}""")
|
||
|
FILE.WriteLine("CLSID_ImgAdmin = ""{009541A0-3B81-101C-92F3-040224009C02}""")
|
||
|
FILE.WriteLine("CLSID_ImgThumb = ""{E1A6B8A0-3603-101C-AC6E-040224009C02}""")
|
||
|
FILE.WriteLine("CLSID_HHOpen = ""{130D7743-5F5A-11D1-B676-00A0C9697233}""")
|
||
|
FILE.WriteLine("CLSID_RegWiz = ""{50E5E3D1-C07E-11D0-B9FD-00A0249F6B00}""")
|
||
|
FILE.WriteLine("CLSID_SetupCtl = ""{F72A7B0E-0DD8-11D1-BD6E-00AA00B92AF1}""")
|
||
|
FILE.WriteLine("CLSID_ImgEdit = ""{6D940280-9F11-11CE-83FD-02608C3EC08A}""")
|
||
|
FILE.WriteLine("CLSID_ImgEdit2 = ""{6D940285-9F11-11CE-83FD-02608C3EC08A}""")
|
||
|
FILE.WriteLine("CLSID_ImgScan = ""{84926CA0-2941-101C-816F-0E6013114B7F}""")
|
||
|
FILE.WriteLine("CLSID_ExternalFrameworkSite = ""{3050f163-98b5-11cf-bb82-00aa00bdce0b}""")
|
||
|
FILE.WriteLine("CLSID_IELabel = ""{99B42120-6EC7-11CF-A6C7-00AA00A47DD2}""")
|
||
|
FILE.WriteLine("CLSID_HomePubRender = ""{96B9602E-BD20-11D2-AC89-00C04F7989D6}""")
|
||
|
FILE.WriteLine("CLSID_MGIPhotoSuiteBtn = ""{4FA211A0-FD53-11D2-ACB6-0080C877D9B9}""")
|
||
|
FILE.WriteLine("CLSID_MGIPhotoSuiteSlider = ""{105C7D20-FE19-11D2-ACB6-0080C877D9B9}""")
|
||
|
FILE.WriteLine("CLSID_MGIPrintShopSlider = ""{7B9379D2-E1E4-11D0-8444-00401C6075AA}""")
|
||
|
FILE.WriteLine("CLSID_RunLocExe = ""{73822330-B759-11D0-9E3D-00A0C911C819}""")
|
||
|
FILE.WriteLine("CLSID_Launchit2 = ""{B75FEF72-0C54-11D2-B14E-00C04FB9358B}""")
|
||
|
FILE.WriteLine("CLSID_MS_MSHTA = ""{3050f4d8-98b5-11cf-BB82-00AA00BDCE0B}""")
|
||
|
FILE.WriteLine("REG_EXPAND_SZ = 0x00020000")
|
||
|
FILE.WriteLine("REG_SZ_NOCLOBBER = 0x00000002")
|
||
|
FILE.WriteLine("REG_COMPAT = 0x00010001")
|
||
|
FILE.WriteLine("HEADER = ""&w&bPage &p of &P""")
|
||
|
FILE.WriteLine("FOOTER = ""&u&b&d""")
|
||
|
FILE.WriteLine("DEFAULT_IEPROPFONTNAME = ""Times New Roman""")
|
||
|
FILE.WriteLine("DEFAULT_IEFIXEDFONTNAME = ""Courier New""")
|
||
|
FILE.WriteLine("UNIVERSAL_ALPHABET = ""Universal Alphabet""")
|
||
|
FILE.WriteLine("CENTRAL_EUROPEAN = ""Central European""")
|
||
|
FILE.WriteLine("CYRILLIC = ""Cyrillic""")
|
||
|
FILE.WriteLine("WESTERN = ""Western""")
|
||
|
FILE.WriteLine("GREEK = ""Greek""")
|
||
|
FILE.WriteLine("JPEG_IMAGE = ""JPEG Image""")
|
||
|
FILE.WriteLine("GIF_IMAGE = ""GIF Image""")
|
||
|
FILE.WriteLine("XBM_IMAGE = ""XBM Image""")
|
||
|
FILE.WriteLine("PNG_IMAGE = ""PNG Image""")
|
||
|
FILE.WriteLine("EngineMissing = ""SETUPAPI.DLL is missing on this machine.""")
|
||
|
FILE.WriteLine("_MOD_PATH=""c:\windows\system32\mshtml.dll""")
|
||
|
FILE.WriteLine("_SYS_MOD_PATH=""%SystemRoot%\system32\mshtml.dll""")
|
||
|
FILE.WriteLine("IEXPLORE=""C:\Program Files\Internet Explorer\iexplore.exe""")
|
||
|
FILE.WriteLine("[End]")
|
||
|
FILE.Close
|
||
|
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----CREATE THE SAMPLE HTA SCRIPT .
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SET FILE = fso.CreateTextFile(strDestFolder&"\test.hta", True)
|
||
|
FILE.WriteLine ("<HTML>")
|
||
|
FILE.WriteLine (" <HEAD>")
|
||
|
FILE.WriteLine (" <TITLE>HTA support is functioning</TITLE>")
|
||
|
FILE.WriteLine (" <HTA:APPLICATION ")
|
||
|
FILE.WriteLine (" WINDOWSTATE=""maximize""")
|
||
|
FILE.WriteLine (" BORDER=""none""")
|
||
|
FILE.WriteLine (" INNERBORDER=""no""")
|
||
|
FILE.WriteLine (" SHOWINTASKBAR=""no""")
|
||
|
FILE.WriteLine (" SCROLL=""no""")
|
||
|
FILE.WriteLine (" APPLICATIONNAME=""HTA Verification""")
|
||
|
FILE.WriteLine (" NAVIGABLE=""yes"">")
|
||
|
FILE.WriteLine (" </HEAD>")
|
||
|
FILE.WriteLine ("<BODY BGCOLOR=""FFFFFF"">")
|
||
|
FILE.WriteLine ("<DIV STYLE=""position:relative;left:90;top:140;width:80%;"">")
|
||
|
FILE.WriteLine ("<FONT COLOR=""Gray"" FACE=""Tahoma"">")
|
||
|
FILE.WriteLine ("<H2>Welcome to Windows PE.</H2>")
|
||
|
FILE.WriteLine ("HTA support is functioning.")
|
||
|
FILE.WriteLine ("</FONT>")
|
||
|
FILE.WriteLine ("<BR><BR>")
|
||
|
FILE.WriteLine ("<BUTTON ACCESSKEY=""C"" STYLE=""font-face:Tahoma;font-size:13px;"" onclick=""self.close()""><U>C</U>lose</BUTTON>")
|
||
|
FILE.WriteLine ("</DIV>")
|
||
|
FILE.WriteLine (" </BODY>")
|
||
|
FILE.WriteLine (" </HTML>")
|
||
|
FILE.Close
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----CREATE the BATS THAT WILL INSTALL THE HTA ENVIRONMENT.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SET FILE = fso.CreateTextFile(strDestFolder&"\HTA.bat", True)
|
||
|
FILE.WriteLine ("@ECHO OFF")
|
||
|
FILE.WriteLine ("START ""Installing HTA"" /MIN HTA2.bat")
|
||
|
FILE.Close
|
||
|
SET FILE = fso.CreateTextFile(strDestFolder&"\HTA2.bat", True)
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("REM - INSTALL HTA COMPONENTS")
|
||
|
FILE.WriteLine ("%SystemRoot%\System32\mshta.exe /register")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\asctrls.ocx /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\plugin.ocx /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\actxprxy.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\atl.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\corpol.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\cryptdlg.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\ddrawex.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\dispex.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\dxtmsft.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\dxtrans.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\hlink.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\iedkcs32.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\iepeers.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\iesetup.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\imgutil.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\inseng.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\itircl.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\itss.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\licmgr10.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\mlang.dll /s")
|
||
|
FILE.WriteLine ("%SystemRoot%\System32\rundll32.exe setupapi,InstallHinfSection reg 132 mshtml.inf")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\mshtmled.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\msrating.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\mstime.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\olepro32.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\pngfilt.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\rsaenh.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\sendmail.dll /s")
|
||
|
FILE.WriteLine ("Regsvr32 %SystemRoot%\System32\urlmon.dll /s")
|
||
|
FILE.WriteLine ("")
|
||
|
FILE.WriteLine ("REM - INSTALL FILE ASSOCIATIONS FOR HTA")
|
||
|
FILE.WriteLine ("%SystemRoot%\System32\rundll32.exe setupapi,InstallHinfSection DefaultInstall 132 HTA.inf")
|
||
|
FILE.WriteLine ("EXIT")
|
||
|
FILE.Close
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----FILES READY - ASK IF THE USER WANTS TO EXPLORE TO THEM.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
IF iAmQuiet = 0 THEN
|
||
|
strWantToView = MsgBox("This script has successfully retrieved all necessary files needed to "&_
|
||
|
"install HTA on Windows PE. The files have been placed on your desktop in a directory named """&strFolderName&"""."&vbCrLF&vbCrLF&_
|
||
|
"In order to install the HTA components within Windows PE, place the contents of this folder (not the folder itself) into the I386\System32 or IA64\System32 directory "&_
|
||
|
"of your Windows PE CD, Hard drive install, or RIS Server installation, and modify your startnet.cmd to run the file ""HTA.bat"" (without quotes)."&vbCrLF&vbCrLF&_
|
||
|
"Sample scripts named test.vbs (for WSH) and test.hta (for HTA) that you can use to verify installation have been provided as well. You can remove these for your production version of Windows PE."&vbCrLF&vbCrLF&_
|
||
|
"Would you like to open this folder now?", 36, strJobTitle)
|
||
|
END IF
|
||
|
|
||
|
IF strWantToView = 6 OR iWillBrowse = 1 THEN
|
||
|
WshShell.Run("Explorer "&strDestFolder)
|
||
|
END IF
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----WMI TEST OF CD LOADED AND CD READ INTEGRITY.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SUB TestForMedia()
|
||
|
IF CDDrive.MediaLoaded(0) = FALSE THEN
|
||
|
MsgBox "Please place the Windows XP Professional CD in drive "&CDSource&" before continuing.", vbCritical, "No CD in drive "&CDSource&""
|
||
|
WScript.Quit
|
||
|
ELSE
|
||
|
IF CDDrive.DriveIntegrity(0) = FALSE THEN
|
||
|
MsgBox "Could not read files from the CD in drive "&CDSource&".", vbCritical, "CD in drive "&CDSource&" is unreadable."
|
||
|
WScript.Quit
|
||
|
END IF
|
||
|
END IF
|
||
|
END SUB
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----FSO TEST TO SEE IF THE CMDLINE PROVIDED FOLDER EXISTS.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
FUNCTION TestForFolder(a)
|
||
|
IF NOT FSO.FolderExists(a) THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
|
||
|
SUB Validate(a)
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----TEST FOR THE EXISTANCE OF A FOLDER OR FILE, OR THE NONEXISTANCE OF A FILE.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
TestForFolder(CDSource&"\"&a&"")
|
||
|
TestForFolder(CDSource&"\DOCS")
|
||
|
TestForFolder(CDSource&"\SUPPORT")
|
||
|
TestForFolder(CDSource&"\VALUEADD")
|
||
|
TestForFile(CDSource&"\"&a&"\System32\smss.exe")
|
||
|
TestForFile(CDSource&"\"&a&"\System32\ntdll.dll")
|
||
|
TestForFile(CDSource&"\"&a&"\winnt32.exe")
|
||
|
TestForFile(CDSource&"\setup.exe")
|
||
|
TestForANDFile CDSource&"\WIN51.B2", CDSource&"\WIN51.RC1", CDSource&"\WIN51.RC1"
|
||
|
TestForANDFile CDSource&"\WIN51IP.B2", CDSource&"\WIN51IP.RC1", CDSource&"\WIN51MP.RC1"
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----TEST TO INSURE THAT THEY AREN'T TRYING TO INSTALL FROM Windows PE CD ITSELF
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
Set Folder = FSO.GetFolder(CDSource&"\"&a&"\System32")
|
||
|
IF Folder.Files.Count > 10 THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END SUB
|
||
|
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----TEST FOR THE EXISTANCE OF A FOLDER OR FILE, OR THE NONEXISTANCE OF A FILE.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
FUNCTION TestForFolder(a)
|
||
|
IF NOT FSO.FolderExists(a) THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
FUNCTION TestForFile(a)
|
||
|
IF NOT FSO.FileExists(a) THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
FUNCTION TestForANDFile(a,b,c)
|
||
|
IF NOT FSO.FileExists(a) AND NOT FSO.FileExists(b) AND NOT FSO.FileExists(c) THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
FUNCTION TestNoFile(a)
|
||
|
IF FSO.FileExists(a) THEN
|
||
|
FailOut()
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----GENERIC ERROR IF WE FAIL MEDIA RECOGNITION.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SUB FailOut()
|
||
|
MsgBox"The CD in drive "&CDSource&" does not appear to be a valid Windows XP Professional CD.", vbCritical, "Invalid CD in Drive "&CDSource
|
||
|
WScript.Quit
|
||
|
END SUB
|
||
|
|
||
|
|
||
|
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
'-----ADD DATE, AND ADD ZEROS SO WE DON'T HAVE A GIBBERISH TIMESTAMP ON UNIQUE FOLDERNAME.
|
||
|
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
|
||
|
SUB GetUnique()
|
||
|
strAppend=FixUp(Hour(Now()))&FixUp(Minute(Now()))&FixUp(Second(Now()))
|
||
|
IF Len(strAppend) = 5 THEN
|
||
|
strAppend = strAppend&"0"
|
||
|
ELSEIF Len(strAppend) = 4 THEN
|
||
|
strAppend = strAppend&"00"
|
||
|
END IF
|
||
|
END SUB
|
||
|
FUNCTION FixUp(a)
|
||
|
If Len(a) = 1 THEN
|
||
|
FixUp = 0&a
|
||
|
ELSE
|
||
|
Fixup = a
|
||
|
END IF
|
||
|
END FUNCTION
|
||
|
FUNCTION CleanLocation(a)
|
||
|
CleanLocation = REPLACE(a, """", "")
|
||
|
END FUNCTION
|