你试试WebView2.DLL中有一个类(“FTPClient”)
*--需要WebView2.DLL V.106版支持
oFTP =Createobject("Netsuite.FTPClient")
*--GetFileTime 获得文件最后修改时间字符串
strFileName
= [\unload\unins000.dat]
&&文件名的匹配字符串
ErrMsg
= []
&&返回值string
lcDateTime
= oFTP.GetFileTime( strFileName , @ErrMsg )
?'GetFileTime获得文件最后修改时间=' + Iif( Empty( ErrMsg ) , lcDateTime , '异常信息:'
+ ErrMsg ) + Replicate( Chr(10) , 2 )
不一定可以取跨年,有些设计现在忘记了。。。。