Pages

Tuesday, January 3, 2012

LIBRARY INFORMATION SYSTEM

LIBRARY INFORMATION SYSTEM

LIBRARY INFORMATION SYSTEM

INTRODUCTION:

GOAL:

The main goal of library information system is to view all the information about the books as well as information relevant to the library.

OBJECTIVE:

Our objective is to create library information system,which consists of modules each of which performs its own function efficiently.

INFORMATION DESCRIPTION:

DETAILED DESCRIPTION:

Basically the users of the library information system are categorized into two groups.They are Administrator and User. Administrator is the one who has the control over the whole system.He can add,delete,view information as well as borrow some books.The password control separates him from other users.

The user can only view the information about the books and borrow books from the library for certain period of time if he has enough library cards.After that period he has to return those books back to the library to avoid fine.

HARDWARE DESCRIPTION:

1. Intel Motherboard with Pentium Processor

2. RAM 256MB(minimum)

3. Hard disk 40GB(minimum)

SOFTWARE DESCRIPTION:

1. Microsoft VisualBasic6.0

2. Microsoft Access

3. Rational Rose

INTERFACE DESCRIPTION:

To interact with the system the user has to have certain things.Username,Password,Bookname,etc.The Username is unique all over the system.The password separates the user from the administrator.To view the information certain attributes has to be given like Bookname etc.

FUNCTIONAL DESCRIPTION:

PERFORMANCE CHARACTERISTICS:

The overall performance of the system mainly depends upon the server,Network and the managing data resources.To achieve higher performance the speed of the server and the Network must be greater. Also we have to manage the database efficiently.

DATABASE REQUIREMENTS:

For the library information system we have to maintain two separate databases,one for storing Username and the Password and the other for book details.The first database must have two columns and the other must have at least five columns.We use MS Access to create those databases.

NON-FUNCTIONAL REQUIREMENTS:

AVAILABILITY:

The software consists of separate modules for the administrator to add,delete information about the books.

SECURITY:

The whole data in the system is password protected;no one can access that information without rights. Only user and admininstrator can access that information.

BEHAVIOURAL DESCRIPTION:

The user can login to the system and can view the information about the books,by giving any one of attributes.The result will be displayed separately.The administrator can login to the system and view the information about the books and he can add or delete the book details to the system.Also he can issue books and cards also by verifying the ID.

LIBRARY MANAGEMENT SYSTEM

USECASE DIAGRAM:

CLASS DIAGRAM:

SEQUENCE DIAGRAM:

COLLBORATION DIAGRAM:

VB SOURCE CODE

Form1.frm

Private Sub Command1_Click()

Data1.Recordset.MoveFirst

Do While Not Data1.Recordset.EOF

If Data1.Recordset.Fields(0) = Text1 And Data1.Recordset.Fields(1) = Text2 Then

i = 1

Form2.Show

Unload Me

Else

Exit Do

End If

Data1.Recordset.MoveNext

Loop

If Not (i = 1) Then

MsgBox "error"

End If

End Sub

Private Sub Command2_Click()

End

End Sub

Private Sub Form_Load()

Dim i As Integer

End Sub

Form2.frm

Private Sub Command1_Click()

Form3.Show

Me.Hide

End Sub

Private Sub Command2_Click()

Form4.Show

Me.Hide

End Sub

Private Sub Command3_Click()

Form5.Show

Me.Hide

End Sub

Private Sub FORM11_Click()

Form1.Show

Me.Hide

End Sub

Form3.frm

Private Sub Command1_Click()

Data1.Recordset.MoveFirst

Do While Not Data1.Recordset.EOF

If Data1.Recordset.Fields(0) = Text1 Then

i = 1

Text2 = Data1.Recordset.Fields(0)

Text3 = Data1.Recordset.Fields(2)

End If

Data1.Recordset.MoveNext

Loop

If Not (i = 1) Then

MsgBox "BOOK IS NOT AVAILABLE"

End If

End Sub

Private Sub Command2_Click()

Dim i As Integer

J = 0

Data1.Recordset.MoveFirst

While Not Data1.Recordset.EOF

If Data1.Recordset.Fields(0) = Text2 And Data1.Recordset.Fields(2) > 0 Then

Data3.Recordset.AddNew

J = 1

Data1.Recordset.Edit

Data1.Recordset.Fields(2) = Data1.Recordset.Fields(2) - 1

Data3.Recordset.Fields(0) = Text2

Data3.Recordset.Fields(1) = Text4

Data3.Recordset.Fields(2) = Text2

Data3.Recordset.Fields(3) = Text5

Data3.Recordset.Fields(4) = Text6

Data1.Recordset.Update

Data3.Recordset.Update

MsgBox "GOT THE BOOK"

End If

Data1.Recordset.MoveNext

Wend

If Not J = 1 Then

MsgBox "BOOK IS NOT AVAILABLE"

End If

End Sub

Private Sub Command3_Click()

Me.Hide

Form2.Show

End Sub

Private Sub Form_Load()

Dim i As Integer

End Sub

Form4.frm

Private Sub Command1_Click()

Data1.Recordset.MoveFirst

While Not Data1.Recordset.EOF

If Text1 = Data1.Recordset.Fields(0) And Text6 = Data1.Recordset.Fields(1) Then

Text2 = Data1.Recordset.Fields(1)

Text3 = Data1.Recordset.Fields(2)

Text4 = Data1.Recordset.Fields(4)

End If

Data1.Recordset.MoveNext

Wend

End Sub

Private Sub Command2_Click()

Data1.Recordset.MoveFirst

While Not Data1.Recordset.EOF

If Text1 = Data1.Recordset.Fields(2) Then

Data1.Recordset.Edit

Text2 = Data1.Recordset.Fields(1)

Text3 = Data1.Recordset.Fields(2)

Text4 = Data1.Recordset.Fields(4)

Data1.Recordset.Fields(3) = Text7

Data1.Recordset.Fields(4) = 10 + Data1.Recordset.Fields(3)

Data1.Recordset.Update

End If

Data1.Recordset.MoveNext

Wend

MsgBox "Book Renewed"

End Sub

Private Sub FORM13_Click()

Me.Hide

Form2.Show

End Sub

Form5.frm

Private Sub Command1_Click()

Dim J As Integer

J = 0

Data1.Recordset.MoveFirst

While Not Data1.Recordset.EOF

If Text1 = Data1.Recordset.Fields(2) And Text2 = Data1.Recordset.Fields(1) Then

J = 1

Data1.Recordset.Edit

Data1.Recordset.Delete

MsgBox " Book Returned"

End If

Data1.Recordset.MoveNext

Wend

Data2.Recordset.MoveFirst

While Not Data1.Recordset.EOF

If Data2.Recordset.Fields(0) = Text1 Then

Data2.Recordset.Edit

Data2.Recordset.Fields(2) = Data1.Recordset.Fields(2) + 1

Data2.Recordset.Update

End If

Data2.Recordset.MoveNext

Wend

If Not J = 1 Then

MsgBox "BOOK IS NOT AVAILABLE"

End If

End Sub

Private Sub Command2_Click()

Me.Hide

Form2.Show

End Sub

OUTPUT FORM

Login Form : (Form1.frm)

Choice Form : (Form2.frm)

Borrow Book : (Form3.frm)

Renewal : (Form4.frm)

Return : (Form5.frm)

RESULT:

Thus the Library information system was developed by using visual basic in front end and MS-Access in back end.

No comments:

Post a Comment