Chipkartenleser??

[Charly77]

Moin an alle Notes-Experten und die die es werden wolln (mich eingeschlossen )

Ich habe vor kurzem schon einmal gepostet nach Chipkarten/Barcodeleser ....

Dort wurde mir geraten den Chipkartenleser mit CRLF anzusteuern. Mein Problem bei der ganzen Sache ist nur leider ... hab keinen blassen wie ich anfangen soll ...

Der Kartenleser-Treiber ist installiert bei mir, und das Ding ist CT-API kompatible.

Ich weiss leider nicht wie ich etwas abspeichern, bzw. abrufen kann, geschweige denn wie die Daten gespeichert werden würden auf der Chipkarte, mit dem was in der Notes-Hilfe über CRLF steht werd ich leider auch nicht schlauer, oder ich hab ein Monstermäßiges Brett vorm Kopp 

Gibt es irgendjemanden im Datendschungel da draussen der mir nen Denkanstoss geben kann?

Danke im voraus,

MFG Charly

[eknori]

Ich nehme mal an, die hast die CT32.dll in deinem System32 Ordner; dann kannst du deinem Leser zumindest schon einmal ein Licht aufgehen lassen mit folgendem Code

Dim ct_port As Byte
Dim ctn     As Byte
Dim erg     As Integer

Declare Function xCT_init Lib "ct32.dll" Alias "CT_init" (Byval ctn As Byte, Byval ct_port As Byte)  As Integer
Declare Function xCT_close Lib "ct32.dll" Alias "CT_close" (Byval ctn As Byte) As Integer

Sub init()
   ctn = 1                         ' logische Terminalnummer
   ct_port = 1                     ' hier COM1
   erg = xCT_init(ctn, ct_port)    ' hier geht die Lampe an
End Sub

Sub aus()
   ctn = 1
   erg = xCT_close(ctn)      ' hier geht die Lampe aus
End Sub

Übrigens hat CT-API nichts, aber auch gar nichts mit CRLF zu tun ...

Ach ja, die dritte Function in der ct32.dll wird folgendermaßen declariert

Declare Function CT_data Lib "ct32.dll" (Byval ctn As Integer,  dad As Byte,  sad As Byte, Byval lc As Integer,  cmd As String,  lr As Integer,  rsp As String) As Integer

[Charly77]

Hi,

danke für deine Antwort ...

bei mir wird anscheinend die "winscard.dll" benutzt. Aber ich probier den Code mal aus

Wie schreibt man denn z.B. ein Dokument, bzw. Feldinhalt auf eine Chipkarte?

MFG Charly

[Charly77]

Ich bekomm ständig die Fehlermeldung:

"Class or type name not found: BYTE"

[Charly77]

"BYTE" gibt`s in R5 wohl noch nicht, hab`s als "Integer" deklariert und nun geht`s anscheinend

Hab allerdings noch 1 Frage: In welcher Form kann man Daten auf so einer Chipkarte speichern?

Kann man z.B. ID-Dateien rüberschieben ... oder Masken und Felder oder bin ich auf`m falschen Dampfer?

Und wenn ja, wie geht so etwas ... mir fehlt die Methode, also so etwas wie die "Print"-Methode geht anscheinend nicht.

[eknori]

Di "Methode" heißt CT_data

[Charly77]

Danke für die schnelle Antwort 

Kannst du etwas genauer sein? Ich kann mit der Methode CT_data leider nicht so viel anfangen ... bin vollkommen neu auf diesem Gebiet! Und meine Script-Kenntnisse sind auch mehr schlecht als recht .... Gibt es sowas wie nen "Copy-Befehl" oder so? Und wenn ja, wie dann auslesen und rein schreiben .. vielleicht mit UniqueID?