خواص Data

متصل کردن پایگاه داده اکسس به برنامه با استفاده از کنترل Data:

برای ایجاد ارتباط باید خاصیت های DataBaseNameو Recordsource را درست تنظیم کنیم که در زیر هر کدام را جداگانه توضیح داده ایم.

خاصیت DataBaseName: باید برای خاصیت DataBaseName آدرس و نام پایگاه داده خود را بنویسید برای مثال اگر پایگاه داده اکسس شما در D:\Project\dataBase.mdb قرار داشته باشد . پس از انتخاب پایگاه داده در پنجره peroperticخاصیت DataBaseName برابر این آدرس قرار خواهد گرفت.

 

اگر بخواهید این خاصیت را با کد نویسی تنظیم کنید باید اینگونه بنویسید:

Data1.DataBaseName=”D:\project\dataBase.mdb”

شکل کلی آن به صورت زیر است :

خاصیت RecordSource : باید برای خاصیت RecordSource روی این خاصیت کلیک کنید تا لیست Tabel  های شما ظاهر شود بعد Tabel مورد نظر خود را انتخاب کنید . مثلاً اگر نام Tabel  شما Book باشد باید برای خاصیت RecordSource این Tabel را انتخاب کنید .

 

 

 

 

اگر بخواهید این خاصیت را با کد نویسی تنظیم کنید باید اینگونه بنویسید:

Data1.recordSource=”Book”

شکل کلی آن به صورت زیر است :

مثال : پایگاه اکسس زیر را با استفاده از کنترل Data به روش کد نویسی به برنامه تان متصل کنید .

 

کد زیر را در FormLoad  فرم برنامه قرار دهید:

Data1.DatabaseName = "D:\New Folder\DataBaise.mdb"

Data1.RecordSource = "Book"

 

   

خواص مهم  کنترل   Data:

خاصیت recordsetType : شیوه دسترسی به جدول یا سوال را مشخصی می کند که می تواند به سه صورت، Tabel ،Dynaset،SnapShot باشد.

خاصیت Connect: در این قسمت نوع فایلی که می خواهید با آن ارتباط بر قرار کنید را مشخص می کند . این فایل می تواند از نوع Access ، Excel، فاکس پرو، پاراداکس  باشد.

RecordSet :

همانطور كه مي دانيد پردازش اطلاعات و داده ها در پايگاه داده عبارت است از ايجاد ركورد جديد براي ثبت اطلاعات جديد، حذف ركورد اطلاعاتي ، ويرايش اطلاعات و داده ها و كارهاي ديگر . علاوه بر اين خصوصياتي براي ايجاد ارتباط با پايگاه داده دارد، خاصيتي به نام ركوردست دارد كه بيشترين متدها براي پردازش اطلاعات را دارد.

متدهاي مهم RecordSet :

Move: با استفاده از اين متد ما مي توانيم به ركورد مورد نظر حركت كنيم . روش استفاده آن به صورت زير است:

Data1.recordset.move (شماره ركورد)

Movefirst : با استفاده از اين متد مي توانيم به اول ليست يا جدول تغيير مكان دهيم . روش استفاده آن به صورت زير است:

Data1.recordset.movefirst

MoveLast : اين متد هم رفتن ما را به آخر جدول فراهم مي كنم و روش استفاده آن بصورت زير است:

Data1.recordset.movelast

MoveNext : از اين متد براي رفتن به ركورد بعدي استفاده مي شود و روش استفاده آن بصورت زير است:

Data1.recordset.MoveNext

MovePreivous :از اين متد براي برگشت به ركورد قبلي استفاده مي شود و روش استفاده آن به صورت زير است :

Data1.recordset. MovePreivous

EOF :اين متد مشخص مي كند  آيا اشاره گر در ركورد آخر  آخر قرار دارد ، يا خير . كه در صورتي كه در ركورد آخر قرار داشته باشد مقدار True و در غير اين صورت مقدار False خواهد گرفت .

A= Data1.recordset.EOF

 BOF: قرار داشتن اشاره گر در ابتداي ليست را مشخص مي كند.

A= Data1.recordset.BOF

Fields : براي پردازش يك فيلد

Data1.recordset.fields("نام فيلد")

AddNew : از اين متد براي ايجاد يك ركورد جديد استفاده مي شود

Data1.Recordset.AddNew

Update : براي ذخيره كردن ركورد ايجاد شده و يا ويرايش شده البته بايد قبل آن بايد از يكي از متدهاي AddNew يا Edit استفاده شود

Data1.Recordset.Update

Delete : از اين متد براي حذف يك ركورد استفاده مي شود

Data1.Recordset.Delete

RecordCount : اين متد مشخص مي كند كه Tabel ما داراي چند ركورد است .

A= Data1.recordset. RecordCount

FindFirst : از اين متد براي جستجو اولين ركورد كه با ضابطه ما مطابقت دارد استفاده مي شود. براي مثال اگر ما در ليست دنبال شخصي با نام javad باشيم براي جستجو آن بايد از كد زير استفاده كنيم:

Data1.Recordset. FindFirst("مورد نظر نام فيلد ="javad")

FindLast : اين متد براي پيدا كردن آخرين ركورد موجود در ليست كه با ظابطه و شرط ما هم خواني دارد استفاده مي شود و طرقه استفاده ار آن مانن متد FindFirst است:

Data1.Recordset. FindLast("مورد نظر نام فيلد ="كلمه مورد جستجو")

FindNext : اين متد براي يافتن ركورد بعدي استفاده مي شود . بايد توجه داشت كه براي استفاده از اين متد حتماً بايد قبل از آن متد FindFirst استفاده كرده باشد:

Data1.recordset. FindNext("مورد نظر نام فيلد ="كلمه مورد جستجو")

FindPrevious : از اين متد براي يافتن ركورد قبلي استفاده مي شود:

Data1.recordset. FindPrevious ("مورد نظر نام فيلد ="كلمه مورد جستجو")

NoMatch : اين متد مشخص مي كند كه جستجوي ما چه حاصلي در بر داشته است. اگر جستجوي ما به نتيجه نرسيده باشد مقدار آن True خواهد بود و در غير اينصورت False خواهد شد. براي مثال :

Data1.recordset. FindFirst ("مورد نظر نام فيلد ="كلمه مورد جستجو")

If data1.recordset.NoMatch Then

MsgBox("جستجو نتيجه اي نداشت")

Else

MsgBox("اطلاعات مورد نظر يافت شد")

End If

Filter:این متد برای نمایش دادن داده های خاصی که ما برای آن ظابطه تعیین می کنیم استفاده می شود . البته تأثیر آن در جدول نمایانگر است.

Data1.recordset.Filter”نام فیلد=’کلمه موردنظر’

مثلاً اگر بخواهیم رکوردهایی که فیلد Name آن برابر کلمه “javad” باشد  در جدول نمایش داده شود باید اینگونه بنویسیم:

Data1.recordset.Filter”Name=’javad’”

Sort: ما با این متد می توانیم رکوردهای یک Tabel را بر اساس یک فیلد مرتب کنیم:

Data1.recordset.sort=”نام فیلد”

در مثالهای زیر از پایگاه زیر استفاده شده است .

 

.