给一个标准写法,您看着自个改吧
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表格  

解决方案 »

  1.   

    我一般会这样用:....
    Dim oConnect As New ADODB.Connection
    Dim oRs As New ADODB.Recordset
    ....    
    ....
      

  2.   

    再有提醒你一点:oRs.Open "select * from username", oConnect, adOpenKeyset我一般会在 Tabel Name 前后加上中括号,即:oRs.Open "select * from [username]", oConnect, adOpenKeyset原因是如果你的表名与SQL保留字相同的话,那你就会打不开表,我不想记那么多
    字符是不是SQL的关键字,所以全部用中括号来表示。    
      

  3.   

    to  cnhchang(chang) 
         请问是哪一个控件to other
        :0 还是会出现那个错误。