小问题 在线等

[烈火焚身]

假如数据库中有这样的一个字段filepath
它的值类似这种形式\\192.168.0.10\sc\bb\0016.word、\\192.168.0.10\eii\bn\0016.word
即0016.word这个文件在服务器上的路径，并且每条记录
的路径可以相同，也可以不同。我想通过access下编程实现
将文件拷贝下来。并且建立相应的文件夹。
请问应该怎么实现？？？
在线等......

[烈火焚身]

还是有点问题
为什么我这样写就无法完成?
fso.CopyFile "\\192.168.0.11\0001.pdf", "E:\2007D"
说没有权限?我的操作系统是2003
而这样写就可以完全实现?
fso.CopyFile "\\192.168.0.11\0001.pdf", "E:\"

[wwwwb]

E:\2007D　目录是否存在？有无读写权限？

[烈火焚身]

谢谢了
可以了
就是因为少加了一个"\"
fso.CopyFile "\\192.168.0.11\0001.pdf", "E:\2007D\"
马上给分
再次表示感谢

[wwwwb]

格式固定才行，查找\\开头，.word结束的字符串，用INSTR、MID、LEFT、RIGHT等等函数

[烈火焚身]

谢谢楼主.
格式是固定的

[liuyann]

将文件拷贝下来。并且建立相应的文件夹。

用VBA就行了，任何一个OFFICE产品都可以。

==== 思想重于技巧 ====

reply via CSDN viewer

[wwwwb]

另外一个简单方法，用SPLIT
DD=SPLIT("\\192.168.0.10\sc\bb\0016.word、\\192.168.0.10\eii\bn\0016.word ","、")
For i1 = LBound(DD) To UBound(DD) - 1
MSGBOX DD(I1)
NEXT

[liuyann]

将文件拷贝下来。并且建立相应的文件夹。

建立相应的文件夹 MkDir 语句
文件拷贝 FileCopy 语句

用ADO打开你的记录集，然后mkdir, filecopy 就行了。

==== 思想重于技巧 ====

reply via CSDN viewer

[liuyann]

推荐帮助

ACCESS 2003 Help 下载
VBA参考 下载
Access VBA 参考下载
JET SQL HELP 下载
DAO 3.6 Manual　下载
ActiveX Data Objects 2.5 Reference 下载

==== 思想重于技巧 ====

reply via CSDN viewer

[烈火焚身]

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "\\192.168.0.10\sc\bb\0016.word", "e:\"
这样的语句可以实现么?
帮改一下

[liuyann]

[Quote]Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "\\192.168.0.10\sc\bb\0016.word", "e:\"
这样的语句可以实现么?
帮改一下[/Quote]

MkDir "e:\sc\bb"
FileCopy "\\192.168.0.10\sc\bb\0016.word", "e:\sc\bb\0016.word"

==== 思想重于技巧 ====

reply via CSDN viewer

[烈火焚身]

fso.CopyFile "\\192.168.0.10\sc\bb\0016.word", "e:\"
这样好象是不可以吧?
我是刚刚学
呵呵

[wwwwb]

只要有权限，是可以的

[烈火焚身]

好象是可以的
我看看去
如果成功
马上给分
谢谢了