شمارش رکوردها

[hani bageri]

سلام
برنامه من به adodc وصله،می خوام
تعداد رکورها رو برام شمارش کنه و نتیجه رو توی یه تکس باکس بریزه
چی کار باید بکنم؟
اگه میشه با یه نمونه برنامه توضیح بدید،ممنون

[perfeshnal]

سلام

شما به سادگی با این کد می تونید تعداد رکورد های یک Table رو شمارش کنید.

Text1.Text = Adodc1.Recordset.RecordCount

[hani bageri]

ممنون
اما سیستم من روی recordcount ارور میده و اونو نمیشناسه!
چی کار کنم؟

[perfeshnal]

سلام

نمیدونم چرا ، این کد رو من تست کردم درست کار میکنه.
اگر تو همه برنامه هاتون اینطوری بد نیست یک دفعه ویژوال بیسیک رو دوباره نصب کنید.

[Mbt925]

شما سورس برنامتونو اینجا قرار بدین تا مشکلشرو حل کنیم.

[hani bageri]

[
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
Debug.Print "MoveComplete"
If pRecordset.EOF Or pRecordset.BOF Then
Else
Call ControlsTagload(pRecordset)
With Adodc1
.Caption = " rec: " & _
.Recordset.AbsolutePosition
.Recordset.RecordCount
End With

End If

End Sub
البته توی formload این کدو نوشتم

Private Sub Form_Load()
Debug.Print "Form_Load()"
Adodc1.Recordset.MoveLast
Adodc1.Recordset.MoveFirst
End Sub

اما بازم این ارورو میده
compil error:
invalid use of property

[Mbt925]

منظورم کله برنامتونو ، همشو آپلود کنید.

چون دیتابیس ها معمولا ارورهایی که میدن ، از آدرس دهی و باز و بسته کردن و از این جور چیزاست
که با داشتن سورس مشکل زودتر پیدا میشه

[mohsenrahx]

از DataGrid1.ApproxCount این هم می تونی استفاده کنی