我在代码中写ADO控件的连接代码,下面代码哪出了问题,为什么数据库没打开??? Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=crm;Data Source=ZHUYAN"
Adodc1.RecordSource = "select * from custom"
Adodc1.RecordSource = "select * from custom"
解决方案 »
- 怎样获取USB转串口设备的串口端口号
- VB定义数组大小问题 Dim ptArr(0 To 4 * nDrawNo) As Double
- 在 toolbar 中,如何在点 Button 对象时,就显示该 Button 对象对应的下拉菜单 ButtonMenu ??
- 如何改变listView控件里面items的颜色?
- 关于使用winsock发送带附件的邮件的问题.
- 请问如何把ado中的记录集给DataGrid1显示出来?我该如何做?(初学者)
- text控件的datasource属性出现“这个数据源不支持dataformat属性”,在线请求。
- 如何再VB中使用其他工具,如ZIP,如何实现自动将文件达成压缩包
- 数据库程序设计想到的问题。ADO对象,控件什么合适??怎么样打开最合适。
- 各位老鸟不会见我这个菜鸟死而不救吧!!!
- 怎么实现类似QQ的菜单,即控制菜单弹出的方向,向上和向左弹出?
- win API函数的区别(win xp 和win 2000)高难度!!
Adodc1.RecordSource = "select * from custom"
'=================添加
adodc1.refresh
'===================
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=crm;Data Source=ZHUYAN"
Adodc1.RecordSource = "select * from custom"
Adodc1.Refresh设置好ADO控件的连接后要将ADO控件刷新一下。
Public adoCnn As New ADODB.Connection
Public adoRec As New ADODB.RecordsetadoCnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Autodata.mdb;Persist Security Info=False"
之后如果要打开某表(TB_KH):
adoRec.Open "select * from [tb_kh] ", adoCnn, 3, 2