发信人: xiaqiang()
整理人: leitiger(2002-06-05 23:49:05), 站内信件
|
API调用-----简单文件拷贝
Original Message-----
发件人: xiehm <[email protected]>
收件人: [email protected] <[email protected]>
日期: 1999年6月17日 15:24
主题: help!
softboy:
您好，我是一个PowerBuilder 初学者，以前看到张健姿先生写的一篇文章
《PowerBuilder开发系列谈(20,21) 使用PowerBuilder另外的500个函数（中、下
）〉
按照“一个简单的文件拷贝例程“的要求，写下了wf_copy的全部代码，可是，当
我运行它的时候，却出现如下错误：
Title----'PowerBuilder Application Execution Error(R0014)'
Message---'Error:Error opening DLL library Lzexpand.dll for externel f
unction at line 4 of function wf_copy of object analyse_prg'
盼能告知原因，不胜感谢！
李立峰 [email protected] 1999.6.15
wf_copy 内容如下：（参数：string as_source，string as_dest）
ws_ofstruct的窗口级结构如下：byte[1] char,fixed_disk[1] char,
errorcode uint ,reserverd[4] char,pathname[128]
long ll_SourceFileHandle, ll_DestFileHandle, ll_result
ws_ofstruct lstr_SourceFileStructure, lstr_DestFileStructure
// 打 开 源 文 件
ll_SourceFileHandle=LZOpenFile(as_source,lstr_SourceFileStructure,0)
IF ll_SourceFileHandle = -1 THEN
MessageBox ( " 程 序 错 误", " 无 法 打 开 文 件: " + as_source )
Return FALSE
END IF
// 打 开 目 标 文 件
ll_DestFileHandle = LZOpenFile ( as_dest, lstr_DestFileStructure, 4096
)
IF ll_DestFileHandle = -1 THEN
MessageBox ( " 程 序 错 误", " 无 法 创 建 文 件: " + as_dest )
LZClose ( ll_SourceFileHandle )
Return FALSE
END IF
// 拷 贝
ll_result = CopyLZFile ( ll_SourceFileHandle, ll_DestFileHandle )
IF ll_result < 0 THEN
MessageBox (" 程 序 错 误"," 无 法 拷 贝 文 件: " + as_source + " to f
ile: " + as_dest )
LZClose ( ll_SourceFileHandle )
LZClose ( ll_DestFileHandle )
Return FALSE
END IF
// 关 闭 文 件
LZClose ( ll_SourceFileHandle )
LZClose ( ll_DestFileHandle )
Return TRUE
李立峰:
很高兴受到你的来信,因为星期天未上网,所以今日才回信.
来信所提的问题我想原因是16bit和32位的区别,以前的pb是16bit的,而现在版本
高些的pb是32bit.来信所提的wf_copy应在16位下运行,所以会出现error messag
e.(附32bit下运行代码)
在win32中,应调用copyfilea() 其申明如下:
function boolean copyfilea(string szexistringfile,string sznewfile,&
boolean bfail) libray "kernel32.dll"
EXAMPLE:
STRING SZSOURCE="C:\TMP\XQ01",SZDESTINATION="C:\TMP\XQ01.CPY"
boolean BFAIL=TRUE//MAKE THE COPY FAIL IF THE FILE ALREADY EXITS
COPYFILEA(SZSOURCE,SZDESTINATION,BFAIL)
其中BFAIL变量用来禁止覆盖一个已有的文件,true:禁止覆盖,false:反之.
信箱:[email protected]
主页名称:：《池州软件园》
主页地址： http://czsoft.yeah.net
本站寻求友情连接，如果您有主页欢迎和我交换链接
--
--广交天下朋友----
* * * * * * * * * * * * * * * *
*[软件下载][软件论坛][免费资源]*
*[搜索大全][pb--专栏][制作技巧]*
* * * * * * * * * * * * * * * *
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.102.203.61]
|
|