vb登录界面连接数据库,vb 连接数据库
求VB登陆窗口连接ACCESS数据库的代码
1、DimobjCnAsNewConnection,objRsAsNewRecordset
objCn.ConnectionString="Provider=Microsoft.Jet.OLEDB.3.51;""DataSource="App.PathobjCn.Open
2、dimobjCnAsConnection
SetobjCn=NewConnection
objCn.Open“DSN=实例2DSN”
3、ADOData控件创建连接
扩展资料
ACCESS数据库特性
1、access有强大的数据处理、统计分析能力，利用access的查询功能，可以方便地进行各类汇总、平均等统计。并可灵活设置统计的条件。
2、access用来开发软件，比如生产管理、销售管理、库存管理等各类企业管理软件，其最大的优点是：易学，非计算机专业的人员，也能学会。
3、在开发一些小型网站WEB应用程序时，用来存储数据。例如ASP+Access。这些应用程序都利用ASP技术在InternetInformationServices运行．比较复杂的WEB应用程序则使用PHP/MySQL或者ASP/MicrosoftSQLServer。
vb做登录界面怎么连接数据库
Private?Sub?Form_Load()????????'此段代码的主要作用是当窗体打开时就连接数据库
????Dim?conn?As?New?ADODB.Connection
????Dim?connectionstring?As?String
????connectionstring?=?"Provider=Microsoft.Jet.OLEDB.4.0;Data?Source="??App.Path??"\DATE.mdb;Persist?Security?Info=False"??????????'数据库路径
????conn.Open?connectionstring
End?Sub
Private?Sub?Command1_Click()
Static?n?As?Integer
If?n?=?3?Then
????MsgBox?"输入密码次数大于3次，不允许继续登陆"
????End
End?If
Set?conn?=?New?ADODB.Connection
conn.Open?"Provider=Microsoft.Jet.OLEDB.4.0;Persist?Security?Info=False;Data?Source=DATE.mdb;Jet?OLEDB:Database?Password="
Dim?sql?As?String
Dim?rs_login?As?New?ADODB.Recordset
If?Trim(Text1.Text)?=?""?Then???????????????'检测用户名正确与否
????MsgBox?"用户名不能为空，请重新输入！",?vbOKOnly?+?vbExclamation,?"错误"
????Text1.SetFocus
Else
????sql?=?"select?*?from?验证?WHERE?用户名='"??Trim(Text1.Text)??"'"
????rs_login.Open?sql,?conn,?adOpenKeyset,?adLockPessimistic
????If?rs_login.EOF?=?True?Then
????????MsgBox?"用户名不存在，请重新输入！",?vbOKOnly?+?vbExclamation,?"错误"
????????Text1?=?""
????????Text1.SetFocus
????Else????????????????????????????????????????'检测密码正确与否
????????If?Trim(rs_login.Fields(2))?=?Trim(Text2)?Then
????????????rs_login.Close
????????????Unload?Me
????????????Form2.Show
????????Else
????????????n?=?n?+?1
????????????MsgBox?"第"??n??"次密码错误，请重新输入！",?vbOKOnly?+?vbExclamation,?"错误"
????????????Text2.SetFocus
????????End?If
????End?If
End?If
End?Sub
Private?Sub?Command2_Click()
????MsgBox?"您已成功退出！",?vbOKOnly?+?vbExclamation,?"提示"
????Unload?Me
End?Sub
vb中如何设计登录界面怎么连接数据库
（1）新建数据库并命名为denglu，在该数据库中新建表User1,表包含的列为“ID,username,pwd”。
（2）设计登录界面Frmlogin，以及登录成功后要显示的界面Form2,并连接到数据库，使包含在数据库中的合法用户能成功登录该程序，而不合法用户则无法进入程序。