为什么我的程序在别的机器上都能看到数据,只有一台机器绑定了以后(不报错)看不到数据?高手帮个忙,谢谢!
解决方案 »
- ado事件的作用
- 我要操作0——86400.000之间的数,定义什么类型的变量好?
- 请教两个窗体之间相互操作的问题?
- 代码:实现总在最前面的窗口。
- 如何实现与dbcombo的绑定(在线等候答者给分)
- 怎样替换UserControl的DragDrop事件,即把UserControl中的一个标准控件的DragDrop事件传出来代替默认的用户控件事件。
- 请高手帮忙:使用ADO对ACCESS数据库进行压缩、删除、重命名
- vb中的数据库问题
- VB如何获取系统剪切板内容
- 我已经做成了".chm"格式的帮助文档,在程序中怎样调用它呢?急,在线等待,解决了立即结算!!
- 这个数据串怎么提取?
- 怎么把byte数组转换成Unicode格式的字符串,vb的StrConv好像有问题?
数据已经绑定出来了,我用的一个查询结果,先绑定了datagrid,然后画图,图表上已经显示出图来,但datagrid里面就是没东西。
你试试吧,好用的
记得要引用ado
你只需要在工程/引用 miscrosoft Activex data objects 2.x library 就可以了
Dim Db As Connection
Dim WithEvents adoPrimaryRS As Recordset '数据库连接对象
Private Sub Command1_Click()
strsql="select 字段 from 表 where 你的条件"
Set Db = New Connection
Db.CursorLocation = adUseClient
'下面的连接数据字符串你要修改一下
Db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
Set adoPrimaryRS = New Recordset
adoPrimaryRS.Open strsql, Db, adOpenStatic, adLockOptimistic
Set DataGrid1.DataSource = adoPrimaryRS
end sub