在vb中,使用ado对象进行连接sql数据库library,在数据库中有customer表,
在前台实现在textbox中输入客户号(cus_id),搜索出这个客户的所有记录,表现
在datagrid中. 小弟不知道ado的的datasource应该等于什么.大家看下面的程序dim cnn as adodb.connection
dim rs as adodb.recordsetPrivate Sub Form_Load()
set cnn=new connection
cnn.connectionstring="....."
cnn.open
set rs =new recordset
rs.open "select * from customer", cnn
set datagrid1.datasource=rs
End Sub这段代码有错吗?为什么在运行的时候老提示我"7004 错误, this is not bookmakable"?有好人愿意给一段的完整的代码?昨天我也上来问了,可大家支的招都不怎么好使,
也不知是怎么的.大家多来指点一下好?我急着用,谢谢大家了~~~
在前台实现在textbox中输入客户号(cus_id),搜索出这个客户的所有记录,表现
在datagrid中. 小弟不知道ado的的datasource应该等于什么.大家看下面的程序dim cnn as adodb.connection
dim rs as adodb.recordsetPrivate Sub Form_Load()
set cnn=new connection
cnn.connectionstring="....."
cnn.open
set rs =new recordset
rs.open "select * from customer", cnn
set datagrid1.datasource=rs
End Sub这段代码有错吗?为什么在运行的时候老提示我"7004 错误, this is not bookmakable"?有好人愿意给一段的完整的代码?昨天我也上来问了,可大家支的招都不怎么好使,
也不知是怎么的.大家多来指点一下好?我急着用,谢谢大家了~~~
解决方案 »
- vb与sql的问题
- VSFlexGrid 如何隐藏列头和行头?
- VB实现XML字符串转化为ADO数据流
- 求肋电脑高手
- 请教一下关于textbox的width的问题(想实现像网页上的单行滚动效果,但字多了,后面字看不见了)
- 请大家讨论XP式按钮的编制
- 超级简单,请问,for的语法格式是什么样?谢谢。
- ★★★★★★怎样用文本框实现货币数据输入★★★★★★
- VB报表DataReport高手们请进了!!小生告急.............(搞不定,不能睡觉啊!)
- 我在一台机器(win2000)上用vba写了一个宏用了ADO(2。5)可以正常运行,但是在另一台上面(win98)报告连接出错,已经将2000上的ADO对象库考到98上不行;又在2000上安VB6后重新引用ADO2.0并保存,还是不行。应如何处理??
- 问一个有关数据的册除:在做食堂的消费管理时,如果退卡后要不要把这个物理卡号和卡号从“发卡表”中删除呢??
- 如何搜索局域网的计算机
返回或设置一个数据源,通过该数据源,数据使用者被绑定到一个数据库。语法object.DataSource [=datasource]DataSource 属性的语法由如下部分:部分 描述
object 一个对象表达式,其值为“应用于”列表中的一个对象。
datasource 一个对象引用,作为一个数据源限定。包括ADO Recordset 对象,以及定义为类或用户控件(DataSourceBehavior 属性 = vbDataSource)。
说明使用 Set 语句设置 DataSource,如下所示:Set Text1.DataSource = ADODC1注意 两个旧的控件,Data 控件和 RemoteData 控件,可以作为数据源使用,然而,您不能在运行时将另一个控件或对象的DataSource 属性设置为这两个控件之一。例如,下列代码将会失败:Set Text1.DataSource = Data1 ' 将会失败!您不能在运行时将DataSource
' 设置为一个内部 Data 控件。要将 Data 控件或 RemoteData 控件之一作为数据源使用,您只能在设计时设置绑定控件的 DataSource 属性。
我是想用ado对象实现,那该怎么办呢?
dim rs as adodb.recordsetPrivate Sub Form_Load()
set cnn=new adodb.connection
set rs =new adodb.recordset
cnn.connectionstring="....."
cnn.open
rs.open "select * from customer", cnn,adOpenStatic, adLockReadOnly
set datagrid1.datasource=rs
End Sub
可能是datagrid控件和一般的数据删格控件不同的原因.