发表一个AARDIO对接中控考勤机的源码

这个博客展示了如何使用AARDIO编程语言来连接和操作中控考勤机。代码包括了连接设备、获取设备时间、读取考勤记录、同步电脑时间、清除考勤记录以及判断是否为新架构等功能。通过创建窗口控件和调用SDK函数,实现了与考勤机的交互。
摘要由CSDN通过智能技术生成

import win.ui;
/*DSG{ {*/
var winform = win.form(text="aardio form";right=759;bottom=469)
winform.add(
Mcip={cls="edit";text="192.168.1.88";left=61;top=20;right=179;bottom=46;edge=1;z=6};
button={cls="button";text="连接";left=290;top=16;right=391;bottom=49;z=2};
button2={cls="button";text="读记录";left=251;top=84;right=363;bottom=113;z=3};
button3={cls="button";text="同步电脑时间";left=45;top=86;right=149;bottom=113;z=5};
button4={cls="button";text="清除考勤记录";left=45;top=122;right=149;bottom=149;z=9};
button5={cls="button";text="判断是否新架构";left=44;top=157;right=143;bottom=185;z=10};
edit={cls="edit";left=4;top=291;right=754;bottom=443;edge=1;multiline=1;z=4};
mcport={cls="edit";text="4370";left=194;top=19;right=274;bottom=48;edge=1;z=7};
static={cls="static";text="控件";left=694;top=20;right=732;bottom=52;db=1;dl=1;dr=1;dt=1;transparent=1;z=1};
static2={cls="static";text="IP地址";left=10;top=20;right=53;bottom=45;transparent=1;z=8}
)
/*}}*/

//import com;
import raw;
import com.lite;
var dll =com.lite("E:\二次开发\中控SDK\脱机通讯开发包-6.3.1.40\SDK\x86\zkemkeeper.dll")
var embed = dll.createEmbed(winform.static, "{00853A19-BD51-419B-9269-2DABE57EB61F}");
//var embed = winform.static.createEmbed("{00853A19-BD51-419B-9269-2DABE57EB61F}");
var object = embed._object;
var Makno = 1;
import console;
connetflag = false;

//实时相关事件
onattlog={
    //实时获取考勤记录
    OnAttTransactionEx=function(EnrollNumber,IsInValid,AttState,VerifyMethod,dwYear,dwMonth,dwDay,dwHour,dwMinute,dwSecond,WorkCode){
        var attlog = "考勤号码:" ++ EnrollNumber ++ "  考勤时间:" ++dwYear ++"-" ++ dwMonth ++"-" ++ dwDay ++" "
                            ++ dwHour ++ ":" ++ dwMinute ++":" ++ dwSecond ;
        winform.edit.print(attlog);
    }
}

winform.button.oncommand = function(id,event){
    
    var Mcip = winform.Mcip.text;
    var mcport = winform.mcport.text;  
    var ret  =object.Connect_Net(Mcip,mcport)//连接设备
    winform.edit.text="";
    connetflag=ret;
    
    if(ret){
        winform.edit.print("连接成功");
    }else {
        winform.edit.print("连接失败");
    }
    
    
    //显示设备时间
    var ret,dwYear,dwMonth,dwDay,dwHour,dwMinute,dwSecond =object.GetDeviceTime(Makno)
    
    var mcdate = "机器时间为:" ++ dwYear ++"-" ++ dwMonth ++"-" ++ dwDay ++" "
                            ++ dwHour ++ ":" ++ dwMinute ++":" ++ dwSecond
        winform.edit.print(mcdate);                    
    //获取机器序列号
    var ret,dwSerialNumber = object.GetSerialNumber(Makno);
    if(ret){
        winform.edit.print("机器序列号为:"++ dwSerialNumber)
    }else {
         winform.edit.print("获取失败")
    }
    
    
    var onatt = 1; //注册考勤实时考勤记录.
    var ret = object.RegEvent(Makno,onatt)
    //如果为真.则 绑定事件 否则 取消绑定.
    if(ret){
        com.Connect(object,onattlog)
        winform.edit.print("绑定事件成功");
    }else {
        com.ReleaseConnection(object,onattlog);
        winform.edit.print("绑定事件失败");
    }
            
}
//读取考勤记录
getlogdata= function(){
    
   /*  C 代码
 while (axCZKEM1.SSR_GetGeneralLogData(iMachineNumber, out sdwEnrollNumber, out idwVerifyMode,
                            out idwInOutMode, out idwYear, out

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值