Advertisement
Guest User

Untitled

a guest
Mar 6th, 2021
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2. var installer = WScript.CreateObject("WindowsInstaller.Installer");
  3. var database = installer.OpenDatabase("TestApp-1.0.msi", 1);
  4. var sql
  5. var view
  6.  
  7. sql = "SELECT File from File where FileName='TestApp.exe'";
  8. view = database.OpenView(sql);
  9. view.Execute();
  10. var file = view.Fetch().StringData(1)
  11. WScript.StdErr.WriteLine(file);
  12. view.Close();
  13.  
  14. try
  15. {
  16.     sql = "INSERT INTO `CustomAction` (`Action`,`Type`,`Source`) VALUES ('ExecuteAfterFinalize','2258','"+file+"')"
  17.     WScript.StdErr.WriteLine(sql);
  18.     view = database.OpenView(sql);
  19.     view.Execute();
  20.     view.Close();
  21.  
  22.     sql = "INSERT INTO `InstallExecuteSequence` (`Action`,`Condition`,`Sequence`) VALUES ('ExecuteAfterFinalize','NOT Installed','6700')"
  23.     WScript.StdErr.WriteLine(sql);
  24.     view = database.OpenView(sql);
  25.     view.Execute();
  26.     view.Close();
  27.     WScript.StdErr.WriteLine("Committing changes");
  28.     database.Commit();
  29. }
  30. catch(e)
  31. {
  32.     WScript.StdErr.WriteLine(e);
  33.     WScript.Quit(1);
  34. }
  35.  
  36.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement