Question : Script compiles, but never seems to tun

I have a script setting registry keys during my install as listed below. It's fine and it compiles, but it looks like it never launches or has any event associated with it. MiscCommon is the name of a feature. I thought that

export prototype MiscCommon_Installed();
function MiscCommon_Installed()

might constitute an event where the that feature has been installed, and a function to perform but i guess not.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
//*****************************************************************************
// Windows API Prototypes
//*****************************************************************************

prototype stdcall VOID KERNEL32.GetSystemTime(POINTER);
prototype stdcall BOOL KERNEL32.SystemTimeToTzSpecificLocalTime(POINTER, POINTER, POINTER);  


typedef _SYSTEMTIME begin
	SHORT iyear;
	SHORT imonth;
	SHORT iDayOffWeek;
	SHORT iday;
	SHORT ihour;
	SHORT iminute;
	SHORT isecond;
	SHORT imillisecond;
end;

_SYSTEMTIME SystemTime, LocalTime;
_SYSTEMTIME POINTER pSystemTime, pLocalTime;


#include "ifx.h"  
#include "isrt.h"
#include "iswi.h"
#include "WinApi.h"



export prototype MiscCommon_Installed();
function MiscCommon_Installed() 
	VARIANT Day, Year, Month;
	STRING sYear, sDay, sMonth;
	BOOL bSuccess;
	STRING dragon;
	STRING svName;
	NUMBER nvSize;
	STRING temp;
begin    
 	// Get current day, month, and year
    pSystemTime = &SystemTime;
    GetSystemTime(pSystemTime);
    pLocalTime = &LocalTime;
    bSuccess = SystemTimeToTzSpecificLocalTime(NULL, pSystemTime, pLocalTime);
    Year = pLocalTime->iyear;
    sYear = Year;
    Month = pLocalTime->imonth;
    sMonth = Month;
    Day = pLocalTime->iday;
    sDay = Day;
	//MessageBox (sMonth, INFORMATION );
	RegDBSetKeyValueEx("\\SOFTWARE\\ComHouse Wireless\\Release", "InstallYear", REGDB_NUMBER, sYear, -1 );
	RegDBSetKeyValueEx("\\SOFTWARE\\ComHouse Wireless\\Release", "InstallMonth", REGDB_NUMBER, sMonth, -1 );
	RegDBSetKeyValueEx("\\SOFTWARE\\ComHouse Wireless\\Release", "InstallDay", REGDB_NUMBER, sDay, -1 );
	RegDBSetKeyValueEx("\\SOFTWARE\\ComHouse Wireless\\Release", "INSTALLDIR", REGDB_STRING, INSTALLDIR, -1 );
end;

Answer : Script compiles, but never seems to tun

since I don't have much to do today, and seeing what installscript is seemed like not a bad enternainment... here's what will work.

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
//*****************************************************************************
// Windows API Prototypes
//*****************************************************************************

prototype stdcall VOID KERNEL32.GetSystemTime(POINTER);
prototype stdcall BOOL KERNEL32.SystemTimeToTzSpecificLocalTime(POINTER, POINTER, POINTER);  


typedef _SYSTEMTIME begin
      SHORT iyear;
      SHORT imonth;
      SHORT iDayOffWeek;
      SHORT iday;
      SHORT ihour;
      SHORT iminute;
      SHORT isecond;
      SHORT imillisecond;
end;

_SYSTEMTIME SystemTime, LocalTime;
_SYSTEMTIME POINTER pSystemTime, pLocalTime;


#include "ifx.h"  
#include "isrt.h"
#include "iswi.h"
#include "WinApi.h"

export prototype WriteInstallationInfo(HWND );
function WriteInstallationInfo(hMSI)
      VARIANT Day, Year, Month;
      STRING sYear, sDay, sMonth;
      STRING svName;
      NUMBER nvSize;
      STRING temp;
      BOOL bSuccess;
      /*HWND hMSI;*/
begin    
       // Get current day, month, and year
    pSystemTime = &SystemTime;
    GetSystemTime(pSystemTime);
    pLocalTime = &LocalTime;
    bSuccess = SystemTimeToTzSpecificLocalTime(NULL, pSystemTime, pLocalTime);
    Year = pLocalTime->iyear;
    sYear = Year;
    Month = pLocalTime->imonth;
    sMonth = Month;
    Day = pLocalTime->iday;
    sDay = Day;    
    
   MsiSetProperty(hMSI, "MYYEAR", sYear);
   MsiSetProperty(hMSI, "MYMONTH", sMonth);
   MsiSetProperty(hMSI, "MYDAY", sDay);     
end;
Random Solutions  
 
programming4us programming4us