Fonctions externes de prorfl.dll et v9rfl32.dll, dont MasterCard(), FloorCard(), etc.

**fateh1970** · 11/09/2013, 01h40

Salut tout le monde
SVP je travaille sur un projet hotelerie, et pour finir mon travaille je dois ajouter a mon logiciel des commandes pour ecrires les cartes d'accès, j'ai un lecteur de carte RF fournis avec un dll prorfl.dll mais sans doc, avec de grands efforts j'ai pu trouvé le fonctionnement de quelques fonctions et il me reste plus 20 fonctions je cherche les fonctions suivantes :
MasterCard() ses parametres??
FloorCard()
BuildCard ets. merci pour voir le dll
je pourrai vous envoyer le dll

**Papy214** · 11/09/2013, 22h56

Trouvé ici

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 
  //Get DLL's Version
  function GetDLLVersion(sDllVer:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Open USB
  function initializeUSB(fUSB: Byte): Integer; stdcall;
    external 'proRFL.DLL';
  //Buzzer
  function Buzzer(fUSB:Byte;t: Integer):Integer; stdcall;
    external 'proRFL.DLL';
  //Read Card Data
  function ReadCard(fUSB:Byte;Buffer:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Issue Guest Card
  //int __stdcall GuestCard(uchar fUSB,int dlsCoID,uchar CardNo,uchar dai,uchar LLock,uchar pdoors,uchar BDate[10],uchar EDate[10],uchar RoomNo[8],uchar *cardHexStr)
  function GuestCard(fUSB:Byte;dlsCoID:Integer;CardNo,dai,llock,pdoors:Byte;BDate,EDate,RoomNo:Pchar;CardHexStr:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Card Erase
  //int __stdcall CardErase(uchar fUSB,int dlsCoID,unsigned char *cardHexStr)
  function CardErase(fUSB:Byte;dlsCoID:Integer;cardHexStr:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Convert HEX to ASC
  //__int16 __stdcall hex_a(unsigned char *hex,unsigned char *a,__int16 len)
  function hex_a(hex,asc:PChar;hLen:Integer):Integer; stdcall;
    external 'proRFL.DLL';
  //Convert ASC to HEX
  //__int16 __stdcall a_hex(unsigned char *a,unsigned char *hex,__int16 len)
  function a_hex(asc,hex:PChar;aLen:Integer):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Card Type By Card Data String
  //int __stdcall GetCardTypeByCardDataStr(unsigned char *CardDataStr,unsigned char *CardType)
  function GetCardTypeByCardDataStr(cardHexStr,CardType:PChar):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Guest LockNo By Card Data String
  //int __stdcall GetGuestLockNoByCardDataStr(int dlsCoID,unsigned char *CardDataStr,unsigned char *LockNo)
  function GetGuestLockNoByCardDataStr(dlsCoID: Integer;cardHexStr,LockNo:PChar):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Guest Expiry By Card Data String
  //int __stdcall GetGuestETimeByCardDataStr(int dlsCoID,unsigned char *CardDataStr,unsigned char *ETime)
  function GetGuestETimeByCardDataStr(dlsCoID: Integer;cardHexStr,ETime:PChar):Integer; stdcall;
    external 'proRFL.DLL';

**fateh1970** · 12/09/2013, 08h05

Merci pour la réponse, pour c'est fonctions c'est bon j'ai deja trouvé leurs détails, ce que me concerne le reste des fonctions comme mastercard, floorcard, buildingcard etc... en tout il y 34 fonctions.

**fateh1970** · 12/09/2013, 21h17

Salut tout le monde, est ce que quelqu'un à travaillé sur les serrures a carte d’accès comme en hôtel qui pourra m'aider? merci je cherche de détail des fonctions exporter de la DLL prorfl.dll ou v9rfl32.dll merci d'avance

**ShaiLeTroll** · 13/09/2013, 17h38

Cherche donc un peu plus, j'ai trouvé dès le second lien pour prorfl.dll

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
  //Get DLL's Version
  function GetDLLVersion(sDllVer:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Open USB
  function initializeUSB(fUSB: Byte): Integer; stdcall;
    external 'proRFL.DLL';
  //Buzzer
  function Buzzer(fUSB:Byte;t: Integer):Integer; stdcall;
    external 'proRFL.DLL';
  //Read Card Data
  function ReadCard(fUSB:Byte;Buffer:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Issue Guest Card
  //int __stdcall GuestCard(uchar fUSB,int dlsCoID,uchar CardNo,uchar dai,uchar LLock,uchar pdoors,uchar BDate[10],uchar EDate[10],uchar RoomNo[8],uchar *cardHexStr)
  function GuestCard(fUSB:Byte;dlsCoID:Integer;CardNo,dai,llock,pdoors:Byte;BDate,EDate,RoomNo:Pchar;CardHexStr:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Card Erase
  //int __stdcall CardErase(uchar fUSB,int dlsCoID,unsigned char *cardHexStr)
  function CardErase(fUSB:Byte;dlsCoID:Integer;cardHexStr:PChar):Integer; stdcall;
    external 'proRFL.DLL';
  //Convert HEX to ASC
  //__int16 __stdcall hex_a(unsigned char *hex,unsigned char *a,__int16 len)
  function hex_a(hex,asc:PChar;hLen:Integer):Integer; stdcall;
    external 'proRFL.DLL';
  //Convert ASC to HEX
  //__int16 __stdcall a_hex(unsigned char *a,unsigned char *hex,__int16 len)
  function a_hex(asc,hex:PChar;aLen:Integer):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Card Type By Card Data String
  //int __stdcall GetCardTypeByCardDataStr(unsigned char *CardDataStr,unsigned char *CardType)
  function GetCardTypeByCardDataStr(cardHexStr,CardType:PChar):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Guest LockNo By Card Data String
  //int __stdcall GetGuestLockNoByCardDataStr(int dlsCoID,unsigned char *CardDataStr,unsigned char *LockNo)
  function GetGuestLockNoByCardDataStr(dlsCoID: Integer;cardHexStr,LockNo:PChar):Integer; stdcall;
    external 'proRFL.DLL';
 
  //Get Guest Expiry By Card Data String
  //int __stdcall GetGuestETimeByCardDataStr(int dlsCoID,unsigned char *CardDataStr,unsigned char *ETime)
  function GetGuestETimeByCardDataStr(dlsCoID: Integer;cardHexStr,ETime:PChar):Integer; stdcall;
    external 'proRFL.DLL';

ou pour RFL32.dll

Code csharp :

Sélectionner tout - Visualiser dans une fenêtre à part

int tz_RoomCard(long dev,int icoID,long iCardNo,String sedate,string sroomno,char cdai,refstring sCardData) library "RFL32.dll" alias for "RoomCard"

Code PowerBuilder :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
FUNCTION ulong OpenPort(ulong port) LIBRARY "RFL32.dll" 
FUNCTION ulong ClosePort(ulong hCommDev) LIBRARY "RFL32.dll"
FUNCTION ulong Buzzer(ulong hCommDev) LIBRARY "RFL32.dll"
FUNCTION ulong RoomCard(ulong hCommDev,ulong UserID,ulong CardNo,string startdate,string RoomNO,char Dai,ref string cardHexStr) LIBRARY "RFL32.dll"
FUNCTION ulong ReturnCardNo(ulong hCommDev) LIBRARY "RFL32.dll"

**fateh1970** · 14/09/2013, 22h38

Moi aussi j'ai trouvé ce que tu as trouvé dès le 1er lien, mais j'ai bien précisé ce que je cherche après de longue heures de recherche, merci comme même, ma question est bien claire je cherche les paramètres des fonctions MasterCard et BuildingCard et FloorCard est ce que il y a de gens qui ont déjà travaillé avec, parceque j'ai fais de recherche pour des jours et des nuits. et si peut refaire la recherche pour moi merci peut être j'ai pas bien cherché.

**tourlourou** · 15/09/2013, 10h17

Ne serait-il pas commode de contacter le fournisseur du système et de la dll ?

**ShaiLeTroll** · 16/09/2013, 13h47

je plussoie tourlourou

Envoyé par tourlourou

Ne serait-il pas commode de contacter le fournisseur du système et de la dll ?

C'est trop spécifique à un métier et pas spécialement Delphi !

**fotounien** · 24/10/2016, 19h28

Bonjour, je suis plutôt sur VB6. J'ai réussi à utiliser quelques fonctions de proRFL.Dll, notamment écrire sur la Carte, Effacer la Carte, etc.
Malheureusement je bloque sur la lecture de la Date du CheckOut. J'utilise GetGuestETimeByCardDataStr, mais je pense que je m'embrouille un peu sur les paramètres, principalement HotelID. Ma fonction ReadCard me renvoie un HotelID=524288. Du coup, je ne sais pas quoi en faire puisque HotelID est souvent 0

CardDataStr="551501C90800006383820100617AC3227AEC5150504F54C5FFFFFFFFFFFFFFFFFFFFFFFF"

Donc, je fais st = GetGuestETimeByCardDataStr(0, CardDataStr, lTimeAndDate)

La réponse est toujours st=2 (C'est-à-dire: Not a card in this system) et lTimeAndDate="" (vide)

Qu'est-ce qui ne va pas? Je boucle depuis 1 semaine.

Merci de votre aide.

**ShaiLeTroll** · 25/10/2016, 09h25

Déjà que le sujet d'origine ne concernait pas directement Delphi mais l'exploitation d'obscure DLL
Trois ans plus tard, le sujet maintenant est détourné sur du VB avec des éléments encore plus spécifique à ces DLL sans aucun rapport avec Delphi

Contactez l'auteur de ces DLL !

Fonctions externes de prorfl.dll et v9rfl32.dll, dont MasterCard(), FloorCard(), etc.

API, COM et SDKs Delphi

Discussions similaires

Partager

Partager