API函数参数的有关问题

API函数参数的问题
指纹考勤机有个函数是设定设备时间的，

Public Declare Function FK_SetDeviceTime Lib "FKAttend" (ByVal nHandleIndex As Long, ByVal nDateTime As Date) As Long

VB中只要传入now就可以设置

但是在VFP中不知道怎么来定义nDateTime这个参数，我想把当前时间datetime()传入，试了很多转换的方法都不行

Declare integer FK_SetDeviceTime IN FKAttend.dll integer,string &&最后一个参数不知道设置成string还是integer该如何调用。

------解决方案--------------------------------------------------------
那再试试：

VB code

*-- vfp9 代码nn = date() - date(1900,1,1)+1 + seconds()/86400Declare integer FK_SetDeviceTime IN FKAttend.dll integer, DOUBLE? FK_SetDeviceTime(1, nn)