• 全部
  • API 调用
  • 基础类
  • 控件与界面
  • 数据库相关
  • DataWindow
  • 项目管理
  • Web 应用
  • 脚本语言

小问题 , 但很急。 不知是不是 PB 的 BUG !!!

K999 2002-04-25 08:21:56
用以下语句实现 “另存”

dw_1.SaveAs('c:\aaa.xls',Excel5!, true)

问题来了:

在程序未退出以前 , 打开该 aaa.xls 就没办法保存。 要退出后才行。

请问怎样才能让 PB 把这个文件的控制权“释放” ? 很急的 ~

之所以说是 PB 的 BUG ,是应为如果我这样做用 dw_1.SaveAs() 这种方法,同样只有一条语句。 这样就没问题。



...全文
9 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
nlpz 2002-04-25
创建: 2002年4月25日
修改:
版本: 1.0


???
专门写的吗 ?
回复
nlpz 2002-04-25
先谢谢 oceanaut(海儿)
我的程序,本来是和你写得一样的. 为了方便提问,我才减掉了其它的代码。
所以问题依旧。
请问你用的是 PB 几 ? 我用的是 6.51 。 试好多回了!
回复
oceanaut 2002-04-25
用另一种方法吧,很好用的,我就是这样用的:
/*****************************************************************
功能: 数据输出
逻辑: 将当前的数据记录备份
适用: 将数据表中的数据备份
编程: 海 洋
创建: 2002年4月25日
修改:
版本: 1.0
******************************************************************/
String ls_File, ls_Path, ls_Ext

GetFileSaveName("另存为", ls_Path, ls_File, "Excel", "Excel Files (*.xls),*.xls," + &
"Text Files (*.txt),*.txt,HTML Files (*.htm),*.htm")

If Trim(ls_Path) <> "" Then
ls_Ext = Lower(Right(ls_Path, 3))
Choose Case ls_Ext
Case "xls"
dw_master.SaveAs(ls_Path, Excel!,True)
Case "txt"
dw_master.SaveAs(ls_Path, Text!, True)
Case "htm"
dw_master.SaveAs(ls_Path, HTMLTable!, True)
Case Else
MessageBox("另存为...", "另存格式错误.格式应该" + & "是*.xls'为Excel!;'*.txt'为Text;'*.htm'为HTML Table", Exclamation!, OK!)
Return
End Choose
End if
去试试吧,应该没有问题的。
回复
佣工7001 2002-04-25
不会吧
回复
相关推荐
发帖
PowerBuilder
创建于2007-09-28

863

社区成员

PowerBuilder 相关问题讨论
申请成为版主
帖子事件
创建了帖子
2002-04-25 08:21
社区公告
暂无公告