[VBS]Supprimer dossier en Session MSI

Code:

---

1 2 3 4 5 6 7

Dim objFSO Set objFSO = CreateObject ("Scripting.FileSystemObject") strPath = Session.Property("PROPERTYNAME") nbr = Len(strPath)-1 strPath = Left(Session.Property("PROPERTYNAME"),nbr)   objFSO.DeleteFolder strPath, True

---

Salut

La ligne strPath = Session.Property("PROPERTYNAME") provoque l'erreur:

Citation:

---

Erreur N°424
Description: Un objet est requis

---

en effet, Session n'est pas implémenté.

Voici la correction
Question :
Comment ajouter un VBScript dans un fichier MSI
Réponse :
Il faut éditer les tables CustomAction, InstallExecuteSequence du fichier MSI avec Orca.

1)Modifier la table CustomAction
Dans les colonnes
Action : Ajouter le nom du fichier vbscript
Type : Ajouter le nombre 38
Target : Copier le code vbscript


2)Modifier la table InstallExecuteSequence
Dans les colonnes
Action : Ajouter le même nom de fichier vbscript
Condition : Not Installed|REMOVE="ALL" : en installation|en désinstallation
Sequence : Ajouter un nombre supérieur à 1501