用vb.net试用vb数据库程序,结果写:"Set DataGrid1.DataSource = Rs",一保存“Set”就被自动清除了 然后,执行程序时,在那里报错。这是怎么回事? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 .NET已经不用set了,对象直接用=就行了 可是,在那里报错又是怎么一回事?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 // 在此处报错 改成 DataGrid1.DataSource = Rs.DataSource 后,仍然报一样的错啊。 datagrid1.datasource=rs.recordset试试这句 为什么数据库中【价格】字段(文本型)是空的,ISNULL(rs.fields("价格"))的结果却是FALSE 高手们,使用WINSOCK进行服务端和客户端的连接。为何在学校里两台电脑可以联机,换做学校里和学校外连接就失败? 数据顺序的问题 100分求解网页图象保存方法! 窗体 如何写一个视频、语音聊天服务器? SQL问题,高手帮忙 特急!!一个关于SQL语句的问题,在线等待!!200分相赠!解决后马上结 白送99分,不错吧? Property Get\Let\Set的深层含义,及VB中*号的用法 如何生成安装文件 如何修改注册表设置代理?
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 // 在此处报错
试试这句