adodc控件的问题

Question

set adodc.recordsource="sql语句”

Answer 1

看一看这段代码，是我调试过的
Dim Conn As ADODB.Connection
Dim Re As ADODB.Recordset
  
Set Conn = New ADODB.Connection
   Conn.Open "Provider=MSDAORA.1;Password=erpii;User ID=erpii;Data Source=erp;Persist Security Info=True"
   'Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\BIBLIO.MDB;Persist Security Info=False"
   Set Re = New ADODB.Recordset
   Re.CursorLocation = adUseClient
   strSql = "select * from tab1"
   Re.Open strSql, Conn, adOpenForwardOnly, adLockReadOnly, adCmdText
   Set HJ_Grid1.RecrsAdd = Re

Answer 2

使用SQL语句之前要先定义SQL，才不至于出错！