怎样在PB中实现文件的拷贝与删除

2024-07-21 02:10:18

字体：大中小

来源：转载

供稿：网友

怎样在pb中实现文件的拷贝与删除，可借助外部函数
可用api函数实现：
　　1、文件拷贝
　　函数声明：
　　function boolean copyfilea(ref string cfrom, ref string cto, boolean flag) library "kernel32.dll"
　　调用：
　　string ls_source, ls_des
　　boolean lb_flag, lb_rtn

　　lb_flag = false
　　ls_source = "c:/book.xls" //源文件
　　ls_des = "c:/tmp/111.xls" //目标文件
　　lb_rtn = copyfilea(ls_source, ls_des, lb_flag)
　　messagebox("文件拷贝", string(lb_rtn))
　　2、删除文件
　　函数声明：
　　function boolean deletefilea(ref string filename) library "kernel32.dll"
　　调用：
　　string ls_file
　　boolean lb_rtn
　　ls_file = "c:/tmp/111.xls"
　　lb_rtn = deletefilea(ls_file)
　　messagebox("文件删除", string(lb_rtn))
　　或者用pb本身的函数filedelete()来删除文件。

收集最实用的网页特效代码！

上一篇：pb实现打印中人民币大写

下一篇：如何在PB中调用 Microsoft WEB 浏览器控件？