Technical Manual for Video DatabaseCreated By J Nichols

Technical Manual for Video Database

Contents

Put contents here

System requirements

The system requirements for the Video Database are as follows:

  • Hardware required: Put hardware requirements
  • Software required: Put software requirements

Database Tables

The Video Database consists of 3 tables, a Member table, a Video table and a Rental table.

The tables have been created with the following fields and data types:

Show details of each table in the database and the field properties

Member Table:

The primary key for the table is Member-id.

Input masks have been created on the following fields:

Post Code:

Show all input masks, validation, field size changes on all relevant fields

Entity Relationship Diagram

The tables on the database have been connected using the following relationships:

Menu

The following main menu has been created for the database:

The following program code has been created for the main menu:

Option Compare Database

Private Sub cmdmemberform_Click()

On Error GoTo Err_cmdmemberform_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "Member"

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdmemberform_Click:

Exit Sub

Err_cmdmemberform_Click:

MsgBox Err.Description

Resume Exit_cmdmemberform_Click

End Sub

Private Sub Command2_Click()

On Error GoTo Err_Command2_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "frmmenuforms"

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command2_Click:

Exit Sub

Err_Command2_Click:

MsgBox Err.Description

Resume Exit_Command2_Click

End Sub

Private Sub Command3_Click()

On Error GoTo Err_Command3_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "Reportsmenu"

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command3_Click:

Exit Sub

Err_Command3_Click:

MsgBox Err.Description

Resume Exit_Command3_Click

End Sub

Private Sub Command4_Click()

On Error GoTo Err_Command4_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "Queriesform"

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command4_Click:

Exit Sub

Err_Command4_Click:

MsgBox Err.Description

Resume Exit_Command4_Click

End Sub

Private Sub Command5_Click()

On Error GoTo Err_Command5_Click

DoCmd.Quit

Exit_Command5_Click:

Exit Sub

Err_Command5_Click:

MsgBox Err.Description

Resume Exit_Command5_Click

End Sub

Show details for each menu form and code created:

Forms

The following forms have been created:

Member form:

The purpose of this form is to allow the data entry, navigation of records and deletion of membership details:

Data Entry View:

Design View:

Show details for each form created

Reports

The following reports have been created:

Rentals:

The purpose of this report is to show the number of rentals and the income made.

Output View:

Design View:

Show details for each report created

Queries

The following queries have been created:

Videos not returned:

The purpose of this query is to show Videos that have not been returned to the shop.

Output View:

Design View:

Show details for each query created

1