以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  输出二进制文件到选定文件失败  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177727)
--  作者：phoebe-fdk
--  发布时间：2022/6/1 9:19:00
--  输出二进制文件到选定文件失败
Dim f As String 
f = "[项目名称] = \'" & nd.ParentNode.Name & "\' and [ID] = \'" & nd.Name & "\'"
Dim dr As DataRow
dr = DataTables("1").Find(f)
dt.Save()
 If dr IsNot Nothing Then 
\'\'1 Dim fl As String = ProjectPath & "\\" & dr("原始文件名称") 
2       Dim fl As String = Ex_Path & "\\" &  dr("原始文件名称") 
messagebox.show(fl)
messagebox.show(dr.SQLLoadFile("原始文件",fl))

\'代码\'1 
fl  运行结果：
G:\\FoxTable\\相对重力测量数据管理与数据处理系统\\相对重力测量数据管理与数据处理系统\\0508.txt
08.txt08-1a_1m.txt0508-1a_1m.txt0508-1a_1m.txt508-1a_1m.txt0508-1a_1m.txt0508-1a_1m.txt
dr.SQLLoadFile("原始文件",fl)) 运行结果：
  True

2 代码运行结果
fl  运行结果：
C:\\Users\\fdk\\Desktop\\新建文件夹\\0508.txt

dr.SQLLoadFile("原始文件",fl)) 运行结果： 
提示：未将对象引用设置到对象的实例
false

老师，为什么在提取二进制列文件时，输出到选定文件夹会失败呢，提取系统文件目录又是正常的，是有这个规定吗
--  作者：有点蓝
--  发布时间：2022/6/1 10:24:00
--  
【C:\\Users\\fdk\\Desktop\\新建文件夹\\】这个文件夹存在吗？不存在需要先创建目录

放到D盘试试。一般情况下建议不要把文件放到C盘、我的文档、桌面这些地方，一些系统可能因为权限不足无法使用
--  作者：phoebe-fdk
--  发布时间：2022/6/1 11:01:00
--  回复：（有点蓝）【C:\Users\fdk\Desktop\新建文件夹\...
谢谢老师，是目录的问题，非常感谢