■如何用代码连接到 access 数据 通过 sql 查询 将结果返回到 datagrid 中？（在线等待……）

Question

■如何用代码连接到 access 数据 通过 sql语句 查询 将结果返回到 datagrid 中？（在线等待……）■我不希望使用 ado 控件！■我希望不需要打包安装就能在其他机器上运行！■实在是要打包，我希望包尽量的小，必如小于1M！■如果 vb 不能实现，那么用什么软件可以实现上述简单功能，又不需要安装，切生成文件最小？

Answer 1

Dim cn As New ADODB.Connection
Dim rs   As New ADODB.Recordset
Dim sql   As Stringsql = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"cn.Open sql   
rs.CursorLocation = adUseClient
rs.LockType = adLockBatchOptimistic
rs.Open "SELECT * FROM 表", cn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
DataGrid1.Refresh

Answer 2

Dim cn As New ADODB.Connection为何提示用户定义类型未定义？

Answer 3

工程--引用--Microsoft ActiveX Data Objects 2.x Library

Answer 4

我已经编译在  http://www.wsqcn.com/vbym.zip可否看看在无vb环境是否能运行

Answer 5

起码datagrid控件应该拷贝到无vb环境的机子的系统目录下

Answer 6

既然引用了ado，此程序运行的环境里必须有ado控件，否则，无法运行！！