default.vbs

WinCE CAB Manager3.0,编辑CAB安装文件的利器

'****************************************************************************
'*
'* This is the default VBScript file for use with WinCE CAB Manager - modify
'* as needed.  When you are finished, click 'Script / Load' on the WinCE CAB
'* Manager application menu to load and run the script.
'*
'****************************************************************************

' Include Scripts -----------------------------------------------------------
IncludeScript "CeCabMgr_Types.vbs"


'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Implementation
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

' TODO: Add Your Code Here!
MsgBox "Script is loaded and events are running!"


'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Application Events
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

' BeforeApplicationShutDown -------------------------------------------------
'
' Description: Occurs before the application shuts down.
'
' Note: This event is not actually valid in scripts, because the script
' document will be closed before this event occurs.  If you require this
' event, you should consider implementing your code in a COM Add-In instead
' of a script.
'
' Parameters: None
'
Sub Application_BeforeApplicationShutDown()
	' TODO: Add your implementation here
End Sub


' DocumentOpen --------------------------------------------------------------
'
' Description: Occurs after a docuement is opened.
'
' Parameters:
'	oDocument As CeCabManagerLib.Document
'
Sub Application_DocumentOpen( oDocument )
	' TODO: Add your implementation here
End Sub


' BeforeDocumentClose -------------------------------------------------------
'
' Description: Occurs before a document is closed.
'
' Parameters:
'	oDocument As CeCabManagerLib.Document
'
Sub Application_BeforeDocumentClose( oDocument )
	' TODO: Add your implementation here
End Sub


' DocumentSave --------------------------------------------------------------
'
' Description: Occurs after a document has been saved.
'
' Parameters:
'	oDocument As CeCabManagerLib.Document
'
Sub Application_DocumentSave( oDocument )
	' TODO: Add your implementation here
End Sub


' NewDocument ---------------------------------------------------------------
'
' Description: Occurs after a new document has been created.
'
' Parameters:
'	oDocument As CeCabManagerLib.Document
'
Sub Application_NewDocument( oDocument )
	' TODO: Add your implementation here
End Sub


' WindowActivate ------------------------------------------------------------
'
' Description: Occurs after a window is activated.
'
' Parameters:
'	oWindow As CeCabManagerLib.Window
'
Sub Application_WindowActivate( oWindow )
	' TODO: Add your implementation here
End Sub


' WindowDeactivate ----------------------------------------------------------
'
' Description: Occurs after a window is deactivated.
'
' Parameters:
'	oWindow As CeCabManagerLib.Window
'
Sub Application_WindowDeactivate( oWindow )
	' TODO: Add your implementation here
End Sub


' FilesDropped --------------------------------------------------------------
'
' Description: Occurs when files are dropped onto the application window.
'
' Parameters:
'	oDocument As CeCabManagerLib.Document
'	oFilePaths As CeCabManagerLib.Paths
'	bHandled As Boolean
'
Sub Application_FilesDropped( oDocument, oFilePaths, ByRef bHandled )
	' TODO: Add your implementation here
End Sub


'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' CeCabinetMgr Events
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

' ProviderChanged -----------------------------------------------------------
'
' Description: Occurs when the provider name is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_ProviderChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' AppNameChanged ------------------------------------------------------------
'
' Description: Occurs when the application name is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_AppNameChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' ProcessorTypeChanged ------------------------------------------------------
'
' Description: Occurs when the processor type supported is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_ProcessorTypeChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' InstallDirChanged ---------------------------------------------------------
'
' Description: Occurs when the default installation directory is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_InstallDirChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' UnsupportedPlatformsChanged -----------------------------------------------
'
' Description: Occurs when the list of unsupported platforms is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_UnsupportedPlatformsChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' VersionMinChanged ---------------------------------------------------------
'
' Description: Occurs when the minimum OS version required by the application
'              is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_VersionMinChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' VersionMaxChanged ---------------------------------------------------------
'
' Description: Occurs when the maximum OS version required by the application
'              is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_VersionMaxChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' BuildMinChanged -----------------------------------------------------------
'
' Description: Occurs when the minimum OS build required by the application
'              is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_BuildMinChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' BuildMaxChanged -----------------------------------------------------------
'
' Description: Occurs when the maximum OS build required by the application
'              is changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_BuildMaxChanged( oCabinet )
	' TODO: Add your implementation here
End Sub


' SetupDllAdded -------------------------------------------------------------
'
' Description: Occurs after a Setup DLL is added to the cabinet.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_SetupDllAdded( oCabinet )
	' TODO: Add your implementation here
End Sub


' SetupDllExtracted ---------------------------------------------------------
'
' Description: Occurs after the Setup DLL has been extracted.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_SetupDllExtracted( oCabinet, Path )
	' TODO: Add your implementation here
End Sub


' BeforeSetupDllRemove ------------------------------------------------------
'
' Description: Occurs before a Setup DLL is removed from the cabinet.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'
Sub CeCabinetMgr_BeforeSetupDllRemove( oCabinet )
	' TODO: Add your implementation here
End Sub


' FileAdded -----------------------------------------------------------------
'
' Description: Occurs after a file is added to the cabinet.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'	oFile As CeCabinetLib.CeFile
'
Sub CeCabinetMgr_FileAdded( oCabinet, oFile )
	' TODO: Add your implementation here
End Sub


' FileChanged ---------------------------------------------------------------
'
' Description: Occurs when a file's properties are changed.
'
' Parameters:
'	oCabinet As CeCabinetLib.Cabinet
'	oFile As CeCabinetLib.CeFile
'	Item As CeCabinetLib.PropChangeType
'
Sub CeCabinetMgr_FileChanged( oCabinet, oFile, Item )
	' TODO: Add your implementation here
End Sub