很奇怪的问题，代码没有任何问题。
在登陆输入密码后要求我自己选搜索密码用的表，无论我怎么联编都不能解决问题，为什么会出现这种情况啊。
真是伤脑经。

我确定我用于放用户名和密码的表就叫yonghu

这是确定按钮的keypress事件代码

on key label enter

hide window screen
*判断密码是否正确


i=i-1

locate all for alltrim(thisform.text1.value)==alltrim(yonghu.用户名)
DO CASE
CASE i>=1 and found() and alltrim(thisform.text2.value)==alltrim(yonghu.密码)
Do form .\main\程序主界面.scx
thisform.release

CASE i>=1 AND NOT FOUND()

MESSAGEBOX("密码错误,请重输!","警告")
THISFORM.Text1.Value=""
THISFORM.Text2.Value=""




CASE i=0
MESSAGEBOX("禁止进入系统!","警告")
THISFORM.Release
quit
ENDCASE

还有form1 的init事件代码


PUBLIC i &&i用于记录用户名及口令输入次数

i=3
THISFORM.Text1.Setfocus

select yonghu
i=i-1

locate all for alltrim(yonghu.用户名)==alltrim(thisform.text1.value)
DO CASE
CASE i>=1 and found() and alltrim(yonghu.密码)==alltrim(thisform.text2.value)
Do form .\main\程序主界面.scx
thisform.release

CASE i>=1 AND NOT FOUND()

MESSAGEBOX("密码错误,请重输!","警告")
THISFORM.Text1.Value=""
THISFORM.Text2.Value=""




CASE i=0
MESSAGEBOX("禁止进入系统!","警告")
THISFORM.Release
quit
ENDCASE
放在按钮的Click事件中

明白了

[此贴子已经被作者于2007-4-17 21:11:01编辑过]

不过郁闷的事出来了，提示说，”找不到别名yonhu“

在表单的数据环境中加载表
或者
在表单的load中
select 0
use yonghu
在表单的unload
use in yonghu

[此贴子已经被作者于2007-4-17 21:28:58编辑过]

输入密码那通过了，但是后面的还有问题，在点击打印的时候出现找不到数据库和表的问题，我改过数据库和数据表的名字，他提示的是找不到的是原来的数据表和数据库名字，是不是要设置什么才能改回来，

在数据环境里加载表是不是就是点数据环境，然后点添加就可以了，如果是这样，那我就全部都添加上了

打印按钮的click事件为
REPORT FORM .\baobiao\商品销售记录.frx PREVIEW

REPORT FORM .\baobiao\商品销售记录.frx PREVIEW
REPORT FORM . 为什么要有这个“.”？
去掉试试看

楼上的啊，应该是把.\都去掉吧?

是的，应该都去掉！
一时糊涂了

额，是我没有重新加载数据表的的原因，不过还是有问题，我准备重新再作个，已经作完了，忙了4天，可以交差了。



自从我给数据表改了名之后就出现了很多莫名其妙的问题，伤脑经啊。

[此贴子已经被作者于2007-4-18 22:51:20编辑过]