Access 데이터베이스에 생일 미리 알림을 추가하는 방법

액세스 솔루션 2025 년 9 월 29 일
지금 공유 :

Access 데이터베이스에 생일 알림을 추가하는 방법을 알아보세요. 고객이나 직원의 생일이 다가오는 경우 알림을 받아 따뜻한 인사를 보낼 수 있습니다.

생일 인사말을 보내는 것은 클라이언트 또는 직원과 연결하고 관계를 강화하는 좋은 방법이 될 수 있습니다. 고객/직원 레코드가 포함된 Access 데이터베이스를 처리하는 경우 고객이나 직원의 생일이 다가오면 수시로 알림을 받는 것이 좋습니다. 이 튜토리얼에서는 데이터베이스를 여는 순간 누군가의 특별한 날을 알려주는 기능을 만드는 방법을 배웁니다.

다운로드

원하는 경우tar기능을 최대한 빨리 사용하려면 다음을 수행 할 수 있습니다.

지금 VBA 코드가 포함 된 샘플 데이터베이스 다운로드

그렇지 않고 DIY를 원한다면 아래 내용을 읽을 수 있습니다.

필요 조건

이 자습서에서는 데이터베이스에 이름, 성 및 생일의 3개 필드가 포함된 테이블이 있다고 가정합니다.

Access 데이터베이스에 생일 알림을 추가하는 단계

  1. 새 테이블을 만들고 이름을 지정하십시오. 생일축하. 이것은 생일 축하 목록의 저장소 역할을 합니다. 아래와 같이 3개의 필드를 추가합니다. 기본 키가 필요하지 않습니다.테이블 BirthdayCelebrants
  2. BirthdayCelebrants용 양식을 만듭니다. 이 양식은 다가오는 생일이 있는 경우 데이터베이스를 열 때 나타납니다.BirthdayCelebrants를 위한 양식 만들기
  • 탐색 창에서 BirthdayCelebrants 테이블을 선택합니다.
  • 만들기 > 양식으로 이동합니다.
  • 단일 양식이 자동으로 생성됩니다.

생일 축하인사 목록을 표시할 예정이므로 양식의 기본 보기를 데이터시트 또는 연속 양식으로 변경하는 것이 좋습니다. 이렇게 하면 목록에 대한 빠른 개요를 볼 수 있습니다.양식의 기본 보기 변경

  • 디자인 보기에서 양식을 선택합니다.
  • 속성 시트 열기(ALT + F11)
  • 형식 > 기본 보기로 이동합니다.
  • 원하는 보기(데이터시트 또는 연속 양식)를 선택하십시오.

연속 양식을 선택한 경우 기본 설정에 맞게 디자인을 편집합니다. 내 모습은 다음과 같습니다.연속 양식 선택 및 디자인 편집

값이 긴 날짜 형식으로 표시되도록 생일 텍스트 상자의 형식을 편집했습니다. 또한 양식의 속성에 대해 다음과 같이 업데이트했습니다.

  • 추가 허용: 아니요
  • 삭제 허용: 아니요
  • 편집 허용: 아니요

완료되면 양식을 닫고 다른 이름으로 저장하십시오. frm_BirthdayCelebrants.

  1. 생일 알림 코드를 추가하세요.
    • 새 모듈을 추가합니다.새 모듈 추가
    • 그러면 VBA 편집기가 열립니다.
    • 다음 코드를 추가하고 필요에 맞게 수정하십시오.
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 매크로 만들기
    • 만들기 > 매크로로 이동합니다.
    • 클라임웍스와 함께　하늘과 닿는 여정을 시작하세요 런코드 드롭 다운 목록에서
    • 함수 이름에 대해 다음을 작성하십시오. 실행생일 알림().
    • 매크로를 다른 이름으로 저장 자동실행 확인을 클릭하십시오.
  1. 이제 생일 알림을 테스트하십시오.

데이터베이스를 닫았다가 다시 엽니다. 다가오는 생일이 있으면 생일 알림 양식이 팝업됩니다. 없는 경우 데이터베이스는 평소대로 실행됩니다.

빠른 알림

이제 빠른 알림을 위해. 어느 날 데이터베이스를 열 수 없더라도 당황하지 마십시오. 이를 복구하는 데 필요한 조치를 취하십시오. 여전히 할 수 없다면 타사 소프트웨어를 사용해 보십시오. 액세스 수정. 아직 희망이 있습니다.

저자 소개 :

Jayme Stack은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL 복구 그리고 엑셀 복구 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM

지금 공유 :

댓글이 닫혀있다.