![]() |
Popup Calendar |
Post Reply ![]() |
Author | |
jcollier ![]() Senior Member ![]() Joined: 15 February 2006 Status: Offline Points: 250 |
![]() ![]() ![]() ![]() ![]() Posted: 10 January 2007 at 4:06pm |
Since upgrading to 10.4 my popup calendar doesn't work. I am using the following licence:
XtremeCalendarControl.License = "Calendar Control Copyright (c) 2003-2006 Codejock Software" & vbCrLf & "PRODUCT-ID: Codejock.Calendar.ActiveX.v10.4.0" & vbCrLf & "VALIDATE-CODE: XXX-XXX-XXX-XXX" In 10.3.x the line worked except, of course, I had 10.3 in the line instead of 10.4.0. Any ideas what could be wrong? |
|
![]() |
|
sserge ![]() Moderator Group ![]() Joined: 01 December 2004 Status: Offline Points: 1297 |
![]() ![]() ![]() ![]() ![]() |
String "10.4.0" is not correct. Simply remove the last zero with dot, and it should work.
-- Regards, Serge |
|
![]() |
|
jcollier ![]() Senior Member ![]() Joined: 15 February 2006 Status: Offline Points: 250 |
![]() ![]() ![]() ![]() ![]() |
You're right, it should. But it doesn't. I also tried changing the copyright year to 2007 but that didn't help either.
|
|
![]() |
|
elmsoftware ![]() Groupie ![]() ![]() Joined: 21 November 2006 Status: Offline Points: 23 |
![]() ![]() ![]() ![]() ![]() |
Do you need to use...CalendarGlobalSettings.License?
CalendarGlobalSettings.License = [Your license string]
|
|
![]() |
|
sserge ![]() Moderator Group ![]() Joined: 01 December 2004 Status: Offline Points: 1297 |
![]() ![]() ![]() ![]() ![]() |
The following code works pretty fine for me:
-- WBR, Serge |
|
![]() |
|
jcollier ![]() Senior Member ![]() Joined: 15 February 2006 Status: Offline Points: 250 |
![]() ![]() ![]() ![]() ![]() |
Ok the following code still generates the error on the Set pDatePicker line
Dim pDatePicker Dim GS As New CalendarGlobalSettings GS.License = "Calendar Control Copyright (c) 2003-2006 Codejock Software" + vbCrLf + "PRODUCT-ID: Codejock.Calendar.ActiveX.v10.4" + vbCrLf + "VALIDATE-CODE: XXX-XXX-XXX-XXX" Set pDatePicker = CreateObject("Codejock.DatePicker." + GS.Version) |
|
![]() |
|
sserge ![]() Moderator Group ![]() Joined: 01 December 2004 Status: Offline Points: 1297 |
![]() ![]() ![]() ![]() ![]() |
Hi,
The problem is that GS.Version returns string like "10.4.0". We have to remove the last '.0'
Actually, looks like this is a bit inconsistent ![]() -- WBR, Serge |
|
![]() |
|
jcollier ![]() Senior Member ![]() Joined: 15 February 2006 Status: Offline Points: 250 |
![]() ![]() ![]() ![]() ![]() |
Great! Now I know the problem.
This works too without having to write a new function: Set pDatePicker = CreateObject("Codejock.DatePicker." + Replace(GS.Version, "10.4.0", "10.4")) Thanks for the help. |
|
![]() |
Post Reply ![]() |
|
Tweet
|
Forum Jump | Forum Permissions ![]() You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |