Foxtable(狐表)用户栏目专家坐堂 → [求助]同一代码有的电脑可以正常执行,有的报错是什么原因


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

主题:[求助]同一代码有的电脑可以正常执行,有的报错是什么原因

帅哥哟,离线,有人找我吗?
happy_gile
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:348 积分:3553 威望:0 精华:0 注册:2015/8/16 19:06:00
[求助]同一代码有的电脑可以正常执行,有的报错是什么原因  发帖心情 Post By:2019/9/4 15:28:00 [只看该作者]

    Dim ex135 As New Exporter
    ex135.SourceTableName = "C135" '指定导出表
    ex135.FilePath = "c:\DATA\" '指定目标文件路径
    ex135.Format = "Delimited" '导出格式为符号分割的文本文件
    ex135.NewTableName = "C135" '指定文件名,注意无须扩展名
    ex135.Header = False
    ex135.Export() '开始导出
    Dim str135 As String = filesys.readalltext("c:\data\C135.txt",encoding.default)
    str135 = str135.replace("""","")
    filesys.writealltext("c:\data\C135.txt",str135,False,encoding.default)
有的电脑可以正常执行,有的电脑报以下错误,系统都是WinXP


图片点击可在新窗口打开查看此主题相关图片如下:b41f0483db46446da476823882b7fc1320190904135660670.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 15:38:00 [只看该作者]

这些电脑是不是不存在“c:\data”这个文件夹?

 回到顶部
帅哥哟,离线,有人找我吗?
happy_gile
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:348 积分:3553 威望:0 精华:0 注册:2015/8/16 19:06:00
  发帖心情 Post By:2019/9/4 15:40:00 [只看该作者]

存在
之前有一行代码
If FileSys.DirectoryExists("C:\data") = False Then
    FileSys.CreateDirectory("C:\data")
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 15:45:00 [只看该作者]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

看是那一句代码出错

 回到顶部
帅哥哟,离线,有人找我吗?
happy_gile
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:348 积分:3553 威望:0 精华:0 注册:2015/8/16 19:06:00
  发帖心情 Post By:2019/9/4 15:50:00 [只看该作者]

要是代码出错了,应该所有电脑都报错呀

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 16:19:00 [只看该作者]

不要纠结这些东西,解决问题才是主要的

 回到顶部