သင်၏ Access Database တွင် မွေးနေ့သတိပေးချက်များကို ထည့်သွင်းနည်း

ယခုမျှဝေပါ-

သင်၏ Access ဒေတာဘေ့စ်တွင် မွေးနေ့သတိပေးချက်များကို မည်သို့ထည့်နိုင်သည်ကို လေ့လာပါ။ သင့်ဖောက်သည် သို့မဟုတ် ဝန်ထမ်း၏ မွေးနေ့ ကျရောက်မည်ဆိုပါက ၎င်းတို့အား နွေးထွေးစွာ နှုတ်ခွန်းဆက်စကား ပေးပို့နိုင်ပါသည်။

မွေးနေ့ နှုတ်ခွန်းဆက်စကား ပေးပို့ခြင်းသည် ဖောက်သည် သို့မဟုတ် ဝန်ထမ်းတစ်ဦးနှင့် ဆက်ဆံရေးကို ခိုင်မြဲစေရန်အတွက် နည်းလမ်းကောင်းတစ်ခုဖြစ်သည်။ ဖောက်သည်/ဝန်ထမ်းမှတ်တမ်းများပါရှိသော Access ဒေတာဘေ့စ်ကို သင်ကိုင်တွယ်နေပါက၊ ဖောက်သည် သို့မဟုတ် ဝန်ထမ်း၏မွေးနေ့ ကျရောက်လာပါက အခါအားလျော်စွာ အကြောင်းကြားရန် ကောင်းမွန်ပါသည်။ ဤသင်ခန်းစာတွင်၊ သင်သည် ဒေတာဘေ့စ်ကိုဖွင့်သည့်အချိန်၌ တစ်စုံတစ်ဦး၏ အထူးနေ့ကို အသိပေးမည့် လုပ်ဆောင်ချက်တစ်ခုကို သင်မည်ကဲ့သို့ ဖန်တီးနိုင်သည်ကို သင်လေ့လာလိမ့်မည်။

အခုတော့ကို Download လုပ်

ဒီလုပ်ဆောင်ချက်ကို အမြန်ဆုံးအသုံးပြုချင်တယ်ဆိုရင် အောက်ပါတို့ကို လုပ်ဆောင်နိုင်ပါတယ်-

VBA ကုဒ်များဖြင့် နမူနာဒေတာဘေ့စ်ကို ယခုဒေါင်းလုဒ်လုပ်ပါ။

မဟုတ်ရင် DIY လုပ်ချင်တယ်ဆိုရင်တော့ အောက်က အကြောင်းအရာတွေကို ဖတ်ရှုနိုင်ပါတယ်။

ရှေးဉီးလိုအပျခကျြ

ဤသင်ခန်းစာတွင် ဤနယ်ပယ် 3 ခုပါရှိသော သင့်ဒေတာဘေ့စ်တွင် ဇယားတစ်ခုရှိသည်- ပထမအမည်၊ နောက်ဆုံးအမည်နှင့် မွေးနေ့။

Access Database တွင် မွေးနေ့သတိပေးချက်များကို ထည့်ရန် အဆင့်များ

  1. ဇယားအသစ်တစ်ခုဖန်တီးပြီး နာမည်ပေးလိုက်ပါ။ မွေးနေ့ပွဲများ. ၎င်းသည် မွေးနေ့ပွဲကျင်းပသူများစာရင်းအတွက် သိုလှောင်မှုအဖြစ် ဆောင်ရွက်မည်ဖြစ်သည်။ အောက်တွင်ပြထားသည့်အတိုင်း အကွက် 3 ခုထည့်ပါ။ အဓိကသော့မလိုပါ။မွေးနေ့ပွဲကျင်းပသူများ
  2. BirthdayCelebrants အတွက် ဖောင်တစ်ခု ဖန်တီးပါ။ လာမည့် မွေးနေ့များရှိပါက ဒေတာဘေ့စ်ကိုဖွင့်သည့်အခါ ဤဖောင်ပေါ်လာပါမည်။BirthdayCelebrants များအတွက် Form ဖန်တီးပါ။
  • လမ်းကြောင်းပြကွက်တွင်၊ BirthdayCelebrants ဇယားကို ရွေးပါ။
  • Create > Form သို့သွားပါ။
  • Single Form သည် သင့်အတွက် အလိုအလျောက် ဖန်တီးပေးလိမ့်မည်။

ကျွန်ုပ်တို့သည် မွေးနေ့ပွဲကျင်းပသူများစာရင်းကို ပြသတော့မည်ဖြစ်သောကြောင့် ဖောင်၏ ပုံသေမြင်ကွင်းကို Datasheet သို့မဟုတ် Continuous Forms တစ်ခုခုသို့ ပြောင်းလဲရန် အကြံပြုလိုပါသည်။ ဤနည်းအားဖြင့် သင်သည် စာရင်း၏ အမြန်ခြုံငုံသုံးသပ်ချက်ကို ရနိုင်သည်။ဖောင်၏ ပုံသေမြင်ကွင်းကို ပြောင်းလဲပါ။

  • ဒီဇိုင်းမြင်ကွင်းတွင်ရှိနေစဉ် ဖောင်ကိုရွေးချယ်ပါ။
  • Property Sheet (ALT + F11) ကိုဖွင့်ပါ
  • Format > Default View သို့သွားပါ။
  • သင်အလိုရှိသော မြင်ကွင်းကို ရွေးချယ်ပါ - ဒေတာစာရွက် သို့မဟုတ် ဆက်တိုက်ပုံစံများ။

စဉ်ဆက်မပြတ် ဖောင်များကို သင်ရွေးချယ်ထားပါက သင့်စိတ်ကြိုက်ရွေးချယ်မှုများနှင့် ကိုက်ညီစေရန် ဒီဇိုင်းကို တည်းဖြတ်ပါ။ ဤတွင် ကျွန်ုပ်၏ပုံသဏ္ဍန်မှာ-Continuous Forms ကို ရွေးပြီး ဒီဇိုင်းကို တည်းဖြတ်ပါ။

တန်ဖိုးများကို Long Date ဖော်မတ်ဖြင့် ပြသနိုင်ရန် Birthday textbox ၏ ဖော်မတ်ကို တည်းဖြတ်ထားပါသည်။ ထို့အပြင်၊ ဖောင်၏ ဂုဏ်သတ္တိများနှင့် ပတ်သက်၍ အောက်ပါ အပ်ဒိတ်များကို ကျွန်ုပ် ပြုလုပ်ခဲ့သည်-

  • ထပ်လောင်းခွင့်ပြုပါ- မရှိပါ။
  • ဖျက်ခြင်းများကို ခွင့်ပြုပါ- မရှိပါ။
  • တည်းဖြတ်မှုများကို ခွင့်ပြုပါ- မရှိပါ။

ပြီးပါက ဖောင်ကိုပိတ်ပြီး ၎င်းကို သိမ်းဆည်းပါ။ frm_BirthdayCelebrants

  1. မွေးနေ့သတိပေးချက်အတွက် ကုဒ်ကို ထည့်ပါ။
    • မော်ဂျူးအသစ်တစ်ခု ထည့်ပါ။Module အသစ်တစ်ခုထည့်ပါ။
    • ၎င်းသည် VBA Editor ကိုဖွင့်လိမ့်မည်။
    • အောက်ပါကုဒ်ကိုထည့်ကာ သင့်လိုအပ်ချက်များနှင့် ကိုက်ညီစေရန် ပြင်ဆင်ပါ။
Public Function RunBirthdayReminders()
  Dim qry As String, fld_fName As String, fld_lName As String, fld_birthday As String, tbl As String
  Dim db As DAO.Database, rst As DAO.Recordset
 
  'TO DO: Update the ff. variables with the actual name of your table and fields
 
  tbl = "Members" 'table containing your client/employee reocrds
  fld_fName = "FirstName" 'first name field
  fld_lName = "LastName" 'last name field
  fld_birthday = "Birthday" 'birthday field
 
  Set db = CurrentDb
 
  'delete current record(s) from BirthdayCelebrants table
  DoCmd.SetWarnings False
  DoCmd.RunSQL ("DELETE FROM BirthdayCelebrants")
  DoCmd.SetWarnings True
 
  'insert new record(s) in BirthdayCelebrants table using a query that gets list of people celebrating their birthday today.
  qry = "INSERT INTO BirthdayCelebrants " & _
    "SELECT " & fld_fName & ", " & fld_lName & ", " & fld_birthday & " FROM " & tbl & " WHERE " & _
      "Month(" & fld_birthday & ")=Month(Date()) AND Day(" & fld_birthday & ")=Day(Date())"
 
  DoCmd.SetWarnings False
  DoCmd.RunSQL (qry)
  DoCmd.SetWarnings True
 
  Set rst = db.OpenRecordset("SELECT * FROM BirthdayCelebrants")
  If Not rst.EOF Then
    DoCmd.OpenForm ("frm_BirthdayCelebrants")
  End If
 
  Set db = Nothing
  Set rst = Nothing
End Function

အထက်ဖော်ပြပါ ကုဒ်သည် လက်ရှိနေ့အတွက် မွေးနေ့ပွဲများစာရင်းကို ရရှိသည့် စုံစမ်းမှုတစ်ခုကို အသုံးပြုကြောင်း ကျေးဇူးပြု၍ သတိပြုပါ။ လက်ရှိလအတွက် မွေးနေ့ရောက်လာမည့်သူများစာရင်းကို ရယူလိုပါက အောက်ပါမေးခွန်းကို အသုံးပြုပါ။

'insert new record(s) in BirthdayCelebrants table using a query that gets list of people whose birthday is coming up for this month.
qry = "INSERT INTO BirthdayCelebrants " & _
  "SELECT " & fld_fName & ", " & fld_lName & ", " & fld_birthday & " FROM " & tbl & " WHERE " & _
    "Month(" & fld_birthday & ")=Month(Date()) AND Day(" & fld_birthday & ")>=Day(Date())" & _
      " ORDER BY Day(" & fld_birthday & ") ASC"
  1. နောက်ဆုံးတွင်၊ ကျွန်ုပ်တို့သည် AutoExec မက်ခရိုကို ဖန်တီးမည်ဖြစ်သည်။ ၎င်းသည် ဒေတာဘေ့စ်ကိုဖွင့်သည့်အခါ ကုဒ်ကို လုပ်ဆောင်ပေးမည်ဖြစ်သည်။AutoExec Macro ဖန်တီးပါ။
    • Create > Macro သို့သွားပါ။
    • ကို Select လုပ်ပါ RunCode dropdown စာရင်းမှ။
    • Function Name အတွက် ရေးပါ။ မွေးနေ့သတိပေးချက်များ().
    • မက်ခရိုအဖြစ် သိမ်းဆည်းပါ။ AutoExec OK ကိုနှိပ်ပါ။
  1. ယခု သင်၏မွေးနေ့သတိပေးချက်ကို စမ်းသပ်ပါ။

ဒေတာဘေ့စ်ကိုပိတ်ပြီး ပြန်ဖွင့်ပါ။ လာမည့်မွေးနေ့များရှိပါက မွေးနေ့သတိပေးချက်ဖောင် ပေါ်လာပါမည်။ မရှိပါက၊ ဒေတာဘေ့စ်သည် ပုံမှန်အတိုင်းလည်ပတ်နေမည်ဖြစ်သည်။

အမြန်သတိပေးချက်

ယခု အမြန်သတိပေးချက်တစ်ခုအတွက်။ တစ်နေ့မှာ သင့်ဒေတာဘေ့စ်ကို မဖွင့်နိုင်ရင် မထိတ်လန့်ပါနဲ့။ ၎င်းကို ပြန်လည်ရယူရန် လိုအပ်သော အဆင့်များကို လုပ်ဆောင်ပါ။ သင်မလုပ်နိုင်သေးပါက ပြင်ပဆော့ဖ်ဝဲကို စမ်းကြည့်ပါ။ Access ကိုပြင်ဆင်ပါ။. မျှော်လင့်ချက်ရှိပါသေးသည်။

စာရေးသူနိဒါန်း:

Jayme Stack သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ sql ပြန်လည်နာလန်ထူ နှင့် excel recovery software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

ယခုမျှဝေပါ-

မှတ်ချက်များကိုပိတ်ထားကြသည်။