以文本方式查看主题

-  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
老师帮我改改呢    怎么老是报错呢
图片点击可在新窗口打开查看此主题相关图片如下:3333.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2019/6/3 11:33:00
--  

看了下,是这种代码导致的报错吧?

 

http://www.foxtable.com/webhelp/scr/2686.htm

 

你贴出的代码没问题,请做一个出错的实例发上来测试。