以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- ftp GetFileTime 错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138518) |
-- 作者:lur320 -- 发布时间:2019/8/2 15:04:00 -- ftp GetFileTime 错误 如下代码,报错地方将黄色背景。 Dim ftp1 As New FtpClient Dim madr As DataRow madr=。。。。。。 If madr IsNot Nothing Then ftp1.Host=madr("FTPHOST") ftp1.Account = madr("FTPUSER") ftp1.Password =madr("FTPPASSWORD") ftp1.utf8=True If ftp1.Connected = False \'如果FTP没有连接 If ftp1.Connect=False Then \'连接FTP Messagebox.show("连接FTP失败!检查密码和账户信息","提示") Return End If End If Dim fls As List(of String) fls = ftp1.GetFileList("\\exportfiles") For Each fl As String In fls Dim sz As Date sz = ftp1.GetFileTime(fl) MessageBox.Show(fl & sz) 这里文件名都是对的,但是时间都是00:00:00,如《张三文件.doc00:00:00》需要显示具体的创建或修改文件的日期。 Next End If |
-- 作者:lur320 -- 发布时间:2019/8/2 15:07:00 -- OK了。 sz = ftp1.GetFileTime(“\\exportfiles\\" & fl)
|