| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 948 人关注过本帖
标题:[求助]关于主程序运行时发生的问题
只看楼主 加入收藏
duanxg
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2005-11-21
收藏
 问题点数:0 回复次数:1 
[求助]关于主程序运行时发生的问题

主程序代码:

set talk off
set escape off
set exclusive off
set help on
set console on
set date ansi
set century on
set safety off
set color to
set sysmenu off
set notify off


do form frmlogin
read events
on shutdown do quitall.prg

public bb,userset
do MENU.MPR

这样运行时没问题
但我后来有加了一个打开数据库的程序opendb.prg:
if not dbused("km")
open database km exclusive
endif
set database to km

if not used("tblusers")
use tblusers alias tblusers in 0
endif
select tblusers
set deleted on

if not used("bb")
use bb alias bb in 0
endif
select bb
set deleted on

然后把主程序改成:
set talk off
set escape off
set exclusive off
set help on
set console on
set date ansi
set century on
set safety off
set color to
set sysmenu off
set notify off

do opendb.prg
read events
do form frmlogin
read events
on shutdown do quitall.prg

public bb,userset
do MENU.MPR

结果运行就再也没正常过了
总是到不了系统登陆的界面
如果单运行主程序,他会显示opendb不存在
但他明明在项目里

我是参考一本8.0版本的书,但我用的是6.0
也不知道是不是这个因素

我现在就卡死在这了,请各位帮帮忙,感谢

搜索更多相关主题的帖子: set 主程序 off 数据库 prg 
2005-11-25 03:26
cuo
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2005-11-4
收藏
得分:0 
do opendb.prg
read events
do form frmlogin
read events
我不知道你为什么会用两个read events命令,把第一个删掉再试试
程序文件找不到可能是文件路径有误可用下面命令指定
set procedure to 程序文件路径

[此贴子已经被作者于2005-11-25 13:43:41编辑过]


2005-11-25 13:38
快速回复:[求助]关于主程序运行时发生的问题
数据加载中...
 
   



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

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