I'm just getting crosseyed.. I missed that it was CardHolder and not
CardReader.. So try again...
www.byerley.net/cardreader.txt
----- Original Message -----
From: "Luc Delcoigne" <[email protected]>
To: "RBASE-L Mailing List" <[email protected]>
Sent: Sunday, June 05, 2011 6:14 PM
Subject: [RBASE-L] - re: integrating cardreaders
: Mike,
:
: no succes yet.
:
: When I trace the code I see that de vFirstname etc are all set to 1500
char,
: but they remain empty.
:
: Luc
:
: --------------------------------------------------
: From: "Mike Byerley" <[email protected]>
: Sent: Sunday, June 05, 2011 11:48 PM
: To: "RBASE-L Mailing List" <[email protected]>
: Subject: [RBASE-L] - re: integrating cardreaders
:
: > Yes.. I found the error. The vb variable "cardreader" has to be
Public
: > outside of the function else it is out of scope for the retrieval at
the
: > end
: > of the rbase code. I've corrected it. Try again...
: >
: > www.byerley.net/cardreader.txt
: >
: >
: >
: > ----- Original Message -----
: > From: "Luc Delcoigne" <[email protected]>
: > To: "RBASE-L Mailing List" <[email protected]>
: > Sent: Sunday, June 05, 2011 5:30 PM
: > Subject: [RBASE-L] - re: integrating cardreaders
: >
: >
: > : Mike,
: > :
: > : the code is running fine, BUT the variables seem to remain empty
(when
I
: > do
: > : a show var).
: > :
: > : So, although there is no error, no data are read.....?
: > :
: > : Luc D.
: > :
: > : --------------------------------------------------
: > : From: "Mike Byerley" <[email protected]>
: > : Sent: Sunday, June 05, 2011 10:34 PM
: > : To: "RBASE-L Mailing List" <[email protected]>
: > : Subject: [RBASE-L] - re: integrating cardreaders
: > :
: > : > Luc,
: > : > Try this:
: > : >
: > : > www.byerley.net/cardreader.txt
: > : >
: > : > You will have to assign the values of the RBase variables below
to
: > your
: > : > form fields using property commands:
: > : > You will find them near the end of the code block.
: > : >
: > : > -- Use RBase Property Commands to update the values of your fields
: > : > -- property CompID TEXTVALUE .vFirstName
: > : > -- property CompID TEXTVALUE .vLastName
: > : > -- property CompID TEXTVALUE .vStreetAndNumber
: > : > -- property CompID TEXTVALUE .vPostCode
: > : > -- property CompID TEXTVALUE .vCity
: > : >
: > : >
: > : >
: > : > Mike
: > : >
: > : >
: > : > ----- Original Message -----
: > : > From: "Luc Delcoigne" <[email protected]>
: > : > To: "RBASE-L Mailing List" <[email protected]>
: > : > Sent: Sunday, June 05, 2011 2:40 PM
: > : > Subject: [RBASE-L] - re: integrating cardreaders
: > : >
: > : >
: > : > : Mike,
: > : > :
: > : > : I have a demo soft that works for 28 more days.
: > : > : The code works perfectly in Access and VB6.0.
: > : > :
: > : > : the value of the constant csPresent = 2.
: > : > :
: > : > : So, if the cardreader.Status <> 2, the card is not in the
reader.
: > : > :
: > : > : Luc
: > : > :
: > : > :
: > : > : --------------------------------------------------
: > : > : From: "Mike Byerley" <[email protected]>
: > : > : Sent: Sunday, June 05, 2011 8:23 PM
: > : > : To: "RBASE-L Mailing List" <[email protected]>
: > : > : Subject: [RBASE-L] - re: integrating cardreaders
: > : > :
: > : > : > Luc,
: > : > : > Did you buy the cardreader software so you can find the value
of
: > the
: > : > : > constant "csPresent" that is used in the VB code? I would
need
: > that
: > : > value
: > : > : > to determine if the card is in the reader.
: > : > : >
: > : > : > Mike
: > : > : >
: > : > : >
: > : > : > ----- Original Message -----
: > : > : > From: "Luc Delcoigne" <[email protected]>
: > : > : > To: "RBASE-L Mailing List" <[email protected]>
: > : > : > Sent: Sunday, June 05, 2011 1:36 PM
: > : > : > Subject: [RBASE-L] - re: integrating cardreaders
: > : > : >
: > : > : >
: > : > : > : Mike,
: > : > : > :
: > : > : > : I'm working with the RMScript.dll.
: > : > : > :
: > : > : > : With the Efilmcode I had to send code from an rbase variable
to
: > : > efilm.
: > : > : > :
: > : > : > : Now I have to do the opposite.
: > : > : > : How can I get the result from a DLCALL into a Rbase variable
?
: > : > : > :
: > : > : > : Luc D.
: > : > : > :
: > : > : > : --------------------------------------------------
: > : > : > : From: "Mike Byerley" <[email protected]>
: > : > : > : Sent: Sunday, June 05, 2011 6:10 PM
: > : > : > : To: "RBASE-L Mailing List" <[email protected]>
: > : > : > : Subject: [RBASE-L] - re: integrating cardreaders
: > : > : > :
: > : > : > : > Luc,
: > : > : > : > You are already using the RMScript.DLL that can execute
the
: > code
: > : > you
: > : > : > : > show.... Look at the code you are using already and you
will
: > see
: > : > how
: > : > : > to
: > : > : > : > make it work.
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : > ----- Original Message -----
: > : > : > : > From: "Luc Delcoigne" <[email protected]>
: > : > : > : > To: "RBASE-L Mailing List" <[email protected]>
: > : > : > : > Sent: Sunday, June 05, 2011 11:57 AM
: > : > : > : > Subject: [RBASE-L] - re: integrating cardreaders
: > : > : > : >
: > : > : > : >
: > : > : > : > Tom,
: > : > : > : >
: > : > : > : > Sorry that I was not more specific.
: > : > : > : > In fact I have to read data from a electronic chip-card,
not
: > : > reading
: > : > a
: > : > : > : > magnetic strip.
: > : > : > : >
: > : > : > : > I have found some software from www.roadbyte.be that could
do
: > the
: > : > : > trick.
: > : > : > : > I have some examples in visual basic and VBA.
: > : > : > : >
: > : > : > : > e.g. in Access
: > : > : > : >
: > : > : > : > Private Sub btnReadCard_Click()
: > : > : > : >
: > : > : > : > 'Get RoadByte eID Framework
: > : > : > : > Dim framework As IRbApplication
: > : > : > : > Set framework = CreateObject("RoadByte.Application")
: > : > : > : > framework.Open
: > : > : > : >
: > : > : > : > 'Get card reader
: > : > : > : > Dim cardreader As IRbCardReader
: > : > : > : > Set cardreader = framework.ActiveCardReader
: > : > : > : >
: > : > : > : > 'Check if card present
: > : > : > : > If (cardreader Is Nothing) Then
: > : > : > : > MsgBox "No card reader found"
: > : > : > : > ElseIf (cardreader.Status <> csPresent) Then
: > : > : > : > MsgBox "No card in reader"
: > : > : > : > Else
: > : > : > : > Dim cardholder As IRbPerson
: > : > : > : > Set cardholder = cardreader.card.Holder
: > : > : > : >
: > : > : > : > 'Update fields
: > : > : > : > Me.FirstName.Value = cardholder.FirstName
: > : > : > : > Me.LastName.Value = cardholder.LastName
: > : > : > : > Me.Address.Value =
cardholder.Address.StreetAndNumber
: > : > : > : > Me.PostalCode.Value = cardholder.Address.PostCode
: > : > : > : > Me.City.Value = cardholder.Address.City
: > : > : > : > End If
: > : > : > : >
: > : > : > : > 'Always close framework when done
: > : > : > : > framework.Close
: > : > : > : >
: > : > : > : > End Sub
: > : > : > : >
: > : > : > : > Now I have to implement this in R:base.
: > : > : > : >
: > : > : > : > I suspect that could be possible using DLCALL syntax.
: > : > : > : > But I am not familiar with this.
: > : > : > : >
: > : > : > : > grtz
: > : > : > : >
: > : > : > : > Luc D.
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : > From: TOM HART
: > : > : > : > Sent: Sunday, June 05, 2011 4:44 PM
: > : > : > : > To: RBASE-L Mailing List
: > : > : > : > Subject: [RBASE-L] - re: integrating cardreaders
: > : > : > : >
: > : > : > : >
: > : > : > : > You should be able to scan it into a DB edit field. I use
: > : > barcodes
: > : > : > and
: > : > : > a
: > : > : > : > scanner to do it that way.
: > : > : > : > Tom Hart
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > : >
: > : > : > :
: > : > : >
: > : >
: >
>
--------------------------------------------------------------------------------
: > : > : > : > From: Luc Delcoigne <[email protected]>
: > : > : > : > To: RBASE-L Mailing List <[email protected]>
: > : > : > : > Sent: Sun, June 5, 2011 5:29:06 AM
: > : > : > : > Subject: [RBASE-L] - re: integrating cardreaders
: > : > : > : >
: > : > : > : >
: > : > : > : > hello,
: > : > : > : >
: > : > : > : > I Want to automatically read data from an ID cardreader
into
: > the
: > : > rbase
: > : > : > : > form.
: > : > : > : >
: > : > : > : > Is there anybody out there that hase some experience with
this
: > ?
: > : > : > : >
: > : > : > : > grtz
: > : > : > : >
: > : > : > : > Luc D.
: > : > : > : >
: > : > : > : >
: > : > : > :
: > : > : > :
: > : > : >
: > : > : >
: > : > :
: > : > :
: > : >
: > : >
: > :
: > :
: >
: >
:
:
