Kinook Software Forum

Kinook Software Forum (https://www.kinook.com/Forum/index.php)
-   [VBP] User Tips, Tricks and Samples (https://www.kinook.com/Forum/forumdisplay.php?f=19)
-   -   Script function that creates a GUID (https://www.kinook.com/Forum/showthread.php?t=560)

Zweitze 09-03-2004 03:23 AM

Script function that creates a GUID
 
My build creates Windows Installer (MSI) packages. These packages should upgrade each other, therefore I have to change the PackageCode and ProductCode properties at every build. Both properties are GUIDs. An example script is (InstallShield for Windows Installer 1.52):

Dim Iswi
Set Iswi = CreateObject("ISWiAutomation.ISWiProject")
Iswi.OpenProject "%ISMFILE%"
Iswi.ProductCode = CreateGuid
Iswi.PackageCode = CreateGuid
Iswi.ProductVersion = "%NEWMSIVERSION%"
Iswi.CloseProject

The CreateGuid function should create a new GUID. I got it working in the end, by running UUIDGEN.EXE, but in my opinion this could have much been easier.

kinook 09-03-2004 05:58 AM

Replace CreateGuid with

CreateObject("Scriptlet.Typelib").Guid

From:
http://groups.google.com/groups?hl=e...3DN%26tab%3Dwg

Found via this search:
http://groups.google.com/groups?q=vb...-8&sa=N&tab=wg

Zweitze 09-06-2004 04:42 AM

I didn't know that object... Thanks a lot!


All times are GMT -5. The time now is 01:40 PM.


Copyright © 1999-2023 Kinook Software, Inc.