ثبت تعدادی رکورد

[mohammad_i]

سلام آقایون
چطور یشه اطلاعاتی که بخوایم بانک اطلاعاتی ذخیره بشه محدود کنی؟م. کاربر بتونه تعداد خاصی رکورد ثبت کنه ( مثلا 20 تا )

[M.T.P]

خب شما با دستور Count تعداد رکوردهای جدول رو درمیاری اگه از تعداد مدنظرت کمتر بود اجازه اضافه کردن رو میدی در غیر اینصورت عملیات رو لغو میکنید.
سینتاکس تابع Count (http://www.w3schools.com/sql/sql_func_count.asp)

[mohammad_i]

من دارم با بنک اکسس کار میکنم. اینها دستورات sql بود باید کجا اعمالش کنم؟

[M.T.P]

دستورات اکسس با Sql تقریبا میشه گفت هیچ فرقی نداره.

با چی به بانک وصل شدی؟ Adodc یا Adodb

اگه با Adodb وصل شدی میشه:

Dim Rst As New ADODB.Recordset
Dim StrCommand As String
StrCommand = "Select Count(ID) As FldCount From Table1"
Rst.Open StrCommand, Cn, adOpenStatic, adLockPessimistic

If Rst("FldCount") < 20 Then
'Do...
Else
'Do...
End If

[mohammad_i]

adodc هستش ، فقط باید جای adodb بکنم adodc ؟ اینارو کجا کپی کنم ؟ میشه بگین ؟

[M.T.P]

Dim StrCommand As String
StrCommand = "Select Count(ID) As FldCount From Table1"
Adodc1.RecordSource = StrCommand

If Adodc1.Recordset.Fields("FldCount") < 20 Then
'Do...
Else
'Do...
End If