Hi all,

I hope someone can help me on the following. From the Foxpro Advisor Oct 98 issue, this ActiveX control was introduced. I tried out and it's worked with the shareware version. To get rid of the annoying message (unregistered version), I have registered the version but unfortunely the way to disable the message cannot be done using the way recommended by the author. (which is dropping the control and in the load method initialize the registered code.) Here is the email conversations :


Hi!

Well, I have had no experience using Visual FoxPro, but you will have to
insert that piece of code before you make your first call to the EzReg
control.  Otherwise the results it will give you will be false.

2nd Question: You should distribute the control that came with the
installation that you just downloaded.

I hope this helps,

Dirk Melchers

-----Original Message-----
From: Farouk Yew Bin Abdullah [mailto:tfyew@pc.jaring.my]
Sent: Thursday, October 08, 1998 4:24 AM
To: Dirk Melchers
Subject: Re: Your Order


Hi Dick,

Please help me to do below correctly. 1st. of all I'm using Visual
Foxpro 5
and below is the code how I do the checking:

   * My file storing the correct Reg.Code
   IF NOT EMPTY(fapd.cregno)
      * decrypt the stored Reg.Code
      lcRegNo = ALLT(ddecrypt(ALLT(fapd.cregno), sgcAppPre))

      loRegNo = CreateObject("EzRegOCX.EzReg")
      loRegNo.GetReg(gcregname, sgcAppPre, lcRegNo)
      IF loRegNo.RegNumber = "1" && Registered user.
         glregusr = .T.
      ELSE
         =MESSAGEBOX("This registration number is incorrect. " + ;
            "Contact your vendor for the correct number...", 16, ;
            "Registration Number")
         glregusr = .F.
      ENDIF
   ELSE
      * If demo version, restrict days can be used.
      IF gcregname = "DEMO"
         * 3 Ways Protection; No.of Run Count, Date, Days.
      ELSE  && Else display form for registered code.
         DO FORM dchkreg TO lcRegNo
         loRegNo = CreateObject("EzRegOCX.EzReg")
         loRegNo.GetReg(ALLT(gcregname), sgcAppPre, lcRegNo)
         IF loRegNo.RegNumber = "1"  && Registered user.
            REPL fapd.cregno WITH dencrypt(ALLT(lcRegNo), sgcAppPre)
            glregusr = .T.
         ELSE
            =MESSAGEBOX("This registration number is incorrect. " + ;
               "Contact your vendor for the correct number...", 16, ;
               "Registration Number")
            glregusr = .F.
         ENDIF
      ENDIF
   ENDIF

I hope you can follow my coding. In short I do not have a form storing
the
object EzReg. Instead I create the object without any form. Where should
I
insert the code EzReg1.RegCode = "B4859D654A"?

Regards.

-----Original Message-----
From: Dirk Melchers
To: 'Farouk Yew Bin Abdullah'
Date: Thursday, October 08, 1998 1:11 AM
Subject: RE: Your Order


>Hi,
>
>Thank you for your patience.  To use the registered version of the
>control, you will have to add the line below to your form.load
>procedure.
>
>EzReg1.RegCode = "B4859D654A"
>
>After you have done so the control should be fully functional.  If you
>do not do this correctly the control will return chaotic results.
>
>Your Problem: I'm not quite sure what your problem is :).  Could you be
>more specific please.
>
>Thanks,
>
>Dirk Melchers
>Virtual Bits & Bytes Software
>
>-----Original Message-----
>From: Farouk Yew Bin Abdullah [mailto:tfyew@pc.jaring.my]
>Sent: Wednesday, October 07, 1998 7:48 PM
>To: Dirk Melchers
>Subject: Re: Your Order
>
>
>Hi Dick,
>
>I have already downloaded the file. Can you please give me the serial
>number? Am I right to say that I do not need to change whatever I have
>in my
>App.? Another question is if I want to use RunDate method, for the 2nd
>parameter is it refering to the 2nd line in the EzReg Generator screen?
>
>Regards,
>Farouk Yew Abdullah
>
>
>
>-----Original Message-----
>From: Dirk Melchers
>To: tfyew@pc.jaring.my
>Date: Tuesday, October 06, 1998 10:52 PM
>Subject: Your Order
>
>
>>Dear Sir,
>>
>>Thank you very much for your order.  You may now download the full version
>>of our product EzReg at:
>>
>>http://www.vbbsoft.com/reg/Ezregr.zip
>>
>>The password and username are as follows:
>>
>>User: reg
>>Password: EzRegR
>>
>>The above are case sensitive.  After you have downloaded this file, please
>>inform us, as you will need a serial number to use the registered
>>product which we will reveal to you at that time.
>>
>>Thanks again,
>>
>>Dirk Melchers
>>Virtual Bits & Bytes Sofware
>>
>>
>