雜貨鋪課設(shè)C語言

1、沈陽理工大學課程設(shè)計專用紙摘 要 最初的食雜店資料管理，都是靠人力來完成的。但近幾年我國超市經(jīng)營規(guī)模日趨擴大，銷售額和門店數(shù)量大幅度增加，而且許多食雜店正在突破以食品為主的傳統(tǒng)格局，向品種多樣化發(fā)展。小型食雜店在業(yè)務上需要處理大量的庫存信息，還要時刻更新產(chǎn)品的銷售信息，不斷添加商品信息，并對商品各種信息進行統(tǒng)計分析。食雜店隨著市場經(jīng)濟和現(xiàn)代信息技術(shù)的的發(fā)展，不可必要的要卷如信息現(xiàn)代化的大潮，如何使用現(xiàn)代化的工具，使企業(yè)和經(jīng)營者個人在最小的投入下獲取最大的回報。成為每一個人的夢想。因此，在食雜店管理中引進現(xiàn)代化的辦公軟件，就成為時下最好的解決辦法。隨著管理信息系統(tǒng)理論的實踐進一步的發(fā)展，隨著信息

2、系統(tǒng)的優(yōu)越性的進一步體現(xiàn)，現(xiàn)代信息化的管理系統(tǒng)代替?zhèn)鹘y(tǒng)的簡單的計算機操作方式是社會發(fā)展的一個必然趨勢。管理信息系統(tǒng)是對一個組織進行全面管理的人機系統(tǒng)，綜合運用計算機技術(shù)、信息技術(shù)、管理技術(shù)和決策技術(shù)，與現(xiàn)代化的管理思想、方法和手段結(jié)合起來，輔助管理人員進行管理和決策。商業(yè)管理信息系統(tǒng)就是融合現(xiàn)代商業(yè)經(jīng)營管理思想和先進的信息處理技術(shù)為一體的管理信息系統(tǒng)。關(guān)鍵詞：管理信息系統(tǒng)信息技術(shù)；管理技術(shù)；信息技術(shù)1目 錄1 系統(tǒng)功能概述12 數(shù)據(jù)庫設(shè)計22.1 需求分析2 2.2 數(shù)據(jù)流圖.22.3數(shù)據(jù)字典52.4 ER圖52.5 表結(jié)構(gòu)設(shè)計63 系統(tǒng)各功能模塊的詳細設(shè)計7 3.1食雜管理運行界面.73.2

3、進貨管理運行界面93.商品信息查詢運行界面15總 結(jié)24參 考 文 獻251 系統(tǒng)功能概述1.1目標 食雜店管理系統(tǒng)能減少很多不必要的資源，不用象以前那樣用冗余的紙張式管理。大大節(jié)省了管理人員的工作量，并且計算機的存儲與系統(tǒng)快速查詢功能大大提高了管理人員的工作效率。方便的操作界面，省時省力，提高工作效率。1.2性能1、多層結(jié)構(gòu)設(shè)計：嚴格意義上的三層結(jié)構(gòu)設(shè)計，其程序邏輯結(jié)構(gòu)分為用戶界面層、業(yè)務邏輯處理層和數(shù)據(jù)存儲層。本系統(tǒng)采用的上有層結(jié)構(gòu)進一步擴展而成的多層結(jié)構(gòu)。2、面向?qū)ο笤O(shè)計：在系統(tǒng)中將商品類型、商品等都封裝成相應的類，同時每個類都有自己對應的集合類和操作類，從而再次提高了對數(shù)據(jù)庫操作的安全

4、性和程序的可擴展性。1.3功能1商品目錄管理：創(chuàng)建一個商品目錄，能夠更加方便的了解商品信息便于對商品的了解和管理，能讓管理人員知道商品的基本信息，并且對商品的數(shù)量進行統(tǒng)計，從而采取進貨等措施。2 進貨管理：通過進貨管理來了解商品進貨數(shù)量，以及哪些商品，偏于進行管理和銷售。3 銷售管理：進銷存管理系統(tǒng)并不僅僅能代替?zhèn)鹘y(tǒng)的書面操作，更重要的是它提供了信息分析的功能，只要單擊一個按鈕就可以查到目前銷售最好的商品或是庫存最多的商品，從而起到指導經(jīng)營的作用。4 庫存管理：通過庫存管理了解庫中剩下哪些商品，了解剩下的商品，方便進貨添加。5 查詢統(tǒng)計管理：查詢統(tǒng)計管理能夠更加方便直觀的了解商品的銷售，剩余，

5、支出和商品利潤情況。2 數(shù)據(jù)庫設(shè)計2.1 需求分析系統(tǒng)需求：要求系統(tǒng)能有效、快速、安全、可靠和無誤的完成上述操作。并要求客戶機的界面要單明了，易于操作，服務器程序利于維護。 功能需求： 大大提高食雜店的運作效率，通過全面的信息采集和處理，輔助提高超市的決策水平；使用本系統(tǒng)，可以迅速提升食雜店的管理水平，為降低經(jīng)營成本，提高效益，增強超市擴張力，提供有效的技術(shù)保障。2.2數(shù)據(jù)流圖 數(shù)據(jù)流程圖（Data Flow Diagram，DFD）是幾種簡單的符號綜合描述信息在系統(tǒng)中的流動、存儲、加工和流出等邏輯關(guān)系的圖表。數(shù)據(jù)流程圖是結(jié)構(gòu)化系統(tǒng)分析的主要工具，也是編寫系統(tǒng)資料、設(shè)計系統(tǒng)總體邏輯模型的有力工

6、具。它不但可以表達數(shù)據(jù)在系統(tǒng)內(nèi)部的邏輯流動，而且可以表達系統(tǒng)的邏輯功能和數(shù)據(jù)的邏輯變換。1進貨管理模塊功能：該模塊主要是實現(xiàn)進行進貨信息查詢功能。進貨信息查詢：該模塊為食雜店提供整個進貨情況查詢，也可以進行進貨信息的明細查詢，并以進貨報表形式打印出來。輸入項、輸出項：該模塊的輸入項為食雜店的進貨單，其中包括進貨單的編號，商品的編號，供貨商號，進貨價，數(shù)量，金額進貨日期，備注。進貨管理模塊流程圖:進貨管理開始添加進貨記錄供貨商記錄刪除進貨記錄結(jié)束繼續(xù)添加NYNN圖2.1進貨管理模塊流程圖2商品信息查詢模塊功能：該模塊主要是實現(xiàn)進行商品信息查詢功能。商品信息查詢：該模塊為食雜店提供商品查詢以商品信

7、息表格形式顯示出來。輸出項：該模塊的輸出項為食雜店的商品信息單，其中包括商品編號，分類，規(guī)格，進貨價，銷售價。 商品信息查詢模塊：商品管理開始添加商品記錄（包括編號規(guī)格等）刪除商品信息結(jié)束繼續(xù)添加NYNN商品信息更新YN圖2.2商品信息管理模塊圖2.3數(shù)據(jù)字典 數(shù)據(jù)字典是用來解釋和說明數(shù)據(jù)流圖的，它在軟件分析和設(shè)計的過程中給人提供關(guān)于數(shù)據(jù)的描述，在數(shù)據(jù)流程圖上描述了系統(tǒng)由那幾部分組成，各部分之間的聯(lián)系等，但并未說明各個元素的含義與包含的內(nèi)容。它于數(shù)據(jù)流圖共同構(gòu)成系統(tǒng)的邏輯模型，沒有數(shù)據(jù)流圖數(shù)據(jù)字典也難以發(fā)揮作用。數(shù)據(jù)字典是關(guān)于數(shù)據(jù)信息的集合，它對數(shù)據(jù)流圖中的各個元素作完整的定義與說明，是數(shù)據(jù)流

8、圖的補充工具。數(shù)據(jù)流圖和數(shù)據(jù)字典共同構(gòu)成系統(tǒng)的邏輯模型。沒有數(shù)據(jù)字典數(shù)據(jù)流圖就不嚴格。然而沒有數(shù)據(jù)流圖數(shù)據(jù)字典也難以發(fā)揮作用，只有兩者聯(lián)系在一起才能共同組成系統(tǒng)的規(guī)格說明。銷售金額2.4 ER圖供貨商號銷售數(shù)量購買供貨商名稱購買日期供貨數(shù)量供貨日期nn規(guī)格編號供貨商供貨商品n商品名稱m供貨編號單價庫存庫存量圖2.2各實體間E-R圖2.5 表結(jié)構(gòu)設(shè)計字段名字段類型長度字段值約束數(shù)據(jù)舉例商品編號int4Not null0001月初庫存int50Not null510月末庫存int10Not null200本月銷售int10Not null310警戒庫存int50Not null50商品信息Char

9、10Not null0001分類Char10Not null酒類商品名稱Char10Not null宋河進貨價Money4Not null3零售價Money4Not null4表2.1商品信息表（MerchInfo）表2.2進貨表(Support)字段名字段類型長度字段值約束數(shù)據(jù)舉例商品信息編號Char10Not null0001分類Char10Not null宋河商品名稱Char10Not null酒類進貨價Money4Not null3零售價Money4Not null43 系統(tǒng)各功能模塊的詳細設(shè)計3.1食雜管理運行界面圖3.1食雜管理首頁運行界面3.2進貨管理運行界面 圖3.2進貨信息運

10、行界面該模塊為提供整個食雜店的進貨情況查詢，也可以進行進貨信息的明細查詢，并以進貨報表形式打印出來。輸入項、輸出項：該模塊的輸入項為食雜店的進貨單，其中包括進貨單的編號，商品的編號，供貨商號，進貨價，數(shù)量，金額進貨日期，備注。代碼:using System;using System.Collections.Generic;using System.Linq;using System.Web;using System.Web.UI;using System.Web.UI.WebControls;using System.Data.OleDb;using System.Data;public pa

11、rtial class 貨源信息 : System.Web.UI.Page protected void Page_Load(object sender, EventArgs e) protected void Button1_Click(object sender, EventArgs e) if (TextBox1.Text="") Response.Write("<script>alert('請?zhí)顚懢幪?#39;)</script>"); if (TextBox2.Text="") Respons

12、e.Write("<script>alert('請?zhí)顚懝堂Q')</script>"); if (TextBox3.Text="") Response.Write("<script>alert('請?zhí)顚懰诘?#39;)</script>"); if (TextBox4.Text = "") Response.Write("<script>alert('請?zhí)顚懗煽儯?#39;)</script>&q

13、uot;); else string mystr, mysql, mysql1; OleDbCommand mycmd = new OleDbCommand(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider = Microsoft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString = mystr; m

14、ycmd.Connection = myconn; myconn.Open(); mysql = "INSERT INTO 貨源信息 VALUES(id,a,b,c)" mysql1 = "SELECT 編號 FROM 貨源信息 WHERE 編號=id" mycmd.Parameters.Add("id", OleDbType.Variant, 10).Value = TextBox1.Text.ToString(); mycmd.Parameters.Add("a", OleDbType.VarChar, 10)

15、.Value =TextBox2.Text.ToString(); mycmd.Parameters.Add("b", OleDbType.VarChar, 10).Value = TextBox3.Text.ToString(); mycmd.Parameters.Add("c", OleDbType.VarChar, 10).Value = TextBox4.Text.ToString(); mycmd.CommandText = mysql1; OleDbDataReader myreader = mycmd.ExecuteReader(); if

16、 (myreader.HasRows) Response.Write("<script>alert('該貨源ID已經(jīng)寫入成績！不能再寫入')</script>"); else myreader.Close(); mycmd.CommandText = mysql; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('添加成績成功！')</script>"); myconn.Close(); TextBox1.Text

17、 = "" TextBox2.Text = "" TextBox3.Text = "" TextBox4.Text = "" protected void Button3_Click(object sender, EventArgs e) string mystr, mysql; OleDbCommand mycmd = new OleDbCommand(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider = Micro

18、soft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString = mystr; myconn.Open(); mycmd.Parameters.Add("name", OleDbType.VarChar, 10).Value = TextBox5.Text.ToString(); mysql = "DELETE FROM 貨源信息 WHERE 編號 =name &quo

19、t; mycmd.CommandText = mysql; mycmd.Connection = myconn; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('刪除成功！')</script>"); TextBox5.Text = "" protected void Button4_Click(object sender, EventArgs e) string mystr, mysql; OleDbCommand mycmd = new OleDb

20、Command(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider = Microsoft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString = mystr; myconn.Open(); mycmd.Parameters.Add("gongying", OleDbType.VarC

21、har, 10).Value = TextBox7.Text.ToString(); mycmd.Parameters.Add("suozaidi", OleDbType.VarChar, 10).Value = TextBox8.Text.ToString(); mycmd.Parameters.Add("lianxi", OleDbType.VarChar, 10).Value = TextBox9.Text.ToString(); mycmd.Parameters.Add("id", OleDbType.Variant, 10)

22、.Value = TextBox6.Text.ToString(); mysql = "UPDATE 貨源信息 SET 供應商名稱=gongying,所在地=suozaidi,聯(lián)系電話=lianxi WHERE 編號=id" mycmd.CommandText = mysql; mycmd.Connection = myconn; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('修改貨源信息成功！')</script>"); myconn.Close(

23、); TextBox6.Text = "" TextBox7.Text = "" TextBox8.Text = "" TextBox9.Text = "" protected void TextBox10_TextChanged(object sender, EventArgs e) protected void Button6_Click(object sender, EventArgs e) string condstr = "" ; if (TextBox10.Text != "

24、;") condstr = "編號 = " + TextBox1.Text; if (TextBox11.Text != "") if (condstr != "") condstr = condstr + "AND 供應商名稱 LIKE'" + TextBox2.Text + "%'" else condstr = "供應商名稱 LIKE'" + TextBox2.Text + "%'" if (TextBox1

25、2.Text != "") if (condstr != "") condstr = condstr + "AND 所在地 LIKE'" + TextBox4.Text+"%'" else condstr = "所在地 LIKE'" + TextBox4.Text+"%'" if (TextBox13.Text!="") if (condstr != "") condstr = condstr + &qu

26、ot;AND 聯(lián)系電話=" + TextBox13.Text.ToString(); else condstr = " 聯(lián)系電話=" + TextBox13.Text.ToString(); Server.Transfer("貨源信息查詢顯示頁面.aspx?" + "condstr=" + condstr); 該部分的信息主要功能進行對貨源信息的更新，插入，刪除，查看，熟練運用sql語言，對數(shù)據(jù)庫進行各種操作。3.3 商品信息運行界面 圖3.3商品查詢運行界面圖3.4商品查詢結(jié)果運行界面本模塊的主要功能是商品信息的查詢和更新

27、，庫存信息的查詢和更新。查詢商品信息：主要功能查詢商品的明細信息，和它的庫存信息。代碼public partial class 商品信息 : System.Web.UI.Page protected void Page_Load(object sender, EventArgs e) protected void Button1_Click(object sender, EventArgs e) if (TextBox1.Text = "") Response.Write("<script>alert('請?zhí)顚懮唐肪幪?#39;)</sc

28、ript>"); if (TextBox2.Text = "") Response.Write("<script>alert('請?zhí)顚懛诸?#39;)</script>"); if (TextBox3.Text = "") Response.Write("<script>alert('請?zhí)顚懮唐访Q)</script>"); if (TextBox4.Text = "") Response.Write("&

29、lt;script>alert('請?zhí)顚懸?guī)格')</script>"); if (TextBox5.Text = "") Response.Write("<script>alert('請?zhí)顚戇M貨價')</script>"); if (TextBox6.Text = "") Response.Write("<script>alert('請?zhí)顚懥闶蹆r')</script>"); else stri

30、ng mystr, mysql, mysql1; OleDbCommand mycmd = new OleDbCommand(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider = Microsoft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString = mystr; mycmd.Connection

31、= myconn; myconn.Open(); mysql = "INSERT INTO 商品信息 VALUES(a,b,c,d,e,f)" mysql1 = "SELECT 商品編號 FROM 商品信息 WHERE 商品編號=a" mycmd.Parameters.Add("a", OleDbType.Variant, 10).Value = TextBox1.Text.ToString(); mycmd.Parameters.Add("b", OleDbType.VarChar, 10).Value = Te

32、xtBox2.Text.ToString(); mycmd.Parameters.Add("c", OleDbType.VarChar, 10).Value = TextBox3.Text.ToString(); mycmd.Parameters.Add("d", OleDbType.VarChar, 10).Value = TextBox4.Text.ToString(); mycmd.Parameters.Add("e", OleDbType.Variant, 10).Value = TextBox5.Text.ToString(

33、); mycmd.Parameters.Add("f", OleDbType.Variant, 10).Value = TextBox6.Text.ToString(); mycmd.CommandText = mysql1; OleDbDataReader myreader = mycmd.ExecuteReader(); if (myreader.HasRows) Response.Write("<script>alert('該商品已經(jīng)寫入信息！不能再寫入')</script>"); else myreader

34、.Close(); mycmd.CommandText = mysql; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('添加商品成功！')</script>"); myconn.Close(); TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" TextBox4.Text = "" TextBox5.Text = "&

35、quot; TextBox6.Text = "" protected void Button3_Click(object sender, EventArgs e) string mystr, mysql; string start = "UPDATE 商品信息 SET " string condstr = "" OleDbCommand mycmd = new OleDbCommand(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider =

36、 Microsoft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString = mystr; myconn.Open(); if (TextBox8.Text != "") condstr = "分類=fenlei " mycmd.Parameters.Add("fenlei", OleDbType.VarChar, 10).Value =

37、TextBox8.Text.ToString(); if (TextBox9.Text != "") if (condstr != "") condstr = condstr + ",商品名稱=mingcheng " mycmd.Parameters.Add("mingcheng", OleDbType.VarChar, 10).Value = TextBox9.Text.ToString(); else condstr = "商品名稱=mingcheng " mycmd.Parameters.

38、Add("mingcheng", OleDbType.VarChar, 10).Value = TextBox9.Text.ToString(); if (TextBox10.Text != "") if (condstr != "") condstr = condstr + ",規(guī)格=guige " mycmd.Parameters.Add("guige", OleDbType.VarChar, 10).Value = TextBox10.Text.ToString(); else conds

39、tr = "規(guī)格=guige " mycmd.Parameters.Add("guige", OleDbType.VarChar, 10).Value = TextBox10.Text.ToString(); if (TextBox11.Text != "") if (condstr != "") condstr = condstr + ",進貨價=jinhuojia " mycmd.Parameters.Add("jinhuojia", OleDbType.Variant,

40、 10).Value = TextBox11.Text.ToString(); else condstr = "進貨價=jinhuojia " mycmd.Parameters.Add("jinhuojia", OleDbType.Variant, 10).Value = TextBox11.Text.ToString(); if (TextBox12.Text != "") if (condstr != "") condstr = condstr + ",零售價=lingshoujia " m

41、ycmd.Parameters.Add("lingshoujia", OleDbType.Variant, 10).Value = TextBox12.Text.ToString(); else condstr = "零售價=lingshoujia " mycmd.Parameters.Add("lingshoujia", OleDbType.Variant, 10).Value = TextBox12.Text.ToString(); mysql = start + condstr + "WHERE 商品編號=id&quo

42、t; mycmd.Parameters.Add("id", OleDbType.VarChar, 10).Value = TextBox7.Text.ToString(); mycmd.CommandText = mysql; mycmd.Connection = myconn; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('修改成功！')</script>"); myconn.Close(); protected void Button5_Clic

43、k(object sender, EventArgs e) string mystr, mysql; OleDbCommand mycmd = new OleDbCommand(); OleDbConnection myconn = new OleDbConnection(); mystr = "Provider = Microsoft.Jet.OLEDB.4.0;" + "Data Source =" + Server.MapPath("App_Databuystore.mdb"); myconn.ConnectionString

44、= mystr; myconn.Open(); mycmd.Parameters.Add("name", OleDbType.VarChar, 10).Value = TextBox13.Text.ToString(); mysql = "DELETE FROM 商品信息 WHERE 商品編號 =name " mycmd.CommandText = mysql; mycmd.Connection = myconn; mycmd.ExecuteNonQuery(); Response.Write("<script>alert('

45、;刪除成功！')</script>"); TextBox5.Text = "" protected void Button6_Click(object sender, EventArgs e) string condstr = "" ; if (TextBox14.Text != "") condstr = "商品編號 = " + TextBox14.Text; if (TextBox15.Text != "") if (condstr != "") condstr = condstr + "AND 分類 LIKE'" + TextBox15.Text + "%'" else condstr = "分類 LIKE'" + TextBox15.Text + "%'" if (TextBox16.Text != "") if (condstr != "") condstr = condstr + &