Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:复制图片到文件夹

1楼
yangwenghd 发表于:2024/7/15 9:59:00
For Each file As String In Tables("代销转换窗口_Table1").Current.DataRow.Lines("商品信息_窗口图片")
    Dim name As String = FileSys.GetName(file)
    Dim d As String = "代销窗口图片"
    If FileSys.DirectoryExists(Tables("代销转换窗口_Table2").Current("编辑信息_文件路径") & d) = False Then
        FileSys.CreateDirectory(Tables("代销转换窗口_Table2").Current("编辑信息_文件路径") & d)
    End If
    FileSys.CopyFile( file, Tables("代销转换窗口_Table4").Current("编辑信息_文件路径") & d & "\" & name)
Next '复制窗口图片到指定文件夹

老师们 可以帮忙看看这个吗?  没有看到有sourceFileName这个参数名呢 感谢 感谢 
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:窗口,代销转换窗口,Button16,Click
详细错误信息:
参数不能为 Nothing。
参数名: sourceFileName

2楼
有点蓝 发表于:2024/7/15 10:03:00
看看还是不是有空的名称
……
msgbox(file)
    FileSys.CopyFile( file, Tables("代销转换窗口_Table4").Current("编辑信息_文件路径") & d & "\" & name)
Next '复制窗口图片到指定文件夹
共2 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02197 s, 2 queries.