The ThinApp object can be used to manipulate Vmware ThinApp Virtualized Applications.
The ‘Base’ object is ‘ScenseThinApp’. The ScenseThinApp object provides general administrative functions.
ScenseThinApp
| Properties | Description |
| InventoryName | Internal inventory name |
| Files
|
Reference to the Files collection
|
| Methods | Description |
| Parse
|
Reads the contents of a ThinApp file and populates the Files collection
Function Parse(ThinAppFile As String) As Long |
| Install
|
Installs the ThinApp Package depending on the Extended Install settings
Function Install() As Long |
| Uninstall
|
Removes a locally installed ThinApp
Function Uninstall() As long |
File
The Files collection of the ScenseThinApp object consists of one or more File objects.
| Properties | Description |
| FileName | File name |
| AnsiCodePage | Code Page for this file |
| LocaleIdentifier | Locale for this file |
| LocaleName | Locale Name for this file |
| MainDataContainer | Reference to the main data container file |
| SandboxName | Name of the ThinApp sandbox for this file |
| ShortcutList | List of shortcut ThinApp executables |
| TargetPath | Internal virtual path to the application |
| ThinAppType | Type of ThinApp file
Public Const THINAPP_TYPE_UNKNOWN = 0 Public Const THINAPP_TYPE_MAIN_DATA_CONTAINER = 1 Public Const THINAPP_TYPE_SHORTCUT_EXE = 2 Public Const THINAPP_TYPE_THICK_MSI = 3 Public Const THINAPP_TYPE_THIN_MSI = 4 Public Const THINAPP_TYPE_OLD_MSI = 5 |
| ThinAppVersion | ThinApp version used to package this file |
Usage:
Sub Scense_Main()
'Read file
ScenseThinApp.Parse "\\Server\Share\ThinApp\OpenOffice.org 3.2.dat"
'Log File Information
With ScenseThinApp.Files.Item(1)
WriteScenseLog "FileName: " & .FileName
WriteScenseLog "AnsiCodePage: " & .AnsiCodePage
WriteScenseLog "LocaleIdentifier: " & .LocaleIdentifier
WriteScenseLog "LocaleName: " & .LocaleName
WriteScenseLog "MainDataContainer: " & .MainDataContainer
WriteScenseLog "SandboxName: " & .SandboxName
WriteScenseLog "ShortcutList: " & .ShortcutList
WriteScenseLog "TargetPath: " & .TargetPath
WriteScenseLog "ThinAppType: " & .ThinAppType
WriteScenseLog "ThinAppVersion: " & .ThinAppVersion
End With
End Sub