然后,执行程序时,在那里报错。这是怎么回事?

解决方案 »

  1.   

    .NET已经不用set了,对象直接用=就行了
      

  2.   

    可是,在那里报错又是怎么一回事?Dim Rs As New ADODB.Recordset
            Dim Conn As New ADODB.Connection        Dim strConn As String
            strConn = "Provider=msdaora;user id=sportscn;data source=INFOTEST;password=72wxy43;Persist security info=False"
            ' 使用客户端数据游标
            Conn.CursorLocation = ADODB.CursorLocationEnum.adUseClient        ' 打开Access的连接
            Conn.Open(strConn)        ' 如果RecordSet的状态不是关闭状态,则关闭Recordset
            If Rs.State <> ADODB.ObjectStateEnum.adStateClosed Then Rs.Close()        Rs.Open("Select * from ODDS_MAIN", Conn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)        ' 绑定进DataGrid
            DataGrid1.DataSource = Rs   // 在此处报错
      

  3.   

    改成 DataGrid1.DataSource = Rs.DataSource 后,仍然报一样的错啊。
      

  4.   

    datagrid1.datasource=rs.recordset
    试试这句