请教,怎样读取和修改、创建文本文件中的内容。

ldf0531 2004-05-07 12:38:04
各位高手,本人想实现一个功能,即用户可以指定SQLSERVER服务器的地址。给用户提供一个菜单,用户可以选择设置服务器IP,根据用户指定的ip更新记录ip的文本文件的内容,然后在连接数据库的时候根据文本文件中的内容连接数据库。(用户不更改ip,则使用用户上次使用时使用的ip或者默认设置的ip)。请教各位高手,怎样在pb中判断文本文件是否存在,怎样建立、打开、修改、读取一个文本文件的内容?望不吝赐教。或者有相似的例子也好,谢谢。
...全文
76 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
jingerandy 2004-05-07
  • 打赏
  • 举报
回复
if FileExists("filename") then
messagebox("提示","文件存在")
else
messagebox("提示","文件不存在")
end if
//删除
FileDelete("filename")
//打开文件
integer fn
fn = FileOpen(FOR_STR,LineMode!, Write!, LockWrite!, Append!)
//响文件写入"write_str"
filewrite(fn,"write_str")
//关闭文件
fileclose(fn)
例子:
//gs_apppath为当前路径
if FileExists(gs_apppath+"\舱单\E"+ls_no+"A") then FileDelete(str_sys.gs_apppath+"\舱单\EA")
fn = FileOpen(gs_apppath+"\舱单\EA',LineMode!, Write!, LockWrite!, Append!)
filewrite(fn,'NEWCTEXT,IFC:ZH,CUSTOM;')
fileclose(fn)

sxyc24 2004-05-07
  • 打赏
  • 举报
回复
用SetProfileString()
klbt 2004-05-07
  • 打赏
  • 举报
回复
fileexists
fileopen
fileread
filewrite
filewrite
fileclose
......

1,072

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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