Question

用vb中的ado控件实现连接access数据库，直接利用ado对象实现学生信息的添加功能。 请详细的给出代码

用vb中的ado控件实现连接access数据库，直接利用ado对象实现学生信息的添加功能。
请详细给出怎么实现连接的和详细的代码。最主要的是前面连接的实现，测试连接成功但是代码不能用，错误时不存在ado对象

Answer 1

用相对路径比较好，避免移动文件后连接失败：

Private Sub Form_Load()
Me.Caption = "学生信息表"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\学生信息.mdb;Persist Security Info = False" ’表放到工程文件同目录下，如果在别处，可以改& App.Path & "\学生信息.mdb这一段。
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from 学生信息"
Set Text1.DataSource = Adodc1
Text1.DataField = "名称"
Set Text2.DataSource = Adodc1
Text2.DataField = "学号" ‘后面以此类推
End Sub