برنامه نويسي بانكهاي اطلاعاتي توسط اکسس

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

1. Tables : جداول اطلاعاتي




2. Queries : پرس و جو ها 3. Forms : فرمها 4. Reports : گزارشها 5. Macros : ماكروها 6. Modules : ماژولها

1. Tables (جداول اطلاعاتي)

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

2. Queries (پرس و جو ها)

توسط Queryها ميتوان اطلاعات مورد نيازمان را از يك يا چند جدول اطلاعاتي استخراج كرد اين كار از طريق انتخاب جداول اطلاعاتي حاوي اطلاعات مورد نظر ، برقراري ارتباط بين جداول ، انتخاب فيلدهاي مورد نياز از جداول انتخاب شده و اعمال شرطهاي لازم روي فيلدها صورت ميگيرد.

3. Forms (فرمها)

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

4. Reports گزارشها

توسط گزارشها ميتوان اطلاعات استخراج شده از جداول اطلاعاتي را در قالب و شكل دلخواه بر روي كاغذ چاپ كرد .

5. Macros (ماكروها)

ماكروها با به كارگيري يك سري توابع قدرتمند از قبيل نوشتن اطلاعات در يك ركورد جدول اطلاعاتي ، فراخواني اطلاعات از نرم افزارهاي بانك اطلاعاتي ديگر ، ارسال اطلاعات به فرمتهاي مورد نياز برنامه هاي ديگر و غيره امكان انجام يك سري عمليات مهم را به سادگي و با سرعت زياد فراهم ميآورند .

6. Modules (ماژولها)

هر ماژول ميتواند شامل يك يا چند تابع يا زيربرنامه باشد كه به صورت اختصاصي Private يا عمومي Public تعريف ميشوند همچنين ثوابت مورد استفاده در كليه فرمهاي برنامه را نيز ميتوان در اينجا به صورت Public تعريف كرد مانند:

Public Const cotation=""""

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

Public Function NextDate6(FirstDate As Variant, interval As Variant) As String
On Error GoTo Errhand
If Nz(FirstDate) = "" Then
NextDate6 =""
Else
Dim yy1, yy2, mm1, mm2, dd1 As String
Dim tm, vm, dy As Byte
yy1 = Left(FirstDate,2)
mm1 = Mid(FirstDate,3,2)
dd1 = Mid(FirstDate,5,2)
tm = interval + Val(mm1) - 1
vm = (tm Mod 12)
mm2 = Right("0" & Trim(Str(vm + 1)),2)
dy = (tm - vm) / 12
yy2 = Trim(Str(Val(yy1) + dy))
NextDate6 = yy2 & mm2 & dd1
End If
GoTo NoError
Errhand:
NextDate6 = ""
NoError:

End Function

در تابع فوق جهت نگهداري تاريخ از يك فيلد نوع Text با طول 6 استفاده شده است با اين روش جهت نمايش تاريخ 850231 به صورت 85/02/31 ميتوان خاصيت Input Mask مربوط به فيلد تاريخ يا كنترل نمايش دهنده اين فيلد بر روي Form يا Report را به صورت 99/99/99 تنظيم كرد .

آقای تيمور هاشمي