Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]图片


  共有3197人关注过本帖树形打印复制链接

主题：[求助]图片
帅哥哟，离线，有人找我吗？
有点蓝
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/29 15:26:00 [显示全部帖子]

对比看自己的代码，就是复制后用FileSys.FileExists再判断一次

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/29 17:48:00 [显示全部帖子]

21楼黄色内容改为20楼代码
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/29 20:35:00 [显示全部帖子]

For Each s As String In e.DataRow.Lines("piao据原件")
    If FileSys.FileExists(path & "\" & s) Then
        FileSys.CopyFile(path & "\" & s, path2 & "\" & s, True)
        If FileSys.FileExists(path2 & "\" & s) = False Then
            msgbox("复制失败")
        End If
    End If
Next
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/30 9:32:00 [显示全部帖子]

想核对什么？核对InputValue的值和列的值是否一致？还是说判断日期列必须输入内容？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/30 10:18:00 [显示全部帖子]

参考16楼

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/30 15:11:00 [显示全部帖子]

Dim dri As Date = Date.Today
If InputValue(dri, "付款文件","请输入日期:") Then
    Tables("表A").current("日期") = dri
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107896 积分：548849 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/30 16:40:00 [显示全部帖子]

不建议使用这种模式，不断弹出输入框，用户比较反感的。何况用户想临时取消不操作了还取消不了。

应该像16楼一样，判断有空值的就提示用户，然后取消不去执行其它的操作。只有完全符合条件才执行后面的操作
 回到顶部
总数 18 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询