以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- ftp管理器 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135787) |
-- 作者:shyilin -- 发布时间:2019/6/3 11:22:00 -- ftp管理器 此主题相关图片如下:22222.png Dim ftp As FTPClient=Functions.Execute("照片服务器") Dim st As String= "/" & Tables("表a").Current("第一列") & "/维修单照片" Dim st1 As String Dim fls As List(of String)=ftp.GetFileList(st) For Each fl As String In fls If fls.Count=1 Then st1= st & "/" & fl ElseIf fls.Count>1 Then st1= st1 & st & "/" & fl & vbcrlf Else st1="" End If Next Tables("表a").Current("第四列")=st1 Tables("表a").Current.DataRow.Save
|
-- 作者:有点甜 -- 发布时间:2019/6/3 11:33:00 -- 看了下,是这种代码导致的报错吧?
http://www.foxtable.com/webhelp/scr/2686.htm
你贴出的代码没问题,请做一个出错的实例发上来测试。 |