数据库课程设计商品进销存管理系统.doc
文本预览下载声明
课程设计
2008年 9月一．设计要求
1．信息要求
本系统应该包含管理相关的信息，等。应该包括的基本信息（如、）的基本信息（如）。
2．功能要求
本系统的基本功能要求如下：
信息维护（包括简单查询）；
信息维护（包括简单查询）；信息维护（包括简单查询）；包括简单查询信息、；
二．软件环境及开发工具
1．个人电脑Win XP Pro
2．．
三．需求分析
对该进行深入的业务流程分析后画出数据流图由图可以看出来，每个前必须先登录这个系统，每个的信息保存在信息表中。用户登录系统后可以查看，也可以通过查询选择自己希望。
四．数据库设计
1．概念设计
根据需求分析的结果，得到的用ER图表示的概念设计结果如下图所示
2．逻辑设计
根据分析，整个销售系统系统需要的数据表如下：
、五．系统设计由于这个系统是一个比较小型的数据库系统，只需要储存文本信息，都是小段的问题，作为一个小型的数据库系统，数据量最多在条左右，故采用微软的作为后台数据库，使用SQL语言进行操作。
操作员信息表，包括了操作员编号、操作员姓名、操作员密码和操作员级别，其中操作员编号是主码：
商品信息表，商品编号、
客户信息表，包括客户编号、客户名称、联系人、联系电话、地址、客户信箱、银行帐号等。其中客户编号是主码：
销售信息表，包括销售号、客户编号、客户名、商品编号、商品名称、单价、数量、金额、销售时间等，其中销售号是主码：
库存信息表，包括商品编号、商品名称、库存数量、库存金额等，其中商品编号是主码：
六．系统操作说明和运行结果
客户信息管理界面：
操作员信息管理界面：
销售查询界面：
销售管理界面：
库存量调整界面：
七．程序清单由于系统是系统，故使用实现。procedure TForm1.BitBtn1Click(Sender: TObject);
var
username,userpass,sqlstr:string;
begin
username:=trim(edit1.Text);
userpass:=trim(edit2.Text);
sqlstr:=select *from 操作员信息表 where (操作员姓名=+username+)and(操作员密码=+userpass+) ;
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add(sqlstr);
adoquery1.Open;
if adoquery1.RecordCount0 then
begin
self.Visible:=false;
b:=true;
application.CreateForm(Tmainn,mainn);
mainn.ShowModal;
mainn.Free;
close;
end
else
begin
if i 3 then
begin
Application.MessageBox(用户名称或密码不正确，请重新输入。,提示,0+64);
Edit1.Clear;
Edit2.Clear;
Edit1.SetFocus;
Inc(i);
end
else
begin
Application.MessageBox(对不起，您无权使用本系统。,提示,0+64);
Application.Terminate ;
end;
end;
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
close;
end;
procedure TForm1.FormClose(Sender: TObject);
begin
if b=false then
application.Terminate;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
end;
end.
2. 商品信息管理代码：
var
spinfor: Tspinfor;
implementation
{$R *.dfm}
procedure tspinfor.editvalue;
begin
edit1.Text:=inttostr(adoquery1.fieldbyname(商品编号).Value);
edit2.Text:=adoquery1.fieldbyname(商品名
显示全部