[求助]开发网络版软件用VB如何的连接ACCESS数据库
[求助]开发网络版软件用VB如何的连接ACCESS数据库
请各位大虾指教!!!!!
首先工程->引用 "microsoft activex data object 2.7 library" Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim i As Integer, s As String conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & "DBQ=" & App.Path & "\db1.mdb"
Set rs = conn.Execute("select * from userinfo") 'rs.Open "userinfo", conn While Not rs.EOF s = "" For i = 0 To rs.Fields.Count - 1 s = s & rs(i) & " " Next s = s & vbCrLf Text1.Text = Text1.Text + s rs.MoveNext 也是刚学的