[VB.NET]datareader的问题!!!!!

大佬教程收集整理的这篇文章主要介绍了[VB.NET]datareader的问题!!!!!，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

datareader的问题!!!!! 我在一个类里的一个方法用到了datareader对象,并在方法结束前将他close了.可是我在用这个类建立了两个对象时,第二个对象在用到了这个方法时却总是提示:已有打开的与此命令相关联的 DataReader，必须首先将它关闭.如何解决啊!!! __________________________________________________________________________ 说明你同1个链接同时打开了2个datareader，必须先关闭1个datareader，要么就开第2个datareader的时候用个新的链接 __________________________________________________________________________ 1/ 我的连接是对象的一个属性,是在对象new时传递进去的.难道连接传递的是地址吗? 2/ 在我的类的方法里,在最后已经进行了close为什么还是不行呢? __________________________________________________________________________ 1/ 我的连接是对象的一个属性,是在对象new时传递进去的.难道连接传递的是地址吗? ----------------------- 你传的是同1个链接吧，你有没有new2次链接就知道了 2/ 在我的类的方法里,在最后已经进行了close为什么还是不行呢? -------------------------- 一起错误的原因是在你close之前就又开了1个DataReader。 PS:最好贴出你的代码看看 __________________________________________________________________________ 原码如下: Public Sub CongGouToDB(ByVal datetiR_595_11845@e As DatE) geshi = Split(my_meta1.FileFieldOrder,",") geshi1 = Split(my_meta1.attributeOrder,": ") geshi2 = Split(my_meta1.attributeOrder1,": ") zidonggeshi1 = Split(my_meta2.attributeOrder,": ") zidonggeshi2 = Split(my_meta2.attributeOrder1,": ") Dim mycommandstr As String Dim mycommand1 As SqlCommand Dim myreader3 As SqlDataReader Dim count As Boolean mycommandstr = "SELECT * FROM " + Trim(my_meta1.tableName) + " where StationID = '' " + Trim(my_meta1.stationID) + " '' and ObservDate= '' " + datetiR_595_11845@e.ToShortDateString + " ''and ObservTime= '' " + datetiR_595_11845@e.ToLongtimestring + " '';SELECT * FROM " + my_meta2.tablename + " where StationID = '' " + my_meta2.stationID + " '' and ObservDate= '' " + datetiR_595_11845@e.ToShortDateString + " ''and ObservTime= '' " + datetiR_595_11845@e.ToLongtimestring + " '' " mycommand1 = New SqlCommand(mycommandstr,myconnection) myreader3 = mycommand1.ExecuteReader() 这句是出错的地方!!!! count = myreader3.Read() Dim i,k,j As Integer For i = 0 To geshi2.Length - 1 k = CType(geshi2(i),Integer) j = CType(geshi1(i + 1),Integer) If count Then melement(k,0) = myreader3(j) Else melement(k,0) = DBNull.Value.ToString End If melement(k,1) = "0 " Next myreader3.NextResult() count = myreader3.Read() For i = 0 To zidonggeshi2.Length - 1 k = CType(zidonggeshi2(i),Integer) j = CType(zidonggeshi1(i + 1),1) = "0 " Next myreader3.Close() mycommand1.Dispose() End Sub 这是类里的一个方法> .. __________________________________________________________________________ 你前面1个方法了，调用CongGouToDB方法之前调用的方法. __________________________________________________________________________

大佬总结

以上是大佬教程为你收集整理的[VB.NET]datareader的问题!!!!!全部内容，希望文章能够帮你解决[VB.NET]datareader的问题!!!!!所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。