Dim rsNew As ADODB.Recordset
Set rsNew = New ADODB.Recordset
rsNew.Open "select * from table1", cn
Set VSFlexGrid.DataSource = rsNew
rsNew.Close
Set rsNew = Nothing此时只显示前面的100来行,不能完全显示(共有纪录1万多条),但是确实有那么多行,后面的那些行的内容都是空白
反复试验,发现当我去掉rsNew.close这句时可以正常显示,请问这是为什么?
另外,如果我不close 而只是set rsNew=Nothing会不会有影响?(内存没释放干净等)
Set rsNew = New ADODB.Recordset
rsNew.Open "select * from table1", cn
Set VSFlexGrid.DataSource = rsNew
rsNew.Close
Set rsNew = Nothing此时只显示前面的100来行,不能完全显示(共有纪录1万多条),但是确实有那么多行,后面的那些行的内容都是空白
反复试验,发现当我去掉rsNew.close这句时可以正常显示,请问这是为什么?
另外,如果我不close 而只是set rsNew=Nothing会不会有影响?(内存没释放干净等)
解决方案 »
- AOD的recordset.sort对字符串排序的用法
- 遇到一个小问题,查了很多资料都没有找到,能帮我解决么?
- 请问当客户断连接服断时怎么样用progressbar控件来显示进程
- 请问一下在VB下点菜单调出自己的帮助文件HELP.CHM ,怎么写这调用语句?
- 救命呀,超市收银系统的票据打印怎么样才能要多长就打多长?
- 請問在vb中怎樣實現不同分辯率可以自適應大小﹖﹖﹖
- 如何在运行时替换控件?
- VBA高手请进:如何在一个工程中调用加载宏中的函数?
- 能使键盘的"window"键或"Ctrl+Esc"无效吗?
- 怎样在vb6中使用数据库文件
- 怎样把一个纪录集中几个特定的字段绑定到DataGrid中去?
- 请教一个删除记录的问题憋两个星期了快救命啊(就这点分了)
将rsNew.close掉就没事了
另外可以用vsflexgrid的clip属性结合rs的getstring方法来替换这种做法vs.clip=rs.getstring