Question

哪位大神可以给我一个VB连接access的代码啊，菜鸟一枚，最好是特别详细的，从建表开始。。在线等！

我有一个access2010，但我用的是VB6.0平台，一开始是直接在VB中点击外接程序建的数据表，但一直提示from子句有错误，想从新弄一个，哪位大神能帮帮忙啊，VB连接数据库啊，跪求，在线等！如调试成功，财富立马奉上！！

Answer 1

远程连接用ADO，本机连接用DAO
具体代码比较复杂，给你一段用ADO连接SQL数据库的作参考。
首先在”工程“菜单里引用ADO2.8

Dim MyConn As ADODB.Connection
Dim MyRecord As ADODB.Recordset
Dim Dbsource As String, DatabaseName As String, DbUserName As String, DbPassWord As String '定义数据库源,SQL服务器地址,数据库名，用户名,密码
'连接数据库
Set MyConn = New ADODB.Connection '定义一个新连接
MyConn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;UID=用户名;PWD=密码;Initial Catalog=数据库名;network address=数据库地址"
MyConn.ConnectionTimeout = 0
MyConn.Open ‘建立连接
Set MyRecord = New ADODB.Recordset '定义新记录集

MyRecord.ActiveConnection = MyConn ’与连接匹配
MyRecord.Source = "select * from 表名" ‘查询语句
MyRecord.CursorLocation = adUseClient
MyRecord.CursorType = adOpenKeyset
MyRecord.LockType = adLockOptimistic
MyRecord.Open ’建立记录集