set DataGrid1.DataSource = rs DataGrid1为什么时空的?

简介:
Set rs = New ADODB.Recordset
  rs.CursorLocation = adUseClient
  txtSQL = "select * from 采样点基本情况"
  Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,
  MsgBox rs.RecordCount
' rs.Open "select * from 采样点基本情况", cn, adOpenKeyset, adLockBatchOptimistic '连接
  Set DataGrid1.DataSource = rs

注:Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,验证也是成功的,rs不为空,为什么DataGrid1显示时空的?
回复次数: 4
#1楼 得分:0回复于:2007-12-07 19:53:32
可能是数据提供者不支持。
我也碰到这样的情况,最后我还是使用ADO绑定控件ADODC
如果是数据提供者不支持,RS.RECORDCOUNT返回将会是-1的值
你可以依据这去检测一下
#2楼 得分:0回复于:2007-12-08 00:36:39
FIELDS 不要先指定,或者指定正確的 FIELDS。
#3楼 得分:0回复于:2007-12-08 07:19:46
要在ExecuteSQL中指定rs.CursorLocation=adUseClient  
 
#4楼 得分:0回复于:2007-12-10 10:27:32
可以了,谢谢楼上的vbman2003 ,帮了大忙了哈
Set rs = New ADODB.Recordset
  rs.CursorLocation = adUseClient
  txtSQL = "select * from 采样点基本情况"
  Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,
  MsgBox rs.RecordCount
' rs.Open "select * from 采样点基本情况", cn, adOpenKeyset, adLockBatchOptimistic '连接
  Set DataGrid1.DataSource = rs

注:Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,验证也是成功的,rs不为空,为什么DataGrid1显示时空的?
回复次数: 4
#1楼 得分:0回复于:2007-12-07 19:53:32
可能是数据提供者不支持。
我也碰到这样的情况,最后我还是使用ADO绑定控件ADODC
如果是数据提供者不支持,RS.RECORDCOUNT返回将会是-1的值
你可以依据这去检测一下
#2楼 得分:0回复于:2007-12-08 00:36:39
FIELDS 不要先指定,或者指定正確的 FIELDS。
#3楼 得分:0回复于:2007-12-08 07:19:46
要在ExecuteSQL中指定rs.CursorLocation=adUseClient  
 
#4楼 得分:0回复于:2007-12-10 10:27:32
可以了,谢谢楼上的vbman2003 ,帮了大忙了哈
set DataGrid1.DataSource = rs DataGrid1为什么时空的?
 
要在ExecuteSQL中指定rs.CursorLocation=adUseClient  
 

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Form_Load()
  Me.Caption = "经手人管理"
  cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db_kfgl.mdb;Persist Security Info=False"
  
  
   Set rs = New ADODB.Recordset
   
   
    rs.CursorLocation = adUseClient
   
rs.Open "select * from kf", cn
 

        
        Set DataGrid1.DataSource = rs
  
  
  
End Sub

本文转自 bilinyee博客,原文链接:    http://blog.51cto.com/215363/1026890     如需转载请自行联系原作者       

相关文章
C#编程-70:dataGridView绑定数据源
C#编程-70:dataGridView绑定数据源
194 0
C#编程-21:DataGridview清空数据
C#编程-21:DataGridview清空数据
426 0
|
C++ Windows 容器
C++: DataGridView::DataSource
#pragma once #include "Form2.h" namespace cdemo { using namespace System; using namespace System::ComponentModel; using namespace System::Collections; using namespace System::Windows::Forms;
1341 0
|
JavaScript
dataTable 查询,重置
上源码 dataTable搜索function search(btn,grid) dataTable重置 /** * 公共js组件 @all **/ //公共设置默认图片地址: var commonImgAddress = "/assets/global/img/default.
1079 0
|
C# 数据库 移动开发
change datagridview column.headtext
动态change datagridview 某个列的值,最快的方法: this.FTContent.HeaderText = currentNodeText + ",议题列表"; 直接使用DataGridViewTextBoxColu...
764 0
datagridview设置某一列可写
    实践证明,在winform的窗体设计时,将datagridview.readonly=false;     或者在datagridview Edit Columns时设置某一列readonly=false都是没起多大作用的。
797 0
|
数据库
DataTable的AcceptChange方法为什么不能在Update之前?
本人转载http://www.cnblogs.com/telnet_mike/archive/2011/08/29/2159013.html 总结:DataTable.AcceptChanges相当于将DataTable表中的所有DataRow的RowState状态 重置为Unchanged  DataTable.
809 0