• Sonuç bulunamadı

WHITE GOODS AND ELECTRONIC SALES INFORMATION SYSTEM

N/A
N/A
Protected

Academic year: 2021

Share "WHITE GOODS AND ELECTRONIC SALES INFORMATION SYSTEM"

Copied!
229
0
0

Yükleniyor.... (view fulltext now)

Tam metin

(1)

NEAR EAST UNIVERSITY

FACULTY OF ECONOMICS AND

ADMINISTRATIVE SCIENCE

. DEPARTMENT OF COMPUTER

INFORMATION SYSTEMS

2005 SUMMER TERM

CIS,400

(GRADUATION PROJECT)

WHITE GOODS AND ELECTRONIC SALES

INFORMATION SYSTEM

Submitted To:

Dept.OfCIS

Submitted BY:

Pervane AGA YEV A(20000564)

I

lt~l[~lljjll[l!ll~!II

NEU

Lefkosa,

2005

(2)

ACKNOWLEDGEMENT

LIBRARY

I want to thank to:

My instructors Dr. Yalcm AK(;ALI and Mr.Tansel DEVIN for their support in completion of my project.

Also I want to thank Miss.Nadire CA VUS,Mr.Mustafa

MENEKA Y,Mr.Ilham HUSEYNOV and to all other instructors who educated me during my university life.

My friends Derya Sari,Fatma Taskin for their psychological support during my university life and during the period of preparing the project.

I am very happy to come to Cyprus.This sweet island ant its friendly perople makes me to learn the real life and provide me to live with myself.

'

And this island provide me to get new and good friends.

Also thanks to:

My family for providing me with all their financial resources for my education and while preparing the project and

for their psychological support in all parts of my life.They always provide me a comfort life and the necessary conditions to improve and educate myself into high levels .

(3)

ABSTRACT

My project is White Goods and Electronik Devices Selling

Information System. This system operates to purchase new goods

and sold these goods. Also the system provides stock control and

releationships with customers and employees.The aims of this system is

to make easy the activities of the people/employees and to provide

fast process/service to the Customers.As we know the customer greatefull

is very important.

Basicly this system pays attention to Selling process for the Customers.

Every process in this system is done by computer.

The users of this system are deviden two parts,Managers and employess.

All the important changes can be done by Managers.

The employess can

not get reports or can not buy new goods without managers' directives.

The main purpose of White Goods and Electronic Devices Selling

Information System isto provide easy,comfortable and quick process

by obtaining purchaising new goods,searching and selling these goods.

(4)

INTRODUCTION

The White Goods and Electronik Devices Selling

Information System program can take place in anywhere which

selling and purchasing this type of products.Its main purpose

is to satisfy the needs of customer.When a customer comes to

buy a product the process should be quick and as customer's want

, and the workers/managers want to give the best service.

The White Goods and Electronik Devices Selling

Information System has

5

main process:

1-) Customer Process

2-

)Product Process

- 3-)Employee Process

)

4-

)Payments Process

5

)Reporting Process

1-) Customer Process: In this process the system gets

the general information of the Customer.Such as Name,address etc.

Here

we can add.delete and update the cutomer information.

(5)

1-) Product Process:

In this process the system make all the operations

about product.It is very important process of the system so it requires more

attention and spent more time to design.

Products process has four subprocesses:

i-)Searching:

When the customer came to buy a product first the system shoul

search this product available or not.

The searching process can be done by

Product Name,Product ID or Supplier Name.

ii- )Orders:

In this process the customer can order a product without buying at

this time.System holds order information in the Order Table.

System gets order information about produst and customer

The employee has to enter his/her name when he/she gets order.

Because if there is any problem occures,it will be easy to solve it

by knowing which employee got this order.

The system can

add,delete

and

update

Order information,too.

iii-)Selling:In

this process the customer can buy a product which

he/she ordered before.Also the customer can buy a product without

ordering before.

When the compay sell a product the selled money adds

as Profit.After selling process the system has to give bill to customer.

'

Also after selling process the sellet product should be decrased from the

stock.

The customers can pay cash or can by by credit.

iv-)Purchasing:In

this process system buys product from the vendors.

(6)

The Vendor/supplier information also gets in this process.Here we can add new suppliers,delete or update,too.The bpurchasing and selling prices are different From each other.To get profit.

3-)Employee Process: Here all the employee processes are done. It has two sub process:

i-)~eneral Employee: When a new employee comes to company her/his information is add here.Such as name,sumame,address,title etc.By using managers' directives an employee can be add or can be delete from the

system in this process.And the information of the employee can be update.

ii-)Password Subprocess:To protect the system we need some security

operations.Normal users can not do the admins' job.So the system identify the users as admins and normal users.So thje system give password and user names

for users. The users can add,delete or change their usemames and passwords in this process.

4-)Payments Process:Here the payment processes are done by the users or admins.

It has 2 Subprocess:

I

i-)Credit Payments: When the customers buy products by credit they should

come and pay tehir credits month to month.So this process is used by the

system.When the customer pay his/her loan/debt the systemn decreased his/her

loan from the account.After this process a bill is given to customer to prove

he/she pay.

(7)

iv-)Payment Methods:

In this process the payment methods are determined

for company.

This can be done by using managers directives.For example now

the company accept credit card,cash and check.Maybe in future the company

can be accept selling by Credit.In this situation the selling by credit should be

add to the Payment Methods.This information is used when a customer buys a

product from the company

.And the admin can add new payment methods to the

system.

. -)Searching T"OO

l.- , Here all the searchin process are done.As we know

searching is very important for a system to be fast and to find easily what we

want.It save time,too.

It has five subprocesses:

i- )Order searching:

When the worker wants to find any order to make any

changes on it he/she can use this subprocess.This process linked him/her directly

to the Orders subprocess part.

ii-)Customer Searching Subprocess:

It provides to search any customer

for some purpoces,such as to get information about a customer or to update the

information of customer.So it joins the user to the customer table.

iii-)Product Searching Subprocess:

It also provide users easy access to the

products to get information or make some changes on them.

This joined the user

6

- --- ---= ~~-- -, ~~~~~- -

(8)

directly to the proucts table,too.So the use~ can easyly update or delete a product by using this subprocess.

iv-)Supplier Searching Subprocess:

This process provides to access a supplier information by joining directly to the suppliers process or table.So the user can easily make changes on suppliers' information or can delete.

v-)Employee Searching:

It provides to search any employee for some purpoces,such as to get information about a employee and to show the performance or to update the information of customer.So it joins the

user to the customer table.

§-)Reporting

Process:is usedonly by the manager (admin user) of the bookstore. This process satisfy getting different report about the

processes

There are many type of reports;

lCustomer

2.Bill Reports 3 .Payments Reports 4.Supplier Reports 5.Sales Report 6.Stock Report 7 .Expense-Revenue Report 8.Employee Reports

9.0rdered Products Reports

(9)

_ Expense-revenue report

satisfy a report to the manager to see the

information of how many book is purchased and what are their cost

and what total amount is getted in a given date interval.

Employee Reports.It satisfy the employee reports for the managers.

By using these reports the managers can show the weaknesses or strengths of

their employees and managaers can know ehich employee do they need in the

future.

Ordered Products Reports. It provides to managers to show details of

Ordered Products.By using this information they can decide which product they

need to buy from suppliers or which product is more preferable.

Payments Reports: By using this report managers can see which customer

regularly pay his/her debt or which customer do not pay r

regularly.And they can decide is the selling by credit profitable or not.

(10)

DESIGN OF THE SYSTEM

(11)

EXPLANATION

The minimum requirements of the system are;

Intel Pentium III processor

550MHz

256MBofRAM

3 0 GB harddisk

14" Monitor

Microsoft Windows 2003

HL~DT-ST

RW/DVD GCC/4241N

The recommended requirements of the system are as follows ;

Intel Pentium Centrino

1600 MHz

512MB ofRAM

60 GB harddisk

1 7" Monitor

Microsoft Windows XP Proffesional

(12)

HL-DT-ST RW/DVD GCC/4241N

I used Microsoft Access2003 and its VB appllications to write this program.

To be able to run this program, the MS Office 2003 Service Pack2 Program is required by the users.

Also the White Goods and Electronic Devices Sales Information System use the FIFO (First-In First-Out) inventory management system. In this situation the

program gives priority to oldest product in inventory when making selling process. By doing this, newest product kept in inventory and maintain the

,

inventory with newset product.

FIFO stands for first-in, first-out inventory tracking. This means as a

business purchases its inventory, holds the inventory, and finally sells the

inventory. This also implies that the remaining inventory at the end of a period

will be the fast group. This method of inventory tracking will provide the

highest gross profit for the period. At the same time this method also states that

the remaining inventory was purchased at the highest price level.

,

The FIFO method is generally preferred by the companys.Because

(13)

it is easy to apllay and determining the cost of the products.

WHITE GOODS AND ELECTRONIC SALES

INFORMATION SYSTEM

1.

PROJECT IDENTIFICATION AND SELECTION

THE AIM OF THE PROJECT :

The main purpose of White Goods and Electronic Sales

Information System isto provide easy,comfortable and quick process

by obtaining purchaising new goods,searching and selling these goods.

Another aimis to provide easy activity to employees.If employees

will be relax and greaitful the profit of the company is increased too.

As we know the manual processes are make the system delay

,difficult,

Lost of the information etc.By using computers all these bad situations are

dicreased or minimized.

(14)

THE PROJECT BOUNDERIES :

1.

By manual the product selling were done on papers that holds by

employees in hand and arranged them very hard.

2.

If the users want to learn the quantity of the product or which good

is where it takes long time to learn it by hand.

3. The general informations of thegoods and bill information of these goods

are hold in different papers or clusters and sometimes this cause some

confusing among the records.

4. As we know the papers can be depreciated by time so the records can not be

read as wanted,and it can couse the data loss.

5.

If the users want to transfer all data from one place to another they should

do it by hand and it takes a lot of time.

(15)

6 .

I

I

I

I

I

I

i

i

i

~ a.

I

b.

II

C.

-

I

I

--,

I

As we know the customer satisfaction is very importan so with manual system the customers have to wait a lot of time.

RESOURCE LIMITS :

The new system will be applay by computer and it will be more expensive than before.But it will earn more mony to company,too.So the system does not have budget limitations.

2.

PROJECT INITIATION AND PLANNING

Technical Feasibility :

This system requires some Hardware devices:

A computer for selling

A printer to give printed bill and report

A computer as server for manager for recording purchased and selled, products.

Operational Feasibility :

Before to applay this system we make some tests and surveys to find out the computer knowledge level of the employees. According to the test result, the employees who will use the system have basics knowledge abour computers, but they will be educated about the new system.

(16)

-

Economical Feasibility :

All the expenses will be satisfied by Companies whic will use this system.

3. ANALYSIS -

THE REQUIREMENT DETERMINATION

The requirements made by the users are as follows:

- Provide more customer satisfaction.

To increase the speed of operations

To prevent the loss of data

/

To prevent the data duplications

To provide easy and quick data access

To prevent the caos caused by purchasing and selling many

products

To restrict data access with the means of system security

(password entry).

NEW SYSTEM'S PROVIDENCES

- This new system will give the end format of the documents and papers that

are being held on hand and help workers to give better services for their

customers.Customers will not wait a long time.

(17)

- All information will be kept in computers, so there will be no storage problem to kept this information.

- Bill will be prepared by computer automaticly.

- Reports will be able to taken easily, because of all documents are stored on the computers.

- There will be no lost of data or it becomes minimized because all data will be held or storage in computers.

- The reports can be printed from the computer when they wished or wanted.

~

t

[

l

(18)

DATABASES:

In this system there are ten database tables:

-Customers

-Employees

-Suppliers

-Products

-Orders

-ACCORDER

-Payments

-Payment Methods

-Bill

-Password

18

(19)

~~.-.--~-- --·---~·-··· - ·-·----·.- ~--~- ----·----

.: Relationships _ _ __ _ _ _

19

(20)

DATA FLOW DIAGRAM

(21)

1

Accept/Reject Ordered Product Vendor Informal.

SUPPLIERS CUSTOMERS

('

' '

I

Desired Product Information

1

.

p,,,,1,.,,;og

°""'°

By

7

.

,...

·-·---·

,...

I"" . ...o: •. P"'I~--- I-"'---"

Pavment Fee for Customer 7 Formatted Bill Reports Accept/Reject Product Acknowledge. I

Giving Recipt for Customer White Goods and Electronic

Formatted Profit Reports

New Employee Information

Sales Information System

. I Formatted Sales Reports Available Employee Information \

/ Formatted Supplier Reports

~-

~

'

-

EMPLOYEES

Required Payment c, ___ ,. List of Needed Product

\

I

• r

'

Formatted

Order Reoorts MANAGER

Formatted Prod '"'· t

~---~- '·

Formatted Customer Reports Formatted Employee Reports Formatted Payment Reports

Ordered Product List

CONTEX DIAGRAM FOR WHITE GOODS AND ELECTRONIC SALES INFORMATION SYSTEM

(22)

jl"' "' te C C. a, 1:' 0~ a:: a, t,~ "t, :::, E >-

~5:

-c,

s:

e a.. _ig -c, :::, 0- a, 0::

~i

0 C1 C. "' a, 0:: ~ iii 'is. --g a."" :::, "' en E -c, ~ a, 0 :o::u... § &

•iect Order Product 1 lOOPOJd peJepJQ ~ Cl w :z: ~ <C >- U) U) Cl :z: Oo

o-

(!) ~ w~ I--~ -0 ~~ LL - ow Cl ~ LL <C Cl U) _J (.) W- > :z: WO _J ~ a.. 1-- 0 (.) I-- w _J w

(23)

0 C

~h

~

I

1~

~~ ~ ~ \-~ 0

°'

~

~

"'

3

"'

~

I

Q ~ :=t S" ~ ~ "" -0

s

~1

6' ~ ~~ ~· I I

i~

~

at C ~ C

lg-

OI Sl,. ~ ;g.. Q... Q s- 3 -, l,rg I_ I~

a ~ ~

i---- ~ II

h.

,O)~

> \-,§6 en i t-0 ~ ~ ~ !"J1 en O if a..

>

C. -e (1) ••• iii iii' ~ S!: (1) (1) -g Q ;:::i. "' I c. \-:;... .\"" "' ,- '""Si q ci'

I

a.

i

r

1~>

~

•·1

0

&

~,o ~ [ :Ill~

I

I

en ~ ~ ~

j

m ~ ~ ~ ~ Al 's Q "' ;:::i. m 1s: en rn. m ~ ~ w ~ in g -5 m

=~

-§.f m ~ ~

~~

Ji

if

N~ m .

.-

=

0 ~ m 0 ~;;; z O "5 C m i 50;; ~ di a. • (D

(24)

t:j rTJ -l J> 1-1 r rTJ t:j t:j

..,,

t:j D

..,,

V,

rTJ J> ;;:o I ...

z

C)

V,

C o::t "'U ;;:o D n rTJ

V,

V,

(25)

ct

r,

--l J> ...• r

r,

ct ct

,,

ct

,,

D

x:

-u ;u D ct C n --l -u ;u D n rn ct

•••

II

(I) C -0 -0 r H r, ;u

I

I

(I) C ;u -0 r •.... r, ~ (I) ~ \71 -0 J> -< 3: r, z -I 3: r, -I D t:::I (I) ~ ;:!.. C'tr \ . 'lt..., J> n n

(26)

-u J> -< 3:

r,

z -I I UOR-'OW.I04UJ PfOd (;? i!/

{'- \°' rn ·~

(>\

\~ \ ·.in q., t::::j

\

,RI

m -I J>

....

0 r ;u

r,

t::::j t::::j

H

t::::j I'-'

..,,

(ll t::::j 0 ..,, -u J> -< 3:

r,

3: z J> -I z -u J> ~ po,n.-i4 ,i.uawl.'Od pa Cl ;u

r,

0 Al n

r,

(;? GI.) .•.

(27)

I

CUSTOMERS ~ Customer Reports EMPLOYEES ULE

I

Formatted Employee Reports

Formatted Supplier Reports

~

Formatted Profrt Reports

MANAGER

ACCORDER

t::r2 E

Profrt Reports

Formatted Bill E=.z-1.. BILL e

Bill Reports PRODUCTS F.r:L

s

ORDERS F:1:-Le PAYMENTS

r.e

ce

Formatted Payment Reports

DETAILED DFD FOR REPORTS PROCESS

(28)

BLOCK DIAGRAM

PASSWORD ENTRY

ADMIN MENU WORKER MENU

ustomer Customer Prcduct-e-» j Customer ,_____.Searc~Product Order urchase Sell - redit Payment 'AYMENT

----1

aymentMethod -[ General Employee EMPLOYEE Password Customer Employee SEARCH----.j Product upplier rder ,---_.customer Employee

REPORTS •I .supplier

Profit Sales Payment Ordered Product _____. Stock Bill • Program BOUT ---{________Programmer ELP

t

arch Product rder Sell

PAYMENT---. Credit Payment

EMPLOYEE --. rc3eneral Employee

l

Password SEARCH ______. Customer Employee Product up plier Order

-c

rogram ABOUT Programmer ELP 27

(29)

USER MANUAL

(30)

I

FLOWCHARTS

(31)

PASSWORD ENTRY AND MAIN MENU

START Enter User name and password y N y End Main MAIN MENU 1.Customer 2.Product 3.Payment 4.Employee 5 Search 6.Report 7.About B.Help 9.Exit Select Your Chaise C

i

i

30

I

---~-

(32)

Choice=1 N

I

User Name=Admin N N C1 31

(33)

C1 Chice=6 Choice=7 Choice=S Choice=9 N y End 32 N y N y y Are you sure to exit? N

(34)

CUSTOMER PROCESS 1.1.Add /Save 1.2.Update 1.3.Search 1.4.Delete 1.5.Close Select your Choice Choice=1.1 y N Enter Customer Information

N Click Save Button

N

(35)

UPDATING CUSTOMER

1.2

Click Next, Previous Buttons

Fill the new information of

Customer

Click Close Button

Click Save Button

(36)

CUSTOMER SEARCHING Searching Submenu 1.3.1.Name 1.3.2.Sumame 1.3.3.Name&Sumame 1.3.4.Customer ID 1.3.5.Close Select your choice N y N

Click Close Button

Enter Customer Name N Click Search Button y N Record can not be found 35

(37)

CUSTOMER SEARCHING BY SURNAME 1.3.2 Is Surname . empty? /f{II y Please Enter

Click Close Button

Enter Customer Surname Click Search Button y N Record can not be found 36

(38)

SUSTOMER SEARCHING BY NAME SURNAME 1.3.3 Enter Customer Name end Surname Name or "- N Surnarneis empty? y Click Search Button Please Enter Name and Surname N Record can not be found y Click Close Button

37

(39)

CUSTOMER SEARCHING BY ID y N / Enter Customer ID Click Search Button Please Enter ID

Click Close Button

1.3 y y N Click OK button Record can not be found 1.3 y 38

(40)

I

CUSTOMER DELETING

1.4

Press Next.Previous Button To choose Customer

Choose Customer Name

Press DELETE Button

\'Are you sure to-J. delete

y

Customer is deltedet

(41)

PRODUCT PROCESS 2 Product submenu 2.1Search 2.20rder 2.3.Purchase 2.4.Selling Select Your Choice /J y N N N 2.1.Submenu 2.1.1Customer 2.1.2.Product Select your choice N 40 •

::;...,...=~~--===- ~=~~.-'"''::::·~l~lli~~IIIII

(42)

ORDER PROCESS 2.2 2.2.1.Add/Save 2.2.2.Update 2.2.3.Delete Select your Choice y N

Press Buy Button

Press Credit Press OK CLOSE Fill Payment Information

Press Add Button

Press Save Button

Fill Product Information N y Press Bill Press Cash 42

(43)

ODER UPDATING

Click Next.Previous Buttons

Click Save button

Click Close Button

m::::m:im111111m1m111111•---~

(44)

'

'

ORDER DELETING

2.2.3

Press Next.Previous Button

Choose Order N { Answer? y Order is Deleted Press DELETE

Are you sure to delete?

''ii:::,illUIIIIIIIHIHHIII•---

(45)

N

PURCHASING PRODUCT PROCESS

Enter New Quantity

Found?

Press Add Button

Enter ADD/ UPDATE Button Enter Supplier Information y N 45

(46)

Product can not found Click CASH Click BILL SELLING PROCESS y y y

Click Print Button

Enter By Credit Button Enter Payment Term Click OK Button Click Amortisation Table Print Monthly Payment Sheet Print Bill 46

(47)

3 Payment Sumenu 3.1.Crecln Payment 3. 2.Payment Methods Select your Choice N N 3.2 y Enter OrderlD

Click OK Button Click Print Button

Click Close Print Monthly Bill

:::'°''0"''l'1111111mmmm111 ---

(48)

PAYMENT METHOD

You can not Enter y Payment Sumenu 3.2.1.Add 3.2.2.Delete 3.2.3.Update/ Save 3.2.4.Close Main Select your

I

I

~hoice=32~

I

Enter choice Payment Name N

r

Press Update/ Save ~ I y

Press Navigator Press Navigator Buttons

Select deleted

method Enter new

Name

Press Delete Press Save r--- 3.2.4

48

(49)

C4

Record Deleted

y

(50)

EMPLOYEE SubMenu 4. 1. General Employee 4.2.Password Select Your Choice 50

(51)

y N N Click Navigator Button Click UPDATE

Click SAVE Button Fill new Information GENERAL EMPLOYEE 4.1 4.1.1.Add 4.1.2.Search 4.1.3.Delete 4.1.4.Update 4.1.5.Close Select your choice Press NAVIGATOR button to select Employee Click DELETE Are you sure to delete? Fill Employee Information

Click SAVE button

Employee is Saved

Record is deleted

(52)

PASSWORD SUBMENU 4.2.1.lnsert 4.2.2.Remove 4.2.3.Change Password 4.2.4.Close y N N N

CREATING ,CHAINGING .DELETING PASSWORD

Are you sure?

N Click cancel button y Click ok Button y Click ok Button Click cancel button

(53)

I

REMOVE CURRENT USER

I

I

I

I

I

I

I

y User is deleted 53 ---~-- - ,---

(54)

CHANGING PASSWORD FOR CURRENT USER 4.2.3 Choose user from the list Do you want to chanqe password? y N Answer is yes? >---~ Enter new password twice y N Click ok button Click cancel button 54

(55)

SEARCHING PROCESS 5 Submenu 5.1.Customer 5.2.Employee 5.3.Product 5.4.Supplier 5.6.0rder Select your Choice. 55

(56)

I

EMPLOYEE SEARCHING

I

I

5.2.1.Name 5.2.2.Sumame 5.2.3. Name&Surname 5.2.4.Job Status Select your choice. Choice=5.2.1 N N Main 5.2 y Enter Name

Click Search Button

y Found? N Employee can not be found Please enter Name ClickOk button 56

(57)

EMPLOYEE SEARCHING BY SURNAME

Enter Surname

Click Search Button Surname Empty? y Found? N Employee can not be found 5.2 N y Please enter Surname 57

(58)

EMPLOYEE SEARCHING BY NAME SURNAME 5.2.3 Enter Name

I

Name or " N I/ And Surname ~umameis empty?

I

'Y

'

ti

I

Click Search

I

I

Plea-s: Enter Button Name and i Surname ' ' y Found?

y

N Record can not be found

Click Close Button

58

(59)

PRODUCT SEARCHING 5.3 5.3.1.ProductlD 5.3.1.Name Select your choice Choice=S.3.1 Enter ID N Click Search y CLOSE N y Fount Main

(60)

PRODUCT SEARCH BY NAME Enter Name Click Search

lL_

Can not Fount y 61

(61)

J

SUPPLIER SEARCHING 5.4 5.4.1.SupplierlD 5.4.2.Name Select your choice N y Choice=S.4.1 Enter ID Click Search y N EXIT Can not Fount y

L

62

(62)

SUPPLIER SEARCH BY NAME Enter Name Click Search Can not Fount EXIT y 63

(63)

ORDER SEARCHING Enter ID N Click Search l;nfe..(

ID

64 ---~~

(64)

REPORTS Bti!2lD. 6.1. Customer 6.2.Employee 6.3.Supplier 6.4.Profrt 6.5.Sales 6.6.Payment 6.7.Sold Product 6.8.Stock 6.9.Bill

Select your choice

Customer Reports CUSTOMER REPORTS N CLOSE 65

(65)

C5

N

(66)

EMPLOYEE REPORTS 6.2 EMPLOYEE EMPLOYEE REPORTS N CUSTOMER REPORTS CLOSE 61

(67)

SUPPLIER REPORTS 6.3 SUPPLIER SUPPLIER REPORTS SUPPLIER REPORTS N N 6.2 CLOSE 68

(68)

I

r

PROFIT REPORTS 6.4 PROFIT PROFIT REPORTS N PROFIT REPORTS N 6.2 CLOSE Main 69

(69)

SALES REPORTS 6.5 SALES SALES REPORTS N SALES REPORTS 6.5 CLOSE 70

(70)

PAYMENT REPORTS 6.6 PAYMENT PAYMENT REPORTS N PAYMENT REPORTS CLOSE

I

I

I

71

(71)

PURCHASED PRODUCT 6.7 PURCHASED PRODUCT PURCHASED PRODUCT N y PURCHASED PRODUCT CLOSE Main 72

(72)

ORDERED PRODUCT 6.8 ORDER.ED PRODUCT ORDERED PRODUCT N 6.8 ORDERED PRODUCT CLOSE 73

(73)

STOCK REPORTS 6.9 STOCK REPORTS STOCK REPORTS N STOCK REPORTS CLOSE 74

(74)

BILL REPORTS 6.10 BILL REPORTS BILL REPORTS N y BILL REPORTS CLOSE 75

(75)

PRODUCT COST 6.11 PRODUCT COST PRODUCT COST N N PRODUCT COST CLOSE 76

~ ..• ---~;:;;;f;i~l~~~~li

••••

(76)

I

I

6 ~ ABOUT MENU

I

I

ABOUT MENU 1.Program 2.Programmer

I

I

-:..

y

I

'N About Program y N About Programmer y ClickRetum button y

Click return button

(77)

Help y Click Return button Main 78

(78)

USER GUIDELINES

To run and use the WHITE GOODS

AND

ELECTRONIC information

system, the following steps should be done:

(79)

Insert cd ofthe program in the CD-ROM then click My Computer on the desktom.

(80)

In the "My Computer" window click on the CD Drive(E:) option to open ed.

On the opened window click setup option to start installation wizard.

Installation is started.

(81)

The user shoul click OK button to setup.

(82)

The user can identfy a different destination to install the program.To change the different destination click change directory button.

In this step the user should wait some minutes while program installing.It spends few minutes according to the program size.

After completed the installation enter OK button.

(83)

ilJ Ulead VideoStudio 7

(ii Yahoo!

Q Yahoo! Mail

- Yahoo! Messenger

MSN Messenger 7 .0 Im) EngKsh Fast ~ Microsoft Office Tools

ifj Webteh

~ Microsoft Visio

fmfj Cyberlink PowerDVD

[ii

Kyodai Mahjongg

fl! Macromedia

in

Patient Observation System

iii':I Crystal Reports Tools

G:l Crystal Reports

W:ne Goods And Electronic Sales

Windows Katalogu Windows Update ~ Oyunlar @I QSound

ii

TOSHIBA

- Microsoft Visual Basic 6.

~jj

Microsoft Office Word 2

Not Defteri B Windows Media Player

.,S

Windows Messenger

I).

Windows Movie Maker

i!J DriverGuide Toolkit

ill Hex Workshop 4.2

,~, Microsoft 1/isio

~

'WWinamp

Paint

When the program is opened firstly the user name and password will be

wanted.If the user enter wrong name or oassword the program will give three

chance to enter the program.

The admin users and client users are different.

They

can see different menus.Admins can see all menus but the client users can see

some menus whic admins allow them.

(84)

MAIN MENU

In main menu, there are ten processes.These are Customer, Product,

Payment, Password, Employee,Searching,Reports, About, Help and Exit. If user

wants to terminate the program, Exit should be clicked. Other processes are as

follows: (

.See- ;::;~pre-

:l)

1. Customer Menu

When Customer menu is selected several options are shown under the

Customer. In this process the system gets

the general information of the Customer.Such as Name,address etc.

Here we can add,delete and update the cutomer information.This menu

is used for only new Customers.If you try to enter current customer the

program will show you a message about the available Customer.(ssie.

·Fi':J"fe:))

2.Product Menu

In this process the system make all the operations

about product.It is very important process of the system so it requires more

attention and spent more time to design.

Products process has four submenus:

2.1-)Searching:

When the customer came to buy a product first the system

should search this product available or not.

The searching process has two

sub menu.Customer and Product.

2.1.l)Customer:

When customer comes to buy or order product

(85)

the user should searc the customer is he/she available or not.if available user make the operation.If not,the user first add the customer .Searching

can be done by name,sumame or id. ( S •.. .,. Fi3uf<-- '-1 )

2.l.2)Product:

When a customer comes to buy a product or order the user should search this product is it available or not.if the

product not available the user can not sell or oreder the product. Product search can be done by name or ProductID. ( S ._._. Fi3ur e:

5)

2.2-)0rders: In this process the customer can order a product without buying at this time.System holds order information in the Order Table.

System gets order information about produst and customer The employee has to enter his/her name when he/she gets order.

Because if there is any problem occures,it will be easy to solve it by knowing which employee got this order.The system can add,delete

and update Order information,too.But generally user shoul not delete the Order. ( Fijur~

6/)

2.3-)Selling:In this process the customer can buy a product which he/she ordered before.Also the customer can buy a product without

ordering before.When the compay sell a product the selled money adds as Profit.After selling process the system has to give bill to customer.

Also after selling process the sold product should be decreased from the stock.The customers can pay by cash or by credit.If credit payment is

selected the user shoul prepare a regular paymentsheet for customer. And customer should pay this evry month.

(Fi3ure

r)

2.4-)Purchasing:ln this process system buys product from the vendors.

(86)

The Vendor/supplier information also gets in this process.Here we can add new suppliers,delete or update,too.The purchasing and selling prices are different from each other.To get profit.In purchasing process you can add new supplier. When you enter the productlD the supplier information is automaticly shown in thescreen.lf you want to update supplier information you can do this in

purchasing process. (

F,3vre.

6.,i)

3-)Payment Menu:Here the payment processes are done by the users or

admins.Some part of this process can be done only by Admin users.

It has 2 Submenu:

3.1-)Credit Payments: When the customers buy products by credit they

should come and pay tehir credits month to month.So this process is used by the

system.When the customer pay his/her loan/debt the systemn decreased his/her

loan from the account.After this process a bill is given to customer to prove

he/she pay.The count of next payments are shown on the screen in the Credit

Payment process. (

5e.e-

Fi3ure ~)

3.2-)Payment Methods: In this process the payment methods are

determined for company.This can be done by using managers directives.For

example now the company accept credit card,cash and check.Maybe in future

the company can be accept selling by Credit.In this situation the selling by credit

should be add to the Payment Methods.

This information is used when a

customer buys a product from the company

.And the admin can add new

payment methods to the system. ( {:;

'.y.1r

e:

f

o)

(87)

4-)Employee Menu:

Here all the employee processes are done. (

See..

f:,jure.

f,2,

J

It has two submenu :

4.1-)General Employee:

When a new employee comes to company her/his

information is add here.Such as name,sumame,address,title etc.By using

managers' directives an employee can be add or can be delete from the

system in this process.And the information of the employee can be update.

4.2-)Password :To protect the system we need some security

operations.Normal users can not do the admins' job.So the system identify the

users as admins and normal users.So thje system give password and user names

for users.

The users can add,delete or change their usemames and passwords in

this process.Only Admin users can open this menu.if admin wants to add a new

User he/she should enter insert button and fill the blanks.Then should press ok

button.If he/she want to delete a user he/she should select a user from the list

and click delete button.The user can change his/her current password.if he/she

wants he/she should press change button and should enter new password then

click OK button. (

F

i~vre...

t":>)

5-)Searching Menu: Here all the searchin process are done.As we know

searching is very important for a system to be fast and to find easily what we

want.It save time,too.

It has five submenu:

5.1-)0rder searching: When the worker wants to find any order to make

any changes on it he/she can use this submenu.

This process linked him/her

(88)

directly to the Orders submenu.Order searching can be done by Orderld and order Date.If user select by orderid he/she should enter the order id and press Search button.if order is available user can show.if order is not available the System show a message than can not be found the order.

If user select order by date he/ she should eneter a date and press search button. (

F,5ure

t<J}

5.2-)Customer Searching Submenu: It provides to search any customer

for some purpoces,such as to get information about a customer or to update the

information of customer.So it joins the user to the customer table.If a user

wannts to search a customer he/she can search by name,sumame,name and

surname and customerid.Then he/she shoul press search button.if record is

available he/she can show if not the system

will show a message that the person

can not be available. (

See.-

Fi<Jltre

IS)

5.3-)Product Searching Submenu: It also provide users easy access to the

products to get information or make some changes on them.

This joined the user

directly to the proucts table,too.So the user can easyly update or delete a product

by using this subprocess.Products can be searched by name and id.

When user

wants to search by name he/she should select search by name and enter the name

then press Search button.if the product is not available the message will shown

on the screen. (

F=/3t1re-

t1-)

5.4-)Supplier Searching Submenu: This process provides to access a

supplier information by joining directly to the suppliers process or table.So the

user can easily make changes on suppliers' information or can delete.Supplier

searching can be done by id or company name.User should select his/her choice

(89)

enter the data then press Search button.if available user can see.ifuser wants to exit program should enter exit button. ( Fi:!Jllf~ lb)

5.5-)Employee Searching:

It provides to search any employee for some purpoces,such as to get information about a employee and to show the performance or to update the information of customer.So it joins the

user to the employee table.Employee search can be done by

name,sumame,name and sumame,employeeid and Job sattaus.User shoul select her/hischoice and then clikc search button.

(f

/31.H

e

I

b)

6-)Reporting

Process:is used only by the manager (admin user) of the bookstore. This process satisfy getting different report about the processes

There are many type of reports; 6. l.Customer

(Fity.1ce.. ~)

6. 2.Bill Reports

(F,5ure.

.it-)

6. 3 .Payments Reports 6. 4.Supplier Reports 6. 5.Sales Report

6. 6.Stock Report

(F;~ufe..~/,I}

6. 7 .Expense-Revenue Report (

Fi

:ftfe..-

'J..,v

6. 8.Employee Reports

6. 9. Ordered Products Reports (

F

1

3

ar e, 2-, ':,)

6.1 O.Product Cost Report.

(90)

Customer Reports

satisfy a report to the manager to

see the information of customers .

Bill report satisfy a report to manager to see information of bill

such as which products are purchased with this bill and how much is

paid for them.

Products Cost report satisfy a report to the manager to see the

information that which product is purchased and what is its cost.

Supplier report satisfy a report to the manager to

see the information of its supplier that is purchased

product.

Sales Report satisfy a report to the manager to see the information

of sold product in a date interval and what price they sold.

Stock report satisfy a report to the manager to see the information

of product that is the under the stock level. And according to this

report needed products can be purchased.

Expense-revenue report satisfy

a

report to the manager to see the

(91)

information of how many book is purchased and what are their cost and what total amount is getted in a given date interval.

Employee Reports.It satisfy the employee reports for the managers.

By using these reports the managers can show the weaknesses or strengths of

their employees and managaers can know ehich employee do they need in the

future.

Ordered Products Reports. It provides to managers to show details of

Ordered Products.By using this information they can decide which product they

need to buy from suppliers or which product is more preferable.

Payments Reports: By using this report managers can see which customer

regularly pay his/her debt or which customer do not pay r

regularly.And they can decide is the selling by credit profitable or not.

7. About

About option on the main menu has two option: About Program and

About Programmer. When About Programmer option on the about option is

_9licked, ABOUT PROGRAMMER window is opened. This section gives

information about the author of the program.

(92)

When About Program option on the about option is clicked, ABOUT PROGRAM window is opened. This section gives information about the program.

8)Help

Help section gives detailed information about the program.

9)Exit:

When the user wants to exitthe program he/she shoul press Exit button. The program will ask 'Are you sure to exit'if answer will be yes the program will terminated.if answer will be no the user will be in the mainmenu.

COMMONLY USED BUTTONS

"SA VE" Button:

This button is used to save records to database.

"SEARCH" Button:

This button is used to make search about a given data such as Book name, author name, publisher name etc.

"CLOSE" Button:

This button is used to close window that is currently open after the process with that window is finished and return back to the previous window that is the main page for each user type.

Instead of clicking on this button, the user can click on "X" sign at the top of left of the window to close the window and return to previous one.

AN EXTRA EXPLANATION

(93)

As entering records "1"

should 't be used all entries should be done with "i".

Also "~,il,9,o"letters should not be used instead of these letters use"s,u,c,o".

When Report window is shown on the screen, if user want to print it, he

I

she

print to print icon at the top of page and can make printer set up that as using

another icon (printer set up icon) on the top of page. Also user can save the

report with in different types such as word, pdf,excel document type. To do this

export button is clicked on the top of the page.

APPENDIX 1

(94)

SCREEN OUTPUTS

Figure 1

(95)

Figure 2

(96)

Figure 3

(97)

Figure 4

Figure 5

(98)

Figure 6,

I

Figure 6. JJ

(99)

Figure 7

(100)

Figure 8

(101)

Figure 9

Figure 10

(102)

Figure 11

(103)

Figure 12

(104)
(105)

Figure 14

Figure 15

(106)

Figure 16

Figure 17

(107)

Figure 18

Figure 19

(108)

CUSTOMER REPORTS

02.12.2005 ID 1 Name a fag Surname agayeva Company Address ~ microsoft kucukkay gime

Phone

(_

__

) - Fax (__) __ Fmale Gender

B irtliD a re M aritalSta tu

_ _! __ ! _

Job Progra

2 a fag agayeva marmara nisantesi istanb 02124567 021267

3 Tom Cruse Cinema. HGHJ Losan 00167457 001654

Figure 20 '

(109)

02.12.2005

PROFIT REPORT

ProductlD SeWn~rice Sell Quant ii! Profit Di!co:imt

100 0,01 TL 5 0,Q3 TL 3 101 O,Ql TL 2 0,Q2 TL 2 104 0,60 TL 1 0,70 TL 4 103 0,15 TL 1 0,17 TL 5 101 0,01 TL 3 0,Q2 TL 4 101 O,Ql TL 1 0,01 TL 2 103 0,15 TL 1 0,17 TL 5 102 0,Q2 TL 1 O,Q3 TL 5 104 0,55 TL 2 1,21 TL 10 108 0,55TL 1 0,55 TL 10 108 0,55 TL 1 0,52 TL 5 104 0,55 TL 1 0,52 TL 5 IOI 0,01 TL 1 0,00 TL 10 101 O,Ql TL 2 0,01 TL 10 IOI 0,01 TL 2 0,01 TL 10 101 O,Ql TL 2 0,01 TL 10 100 O,Ql TL 2 0,01 TL 5 104 0,60TL I 0,54 TL 10 IOI 0,01 TL 1 0,01 TL 5 IOI 0,Ql TL 2 0,01 TL 10 100 0,01 TL 2 0,01 TL 10 100 O,Ql TL 1 0,01 TL 10

Figure 21

STOCK

REPORTS

02.12.2005

SueComean)'.Name ProdutID ProdutNune Ulli1JlnStock

Beko 100 tv 50 101 Utu 45 102 Camasir mak 200 104 pc 5.000 108 laptop 5.000 Bo she •••- I ~, 105 2 3 ff 107 pda 300 Samsung 109 bilgisayar 1.000 Sony 103 Bulasik mak 1.000 106 camasir m akinasi 1.000 110

(110)

Figure 8

(111)

Figure 9

Figure 10

(112)

Figure 11

(113)

Figure 12

(114)
(115)

Figure 14

Figure 15

(116)

Figure 16

Figure 17

(117)

Figure 18

Figure 19

(118)

CUSTOMER REPORTS

02.12.2005 ID 1 Name a fag Surname agayeva Company Address ~ microsoft kucukkay gime

Phone

(_

__

) - Fax (__) __ Fmale Gender

B irtliD a re M aritalSta tu

_ _! __ ! _

Job Progra

2 a fag agayeva marmara nisantesi istanb 02124567 021267

3 Tom Cruse Cinema. HGHJ Losan 00167457 001654

Figure 20 '

(119)

02.12.2005

PROFIT REPORT

ProductlD SeWn~rice Sell Quant ii! Profit Di!co:imt

100 0,01 TL 5 0,Q3 TL 3 101 O,Ql TL 2 0,Q2 TL 2 104 0,60 TL 1 0,70 TL 4 103 0,15 TL 1 0,17 TL 5 101 0,01 TL 3 0,Q2 TL 4 101 O,Ql TL 1 0,01 TL 2 103 0,15 TL 1 0,17 TL 5 102 0,Q2 TL 1 O,Q3 TL 5 104 0,55 TL 2 1,21 TL 10 108 0,55TL 1 0,55 TL 10 108 0,55 TL 1 0,52 TL 5 104 0,55 TL 1 0,52 TL 5 IOI 0,01 TL 1 0,00 TL 10 101 O,Ql TL 2 0,01 TL 10 IOI 0,01 TL 2 0,01 TL 10 101 O,Ql TL 2 0,01 TL 10 100 O,Ql TL 2 0,01 TL 5 104 0,60TL I 0,54 TL 10 IOI 0,01 TL 1 0,01 TL 5 IOI 0,Ql TL 2 0,01 TL 10 100 0,01 TL 2 0,01 TL 10 100 O,Ql TL 1 0,01 TL 10

Figure 21

STOCK

REPORTS

02.12.2005

SueComean)'.Name ProdutID ProdutNune Ulli1JlnStock

Beko 100 tv 50 101 Utu 45 102 Camasir mak 200 104 pc 5.000 108 laptop 5.000 Bo she •••- I ~, 105 2 3 ff 107 pda 300 Samsung 109 bilgisayar 1.000 Sony 103 Bulasik mak 1.000 106 camasir m akinasi 1.000 110

(120)

BILL REPORTS

02.12.2005 Date lilm. ~ ~ Amount Ol.12.200S 01.12.2005 3 fatih kisapannak 45 01.12.2oos 3,00 02.12.2005 02122005 1 a fag agayeva 142 -- 02.12.2085 1,00 JO. ll.208S 30 11.2005 2 etibar elem 6500 JO.ll.200S 2,00 Grand Total: 6,00 Figure 22 111

(121)

ORDERS REPORTS

02.12.2005

CustomerIDOrderID EmphyeeID OrderDa.te RequiredDate Sh;i,pedDate FreightCost EmployeeName

3 2 0,00 TL 1 I 0,00 TL 21 I 0,00 TL 30 I 0,00 TL 53 I 0,00 TL 66 2 0,00 TL 73 2 0,00 TL 7,00 I 253,00 10,00 0,01 TI.

Figure 23

112

(122)

Figure 24

(123)
(124)

REFERENCES

13 6.0 Pro", KARAGULLE Ihsan, PALA Zeydin, Turkmen Kitabevi,2002 )

sual Basic 6" ,Deitel & Deitel NIETO,Prentice Hall, 1999

cess 2002 Programming",Peter NERTON & Virginia ANDERSEN,Peter

cess 2002 VBA Handbook",Susan NOV ALIS & Dana JONES,Sybex,2001

em Programming",John J.DONOVAN,McGraw-Hill Kogushka,1994

em Analyse & Design" ,Krendall & Kendall,Prentice Hall, 1994

em Analyse And Design",D.R Jeffers &M.J.Lawrence,Prentice Hall,1984

;t,·.vbasicmaster.com

(125)

APPEND1X2

SOURCE CODES

(126)

Private Sub cmdOk _ Click()

dataPass.Recordset.FindFirst "UserName="' & txtUserName & ""' If dataPass.Recordset("UserName") <> txtUserName Then

M B sg ox "In lid va 1 user name . . . , , " "L · " ogm cmdOk.Default = False txtUserName.SetFocus txtUserName.SelStart = 0 txtUserName.SelLength = Len(txtUserName) Exit Sub End If

If dataPass.Recordset("Password") <> txtPassword Then a=a+l

If a= 3 Then

MsgBox "Don't be Over Smart", , "Login" End

End If

MsgBox "Invalid Password, try again!", , "Login" txtPassword. SetF ocus

SendKeys "{Home}+{End}" Else

Id= txtUserName.Text

Adodcl.RecordSource ="Select* FROM Password Where UserName="' Id & ""'

Adodc I .Refresh MDIForml .Show

(127)

LoginSucceeded =

True

l

If Adodcl.Recordset![usemame]

<>

"Admin" Then

MDIForml.Show

End If

Me.Hide

End If

End Sub

Private Sub Commandl _

Click()

Unload Me

End Sub

Private Sub Form_

Load()

Commandl.Cancel

=

True

End Sub

Private Sub txtPassword_KeyPress(KeyAscii As Integer)

If Key

Ascii = 13 And Key

Ascii = Ase(

vbCr) Then

KeyAscii

=

0

cmdOk.Default

=

True

End If

End Sub

Private Sub txtUserName_KeyPress(KeyAscii As Integer)

If Key

Ascii

=

13 And Key

Ascii

=

Ase(

vbCr) Then

(128)

KeyAscii =

0

txtPassword. SetF

ocus

End If

End Sub

Private Sub txtUserName_LostFocus()

txtUserName.Text

=

UCase(Left(txtUserName.Text, 1))

&

Mid(txtUserName.Text, 2)

End Sub

MAIN MENU

Private Sub MDIForm_Load()

End Sub

Private Sub mnuCPay

_

Click()

Forml l.Show

End Sub

Private Sub mnuCSearch

_

Click()

Form22.Show

End Sub

Private Sub mnuCusSearch

_

Click()

(129)

Form22.Show End Sub

Private Sub mnuCust_ Click() Forml3.Show

End Sub

Private Sub mnuEmpP _ Click() Forml 8.Show

End Sub

Private Sub mnuEmpS _ Click() Forml O.Show

End Sub

Private Sub mnuExit_ Click() Dim ms As String

ms= "Are you sure?"

IfMsgBox(ms, vbQuestion + vbYesNo + vbDefaultButtonl) = vb Yes Then Unload Me

Else

Exit Sub End If End Sub

Private Sub mnuHelp _ Click()

(130)

Form9.Show End Sub

Private Sub mnuOrder _ Click() Forml.Show

End Sub

Private Sub mnuOrdRep _ Click()

Cr9.DataFiles(O) =

App.Path

&

"\baglidb.MDB"

Cr9.WindowState

=

crptMaximized

Cr9.PageZoom (100)

Cr9

.Action

=

1

End Sub

Private Sub mnuOSearch_

Click()

Form15.Show

End Sub

Private Sub mnuPass

_ Click()

Form20.Show

End Sub

Private Sub mnuPayMet_

Click()

Form14.Show

End Sub

Cr5.

WindowState

=

crptMaximized

(131)

Cr5.PageZoom (100)

Private Sub mnuProdS _ Click() Form26.Show

End Sub

Private Sub mnuProgram _ Click() Form23.Show

End Sub

Private Sub mnuProgrammer _ Click() Form25.Show

End Sub

Private Sub mnuPSearch _ Click() Form26.Show

End Sub

Private Sub mnuPurc _ Click() Form 19. Show

End Sub

Private Sub mnuS _ Click() Form2.Show

End Sub

122

(132)

Private Sub mnuSupp _ Click() Form5.Show

End Sub

CUSTOMER FROM

Private Sub Combo 1 _

Click()

TextlO.Text

=

Combol.Text

End Sub

Private Sub ·Combo2

_

Change()

Textl 1.Text

=

Combol.Text

End Sub

Private Sub Command!_ Click()

'it allow us to enter new record to db

'datal .Recordset.MoveLast

Datal .Recordset.AddNew

'Text2.SetFocus

' Datal .Recordset.MoveLast

'Datal .Recordset.AddNew

' Adodc l .Recordset.MoveLast

'Adodc l .Recordset.AddNew

123

(133)

Text5.Text = ""

'Combol.Text = ""

End Sub

Private Sub Command

IO_

Click() If Textl.Enabled = False Then

If Not Data! .Recordset.EOF Then Data l .Recordset.MoveLast Else

MsgBox "This is the last record" End If

End If End Sub

Private Sub Command! !_Click() Form22.Show

End Sub

Private Sub Command2 _ Click() 'Adodcl .Recordset.Save

'Adodc I .Refresh On Error GoTo err

Data! .Recordset. Update Data I .Recordset.MoveLast

'Data l .Recordset.MoveLast 'Data I .Records et. Update

(134)

err:

If err.Number= 3426 Then Exit Sub 'MsgBox err.Description

+ " " +

err.Source End Sub

Private Sub Command3 _ Click() Data 1.Recordset. Update

If Data 1.Recordset.EditMode <> dbEditAdd Then Data 1.Recordset.MoveLast

End If

'IfText2.Enabled = False Then 'Text9. Text = MaskEdBox3. Text Text7.Text = MaskEdBoxl.Text Text8. Text = MaskEdBox2. Text

MaskEdBoxl.Visible = True MaskEdBox2. Visible = True 'MaskEdBox3. Visible = True

Text7.Visible = False Text8.Visible = False Text9.Visible = False Text2.Enabled = True Text3.Enabled = True Text4.Enabled = True Text6.Enabled = True Text7.Enabled = True 125

(135)

Text8.Enabled = True

Text9.Enabled = True Textl O.Enabled = True Combo I .Enabled = True

RichTextBoxl.Enabled = True 'End If

End Sub

Private Sub Command4 _ Click() Form22.Show

End Sub

Private Sub Command5 _ Click() Dim m As String

m = "Are you sure to delete the record?"

IfMsgBox(m, vbQuestion + vbYesNo + vbDefaultButton2) = vb Yes Then

Data 1.Recordset.Delete

MsgBox "Customer is deleted" Datal .Recordset.MoveNext If Datal .Recordset.EOF Then Data l .Recordset.MoveLast End If

(136)

End If

End Sub

Private Sub Command6 _ Click() Unload Me

End Sub

Private Sub Command?_ Click() If Textl .Enabled= False Then If Not Datal .Recordset.BOF Then

Data 1.Recordset.MoveFirst Else

MsgBox "This is the first record" End If

End If End Sub

Private Sub Command8 _ Click()

If Textl .Enabled= False Then

IfDatal.Recordset.AbsolutePosition > 1 Then Data 1.Recordset.MovePrevious

Else

MsgBox "This is the first record" End If

(137)

End If

End Sub

Private Sub Command9 _ Click() On Error GoTo err

IfTextl.Enabled = False Then

If Datal .Recordset.AbsolutePosition < Datal .Recordset.RecordCount Then Datal .Recordset.MoveNext

Else

MsgBox "This is the last record" End If

End If err:

If err.Number= 3021 Then MsgBox "This is the last record" End Sub

Private Sub Form_Load() Timer I .Enabled = True Timer I .Interval = 1000 Label13.Caption = Date

End Sub

(138)

Private Sub MaskEdBoxl_Change() Text7.Text =

MaskEdBoxl.Text

End Sub

Private Sub MaskEdBox2

_

Change()

Text8.Text

=

MaskEdBox2.

Text

End Sub

Private Sub MaskEdBox4

_

Change()

Text9.Text

=

MaskEdBox4.Text

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

IfKeyAscii

>

Asc("O")

And KeyAscii <= Asc("9") Then

KeyAscii

=

0

Text2.SetFocus

Else

KeyAscii

=

Asc(LCase(Chr(KeyAscii)))

End If

End Sub

'Private Sub Timer 1 _

Timer()

'Label13.Caption

=

Date

'End Sub

Private Sub Text3_Change()

(139)

End Sub

Private Sub Text3_KeyPress(KeyAscii As Integer)

If Key Ascii

>

Asc("O") And Key Ascii <= Asc("9") Then KeyAscii = 0

Text2. SetF ocus Else

KeyAscii = Asc(LCase(Chr(KeyAscii)))

End If End Sub

Private Sub Text5_KeyPress(KeyAscii As Integer)

IfKeyAscii

>

Asc("O") And KeyAscii <= Asc("9") Then KeyAscii = 0

Text2.SetFocus Else

Key Ascii = Asc(LCase( Chr(Key Ascii)))

End If End Sub

Private Sub Text6_KeyPress(KeyAscii As Integer)

IfKeyAscii > Asc("O") And KeyAscii <= Asc("9") Then KeyAscii = 0

Text2. SetF ocus Else

Key Ascii = Asc(LCase( Chr(Key Ascii))) End If

End Sub

Referanslar

Benzer Belgeler

In A Clockwork Orange set in England in the near future, Burgess presents that the increase in teenage violence may result in state violence; some precautions taken by the state

Akademik başarı, çevresel güvenlik ve antisosyal davranma okuldan erken ayrılmayı, okul terk riski yüksek okullarda düşük olanlara göre daha çok

KTS‟de sürekli US ile kortikosteroid tedavisinin etkinliğinin karĢılaĢtırıldığı bir randomize kontrollü çalıĢmada 34 hastanın 49 eli çalıĢmaya

Our purpose was to produce functional polyvinyl alcohol (PVA) electrospun nanowebs containing vanillin having prolonged shelf-life and high temperature stability facilitated

He added: “users tend not to trust existing systems with a long history of fraud, misuse or low reliability, as well as novel systems without established positive reputation.”

Deve lopm ent Process: Diagn osing the Syste m and its Probl ems... Ömer DİNÇER (işletme Yönetim i Bilim

Kuruçeşme kıyalarından yayılan kötü koku ve göze batan çirkin gö­ rünüm arasına sıkışmış Ortaköy Ca­ mi neredeyse kaybolmak üzerey­ di. Şimdi kıyılarımız- da

Rektöründen üniversite­ nin birinci sınıf ööğrencisine, eski bakanından genç memu­ runa kadar bütün ibnülemin hayranlarının ve dostlarının katıldığı hu