关于文件复制的问题？
--------------------编程问答-------------------- 直接用API函数CopyFile()即可。至于定位c.txt可以搜索，用FindFirstFile --------------------编程问答-------------------- 本人菜鸟 看不懂啊 --------------------编程问答-------------------- 去MSDN搜索这两个函数，通过文档就可以学会使用。VB里调用API需要先声名。 --------------------编程问答-------------------- 既然已知是"根目录中的一个文件夹中的文件",那么就是说,要替换的目录结构是已知的,那就只需要循环组合一个盘符就行了.
private function ReplaceFile(byval FileA as string,byval FileB as string) as boolean
dim I as long,sTmp as string
ReplaceFile=false
for i=99 to 122 'c - z
stmp=dir(chr(i) & ":\" & filea)
select case stmp
case ".",".."
case else
kill chr(i) & ":\" & filea
filecopy fileb,chr(i) & ":\" & filea
ReplaceFile=true
exit for
end select
next
end function
调用:
msgbox ReplaceFile("234\123.txt", "g:\11.txt")第一个参数是"目录\文件名"格式,第二个参数直接就是一个文件的全路径.
代码应该没问题,如果有问题自己调试一下吧.
补充：VB , 基础类
