FileOpen打开文件存在占用情况

qq_37266145 2018-03-21 03:35:47
我用PB程序打开一个txt文件后,另一个程序打开这个txt时会提示文件被占用。
下面是代码,fileopen函数的最后一个参数是设置所有人可读写的。


INT LI_HANDLE = 0
STRING LS_TXT = ""
BOOLEAN LB_TF = TRUE
IF FILEEXISTS("config.txt") THEN
BEGINGOTO:
LI_HANDLE = FILEOPEN("config.txt",LINEMODE!,READ!,SHARED!)
FILESEEK(LI_HANDLE, 0, FromBeginning! )
FILEREAD(LI_HANDLE,LS_TXT)
FILECLOSE(LI_HANDLE)
IF UPPER(LS_TXT) = "TRUE" THEN
GOTO BEGINGOTO
ELSE
UO_S1.UO_CAD.OF_CAXA_PRINT()
END IF
ELSE

END IF
...全文
1135 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
r00_a2lBUR 2018-04-18
  • 打赏
  • 举报
回复
可能还有别的代码段是占用打开的

740

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 脚本语言
社区管理员
  • 脚本语言社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧