(高分!!!!)VF 表单程序设计

来源：百度知道 编辑：UC知道 时间：2024/05/11 05:13:07
设计一个简单的登陆界面,就像QQ那样?用户名和密码以明文方式保存在一个表中,那个登陆按牛的代码怎么写呀?是不是用SELECT语句?
那个SELECT怎么样把结果返回给程序?
谢谢各位大虾,我VB还学的可以,就是对中东东不怎么行.
把那个SELECT语句写出来就是了

SELECT authdbf
LOCAL cname
cname=thisform.text1.Value
cpsd=thisform.text2.Value
IF EMPTY(cname).or.empty(cpsd)
MESSAGEBOX("用户名或密码不能为空，请重新输入",48,"系统提示")
thisform.text1.Value=""
thisform.text2.Value=""
thisform.text2.SetFocus
ELSE
go top
LOCATE for ALLTRIM(cname)=ALLTRIM(name)
SET EXACT ON
IF !FOUND()
MESSAGEBOX("用户不存在",46,"系统提示")
thisform.text1.Value=""
thisform.text2.Value=""
thisform.text2.SetFocus
ELSE
IF ALLTRIM(authdbf.psd)!=cpsd
cn=cn+1
nanswer=MESSAGEBOX("密码不正确,继续输入或退出？",4+32,"系统提示")
do case
CASE nanswer=6
thisform.text1.Value=""
thisform.text2.value=""
CASE nanswer=7
CLEAR EVENTS
QUIT
ENDCASE
thisform.text2.setfoc