选中odbcdataadapter,在属性窗口中选择selectcommand,展开,选择connection,在下拉框中选择“新建”,在弹出的窗口中选择computer database页,选中想要得odbcdatasource.选择command text,点击旁边的“省略号按钮”,在弹出的窗口中输入sql语句。如果sql语句中有条件参数,要用“问号?”代替。如:select user,name from table where user = ? .并且需要选择parameters,点击旁边的“省略号按钮”,在弹出的窗口中选择“增加”,就增加了一个参数。在旁边的属性框中修改参数的属性。odbctype 为参数对应字段的类型,sourcecolumn为参数对应字段名。parametername为参数名,这里为param1。
下面进入代码页,手工修改代码。
在配置odbcdataadapter的时候,新建连接后,有一个连接控件生成显示,名字是odbcconnection,在数据库连接的时候先要把它打开。用语句me.odbcconnection1.open(),用完要关掉,me.odbcconnection1.close()。
数据查询出来,可以放到一个相当于记录集的地方,这里用语句
dim odr1 as system.data.odbc.odbcdatareader 定义变量odr1来存放。
刚才说了,查询有参数的话,现在要把从界面上获取的实际的值传给参数,用语句
me.odbcselectcommand2.parameters("param1").value = me.textbox1.text
注意,这里是odbcselectcommand,而不是odbcdataadapter2.selectcommand。
然后执行下面的语句得到记录集
odr1 = me.odbcdataadapter2.selectcommand.executereader()
判断记录集是不是为空,不为空就通过odr1("字段名")读取记录集中的数据
if odr1.hasrows then
while odr1.read()
name = odr1("name")
user = odr1("user")
end while
odr1.close()
end if
文章整理:站长天空 网址:http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




