系统源码文档

系统源码文档

ID:860389

大小:892.03 KB

页数:25页

时间:2017-09-21

系统源码文档_第1页
系统源码文档_第2页
系统源码文档_第3页
系统源码文档_第4页
系统源码文档_第5页
资源描述:

《系统源码文档》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库

1、北方民族大学课程设计报告  系(部、中心)计算机科学与工程学院姓名陆嘉文学号 20091547专业软件工程 班级09软件同组人员王建志(20091544)文庆明(20091546) 课程名称.NET技术设计题目名称网上购物系统交易功能子系统设计与实现起止时间2011年12月22日—2011年12月30日成绩 指导教师签名张学琴、任荣北方民族大学教务处制目录1.系统总体分析与设计31.1系统体系结构31.2系统功能结构32.系统数据库设计与实现43.系统设计类图64.系统实现74.1系统COM类74.2基本功能子系统114.3交易

2、功能子系统144.4信息管理功能子系统185.结束语256.参考文献251.系统总体分析与设计1.1系统体系结构本系统采用浏览器/服务器(Browse/Server)模式。服务器浏览器......浏览器浏览器浏览器图1系统体系结构图1.2系统功能结构系统功能模块图如下:图2系统功能模块图2.系统数据库设计与实现图3数据库实现关系图3.系统设计类图图4购物系统设计类图4.系统实现4.1系统COM类购物系统实体类代码如下:ImportsMicrosoft.VisualBasicImportsSystem.DataImportsSys

3、tem.Data.OleDbPublicClassinfoclPublicmyconAsNewOleDbConnectionDimmycmdAsNewOleDbCommandDimreaderAsOleDbDataReaderDimmyadptAsNewOleDbDataAdapterDimmydsAsNewDataSet'连接服务器、数据库Subcon(ByValsrvnameAsString,ByValdbnameAsString,ByValusernameAsString,ByValpwdAsString)mycon.Co

4、nnectionString="Provider=SQLNCLI.1.1;DataSource="&srvname&";InitialCatalog="&dbname&_";UserID="&username&";Password="&pwdEndSub‘登录验证FunctionverifyLogin(ByValusernameAsString,ByValpwdAsString)AsIntegermycon.Open()mycmd.Connection=myconmycmd.CommandText="select*fromcus

5、tomerwherecustomerID='"&username&"'andpwd='"&pwd&"'"reader=mycmd.ExecuteReader()Ifreader.Read=FalseThenReturn0ElseReturn1EndIfmycon.Close()EndFunction‘页面初始化Publicds,df,mm,nm,ad,ph,pa,pt,dstabPublicSubopendbini()myadpt.SelectCommand=NewOleDbCommandmyadpt.SelectCommand

6、.Connection=myconmyadpt.SelectCommand.CommandText="selectcustomerID,customername,customeraddress,customerphone,customerpay,pingtaiNO,pwdfromcustomer"myadpt.Fill(myds,"customer")ds=myds.Tables("customer")df=DataBinder.Eval(myds,"tables[0].defaultview.[0].customerID")m

7、m=DataBinder.Eval(myds,"tables[0].defaultview.[0].pwd")nm=DataBinder.Eval(myds,"tables[0].defaultview.[0].customername")ad=DataBinder.Eval(myds,"tables[0].defaultview.[0].customeraddress")ph=DataBinder.Eval(myds,"tables[0].defaultview.[0].customerphone")pa=DataBinder

8、.Eval(myds,"tables[0].defaultview.[0].customerpay")pt=DataBinder.Eval(myds,"tables[0].defaultview.[0].pingtaiNO")dstab=myds.Tables(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。