microsoft-msvc/cscripts/vc2k8_slim.vbs
2013-09-11 00:11:02 +02:00

102 lines
7.5 KiB
Plaintext

' Hello friends,
'
' Make sure vc_red.msi is in the same directory as this file before running:
'
' cscript <name_of_file>.vbs
'
' Modify this file as needed.
'
' Kind Regards,
' dumpydooby (modded by ricktendo64)
Option Explicit
Dim ws, installer, db, view, x
Set ws = WScript.CreateObject("WScript.Shell")
Set installer = WScript.CreateObject("WindowsInstaller.Installer")
Set db = installer.OpenDatabase("vc_red.msi", 1)
Function QueryDatabase(query)
WScript.Echo query
On Error Resume Next
Set view = db.OpenView (query) : CheckError
view.Execute : CheckError
view.close
Set view = nothing
db.commit : CheckError
End Function
Sub CheckError
Dim message, errRec
If Err = 0 Then Exit Sub
message = Err.Source & " " & Hex(Err) & ": " & Err.Description
If Not installer Is Nothing Then
Set errRec = installer.LastErrorRecord
If Not errRec Is Nothing Then message = message & vbNewLine & errRec.FormatText
End If
Wscript.Echo "" : Wscript.Echo message : Wscript.Echo ""
Wscript.Quit 2
End Sub
On Error Resume Next
QueryDatabase("DELETE FROM `Component` WHERE `Directory_` = 'CSetupMM_URT_amd64.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `Component` WHERE `Directory_` = 'CSetupMM_URT_x86.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `Component` WHERE `Directory_` = 'DR_54322.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `Directory` WHERE `Directory` = 'CSetupMM_URT_amd64.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `Directory` WHERE `Directory` = 'CSetupMM_URT_x86.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `Directory` WHERE `Directory` = 'DR_54322.3643236F_FC70_11D3_A536_0090278A1BB8'")
QueryDatabase("DELETE FROM `FeatureComponents` WHERE `Feature_` = 'VC_RED_enu_amd64_net_SETUP'")
QueryDatabase("DELETE FROM `FeatureComponents` WHERE `Feature_` = 'VC_RED_enu_x86_net_SETUP'")
QueryDatabase("DELETE FROM `FeatureExtensionData` WHERE `FeatureId` = 'VC_RED_enu_amd64_net_SETUP'")
QueryDatabase("DELETE FROM `FeatureExtensionData` WHERE `FeatureId` = 'VC_RED_enu_x86_net_SETUP'")
QueryDatabase("DELETE FROM `Feature` WHERE `Feature` = 'VC_RED_enu_amd64_net_SETUP'")
QueryDatabase("DELETE FROM `Feature` WHERE `Feature` = 'VC_RED_enu_x86_net_SETUP'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_chs'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_cht'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_deu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_esn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_fra'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_ita'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_jpn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_kor'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_EULA_rus'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_exe_amd64'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_exe_x86'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_ini_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_ini_ln'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_chs'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_chs'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_cht'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_cht'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_deu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_deu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_esn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_esn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_fra'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_fra'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_ita'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_ita'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_jpn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_jpn'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_kor'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_kor'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_amd64_rus'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_Install_res_dll_x86_rus'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_MSI_amd64_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_MSI_x86_enu'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_VCRedist_Bmp'")
QueryDatabase("DELETE FROM `File` WHERE `Component_` = 'C_VC_Redist_Noninstall_VCRedist_CAB'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_NonInstall_Globdata_ini'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_NonInstall_Install_ini_enu'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_chs'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_cht'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_deu'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_enu'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_esn'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_fra'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_ita'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_jpn'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_kor'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_EUAL_txt_rus'")
QueryDatabase("DELETE FROM `MsiFileHash` WHERE `File_` = 'F_VC_Redist_Noninstall_VCRedist_Bmp'")
QueryDatabase("INSERT INTO `Property` (`Property`,`Value`) VALUES ('USING_EXUIH','1')")
Can't load '/usr/lib/p7zip/Codecs/.keep-p7zip' (Permission denied)