مرتضی حمزه ئی
شنبه 24 شهریور 1386, 10:29 صبح
در vb که با یک دیتابیس access کارمیکنم هنگام بازکردن recordset ودرخواست انجام یک عمل معمولی select با این مشکل method open of recordset failed برخورد کردم جالبه همین عمل را 10 جای دیگه انجام دادم ولی توی اینجا که دو تا رکوردست راباز میکنم این اتفاق میافتد البته دیتابیس را قبل از عمل روی رکوردست بعدی بستم ولی باز هم فایده ای نداره خواهش میکنم کمکم کنید
این هم تکه کدی است که روی اون error میده
Set rskol = New ADODB.Recordset
rskol.CursorLocation = adUseClient
rskol.Open "select serial,size from tblsize where serkind = " & code11 & "", clsDb.ConnectionStr, 3, 3
If rskol.RecordCount <> 0 Then
Call SetLstWithSequence(List2, rskol, 1, 0)
End If
این هم تکه کدی است که روی اون error میده
Set rskol = New ADODB.Recordset
rskol.CursorLocation = adUseClient
rskol.Open "select serial,size from tblsize where serkind = " & code11 & "", clsDb.ConnectionStr, 3, 3
If rskol.RecordCount <> 0 Then
Call SetLstWithSequence(List2, rskol, 1, 0)
End If