怎么开传奇私服如何能够正确的开启自己的传奇 详细介绍每个步骤 想自己开的朋友进来看看

求一个vb+的登录界面。。。写好的代码，要能够连接数据库判定密码是否正确的。我知道这样不太好，代码都是大家辛苦写成的，不过实在搞不定呀~~挠头挠头！！拜托各位高人了！！！

()。。。Open"=。Jet。。4。0;=C:\DocumentsandSettings\Administrator\MyDocuments\123。mdb;PersistSecurityInfo=False"IfTrim(Text1。Text)=""Then'判断...全部

PrivateSubCommand1_Click()DimconnAsNewADODB。ConnectionDimsqlAsStringDimrs_logAsNewADODB。

Recordsetconn。Open"Provider=Microsoft。Jet。OLEDB。4。0;DataSource=C:\DocumentsandSettings\Administrator\MyDocuments\123。

mdb;PersistSecurityInfo=False"IfTrim(Text1。Text)=""Then'判断输入的用户名是否为空MsgBox"用户名不能为空！",vbOKOnly+vbExclamation,""Text1。

SetFocusElsesql="select*from用户信息whereID='"&Text1。Text&"'"rs_log。Opensql,conn,adOpenKeyset,adLockPessimisticIfrs_log。

EOF=TrueThenMsgBox"用户或密码错误!!!",vbOKOnly+vbExclamation,""Text1。SetFocusElse'检验密码是否正确用户名和密码通过后，要关闭本窗体并打开主窗体。

IfTrim(rs_log。Fields(1))=Trim(Text2。Text)ThenuserID=Text1。Textuserpow=rs_log。Fields(1)rs_log。

CloseUnloadMemain。ShowElseMsgBox"密码不正确",vbOKOnly+vbExclamation,""Text2。

SetFocusEndIfEndIfEndIf'只能输入3次cnt=cnt+1Ifcnt=3ThenUnloadMeEndIfExitSubEndSub。收起