| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1355 人关注过本帖
标题:如何设置独占方式打开?
只看楼主 加入收藏
f66h66
Rank: 1
等 级:新手上路
帖 子:29
专家分:0
注 册:2005-3-29
收藏
 问题点数:0 回复次数:2 
如何设置独占方式打开?

我的一个表单,有记录删除按钮,它的click事件如下: if reccount()<1 return &&在无记录时直接返回 endif if messagebox("是否删除当前记录",36,"材料性质管理")=6 &&选择删除记录 nrecno=recno() &&记录当前记录编号 delete &&对记录作删除标记 pack &&彻底删除当前记录 *使被删除记录的下一条记录成为当前记录 if reccount()<=1 go top else if nrecno=reccount()+1 go bottom else go nrecno endif endif thisform.refresh endif

执行表单时提示:必须以独占方式打开; 请问:如何设置?谢谢

别处挂起时光标停在PACK语句处。

[此贴子已经被作者于2005-8-24 8:43:12编辑过]

搜索更多相关主题的帖子: endif 独占 reccount nrecno 
2005-08-24 08:32
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 
如果是用表单的数据环境打开的数据表:可将数据表的属性exclusive改为.t.

如果是用命令:使用 "use 数据表名 exclusive" 即可

2005-08-24 10:38
f66h66
Rank: 1
等 级:新手上路
帖 子:29
专家分:0
注 册:2005-3-29
收藏
得分:0 
谢谢

[此贴子已经被作者于2005-8-24 14:16:48编辑过]


2005-08-24 13:00
快速回复:如何设置独占方式打开?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014448 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved