给一个标准写法,您看着自个改吧
Dim xiaoshou As New ADODB.Recordset '定义ADO
g_dbname="d:\cmis\sale.mdb"
strconnect = "User ID=Admin;Password=;Data Source=" & g_dbname & _
";Provider=Microsoft.Jet.OLEDB.3.51"'ado方式打开数据库
sql$ = "SELECT * from 临时销售表 "
xiaoshoumx.Open sql$, strconnect, adOpenKeyset, adLockOptimistic, adCmdText
Set datamx.Recordset = xiaoshoumx 'DATAMX为一ADO控件
Set grid_main.DataSource = datamx '把DATAMX绑定到GRID_MAIN表格
Dim xiaoshou As New ADODB.Recordset '定义ADO
g_dbname="d:\cmis\sale.mdb"
strconnect = "User ID=Admin;Password=;Data Source=" & g_dbname & _
";Provider=Microsoft.Jet.OLEDB.3.51"'ado方式打开数据库
sql$ = "SELECT * from 临时销售表 "
xiaoshoumx.Open sql$, strconnect, adOpenKeyset, adLockOptimistic, adCmdText
Set datamx.Recordset = xiaoshoumx 'DATAMX为一ADO控件
Set grid_main.DataSource = datamx '把DATAMX绑定到GRID_MAIN表格
解决方案 »
- win7下 MSWLESS.OCX 能注册成功但是运行软件的时候依然报错
- HttpSendRequest的问题!?!超级 ~~急啊!
- VBA中如何使用COM组件的方式
- 这个问题好奇怪啊!关于sql语句的问题
- 功能强大的通用组件库(封装了大量实用的 API)
- 谁有true dbgrid pro的注册码
- Visual Basic宣告死亡?真的还是假的?---我们该如何是好!!??
- 哪位好人能给我提供一份SENDMESSAGE的API常数列表,带中文说明。谢谢了收到后给100分。
- 如何在拖动的对象上保留指针?(当然Object.dragicon=none时,只有一个带指针的空方框?而如果设dragicon属性值的话,只有图形没有指针。)
- 大神求指导!vb写的代码,运行出错48,加载dll文件有错误
- 如何将txt文件中的字符,读到字符串中。
- 请问这个申明是什么意思??谢谢
Dim oConnect As New ADODB.Connection
Dim oRs As New ADODB.Recordset
....
....
字符是不是SQL的关键字,所以全部用中括号来表示。
请问是哪一个控件to other
:0 还是会出现那个错误。