如何使用ADODC1制作登录界面
如何使用ADODC1制作登录界面?
我后台用的是SQL2000数据库.表名是admin,字段是userid和password,对应的控件是EDIT1和EDIT2
代码怎么写啊?
[解决办法]
晕呀，多看书吧
if trim(text1.text) <> " " and trim(text2.text) <> " " then
adodc1.recordsource= "select * from admin where user= ' "+trim(text1.text)+ " ' and passwoed= ' "+trim(text2.text)+ " ' "
adodc1.refresh
if adodc1.recordset.recordcont=1 then
frmmain.show
else
msgbox( "错误的用户密码！ ")
end if
else
msgbox( "请输入用户密码！ ")
end if
------------------------------
企业建站100元，300元全包！ 100个源码：www.sun883.com http://shop.paipai.com/290314963
