Marcelo,
Para hacer la llamada:
oZk:GetAllUserInfo( 1, @dwEnrollNumber, @Name, @Password, @Privilege, @Enabled )
como declaras dwEnrollNumber en tu PRG ?
Marcelo,
Para hacer la llamada:
oZk:GetAllUserInfo( 1, @dwEnrollNumber, @Name, @Password, @Privilege, @Enabled )
como declaras dwEnrollNumber en tu PRG ?
Antonio,
la declaraci贸n de las variables he probado con LOCAL y STATIC
saludos
Marcelo
Antonio,
inicializando las variables
dwEnrollNumber := 0
Name := ''
Password := ''
Privilege := 0
Enabled := .F.
obtengo informacion, no la correcta pero obtengo algo, seguire jugando,
como puedo inicializar de otra manera para que los tipos sean compatibles
gracias por la ayuda
Saludos
Marcelo V铆a
> obtengo informacion, no la correcta pero obtengo algo, seguire jugando
Que informaci贸n est谩s obteniendo ?
private void GetAllUserInfo(string sIp = "10.0.0.44", int iPort = 4370, int iMachineNumber = 1)
{
聽 聽 //Create Standalone SDK class dynamicly.
聽 聽 zkemkeeper.CZKEMClass axCZKEM1 = new zkemkeeper.CZKEMClass();
聽 聽 axCZKEM1.Connect_Net(sIp, iPort);
聽 聽 int iEnrollNumber = 0;
聽 聽 string sname=String.Empty ;
聽 聽 string sPass = String.Empty;
聽 聽 int iPrivilege = 0;
聽 聽 bool ienabled = false;
聽 聽 axCZKEM1.EnableDevice(iMachineNumber, false);
聽 聽 axCZKEM1.ReadAllUserID(iMachineNumber);//read all the user information to the memory
聽 聽 while (axCZKEM1.GetAllUserInfo(iMachineNumber, ref iEnrollNumber, ref sname, ref sPass, ref iPrivilege,ref 聽ienabled))
聽 聽 {
聽 聽 聽 聽 MessageBox.Show("iEnrollNumber :"+iEnrollNumber.ToString()+
聽 聽 聽 聽 聽 聽 "sname: "+ sname+
聽 聽 聽 聽 聽 聽 "sPass :"+ sPass+
聽 聽 聽 聽 聽 聽 "iPrivilege :"+ iPrivilege+
聽 聽 聽 聽 聽 聽 "ienabled :"+ ienabled
聽 聽 聽 聽 聽 聽 );
聽 聽 }
聽 聽 axCZKEM1.EnableDevice(iMachineNumber, true);
}#include "fivewin.ch"
function main()
local oZk, aLista := {}
local dwEnrollNumber , Name, Password, Privilege, Enabled
oZk := CreateObject("zkemkeeper.ZKEM")
oZk:SetCommPassword(12345)
oZk:Connect_Net( "10.0.0.44", 4370 )
oZk:EnableDevice(1, .F.)
oZk:ReadAllUserID(1)
dwEnrollNumber := 0
Name 聽 聽 聽 聽 聽 := ''
Password 聽 聽 聽 := '' 聽
Privilege 聽 聽 聽:= 0
Enabled 聽 聽 聽 聽:= .F.
do while oZk:GetAllUserInfo( 1, @dwEnrollNumber, @Name, @Password, @Privilege, @Enabled )
聽 聽 AADD( aLista, { dwEnrollNumber, Name, Password, Privilege, Enabled } )
enddo
? len( aLista )
oZk:EnableDevice(1, .T.)
xBrowse( aLista )
oZk:disconnect()
return nilAntonio,
alguna idea sobre esto, o sugerencia de como podr铆a atacar este tema desde otro angulo pero utilizando fivewin
saludos cordiales
Marcelo Via