📄
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<!-- saved from url=(0052)http://www.th7.cn/Article/bc/de/200801/87084_12.html -->
<HTML xml:lang="zh-cn" xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE>商场管理系统的设计与实现</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META
content="商场,场管,管理,理系,系统,统的,的设,设计,计与,与实,第七城市,下载,论坛,网站,教程,软件,Q Q,Q Q 技巧,学玩 Q Q,QQ 素 材,Q Q 动态,游戏,魔兽,编程开发,平面设计,网页制作,"
name=keywords>
<META
content="第七城市,下载,论坛,网站,教程,软件,PHOTOSHOP,网页制作,CSS 学习,设计理念,Dreamweaver,Flash,平面设计,作品赏析,Fireworks,CorelDraw,编程开发,Java,.NET,ASP,PHP,Visual C,Visual B,Delphi,Illustraotr,Windows,操作系统,Linux,Vista,Mac OS,操作系统,数据库,MySQL,MS SQL,Q Q,qq,竞技,游戏,魔兽,"
name=description>
<META content=www.th7.cn|第七城市 name=copyright>
<META content=Sanda name=author><LINK href="商场管理系统的设计与实现12.files/dede.css"
type=text/css rel=stylesheet><LINK href="商场管理系统的设计与实现12.files/article.css"
type=text/css rel=stylesheet>
<STYLE>.diggArea {
PADDING-RIGHT: 0px; PADDING-LEFT: 0px; FLOAT: left; BACKGROUND-IMAGE: url(http://www.th7.cn/skin/7cn/css/images/diggbg2.gif); PADDING-BOTTOM: 0px; MARGIN: 0px 12px 0px 0px; WIDTH: 60px; PADDING-TOP: 0px; HEIGHT: 58px
}
.diggNum {
PADDING-RIGHT: 0px; PADDING-LEFT: 0px; FONT-WEIGHT: bold; FONT-SIZE: 26px; PADDING-BOTTOM: 0px; MARGIN: 0px; COLOR: #cc0000; PADDING-TOP: 0px; TEXT-ALIGN: center
}
.diggtext {
PADDING-RIGHT: 0px; PADDING-LEFT: 0px; FONT-SIZE: 12px; PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-TOP: 0px; TEXT-ALIGN: center
}
</STYLE>
<SCRIPT language=JavaScript>
<!--
//改变图片大小
function resizepic(thispic)
{
if(thispic.width>700) thispic.width=700;
}
//无级缩放图片大小
function bbimg(o)
{
var zoom=parseInt(o.style.zoom, 10)||100;
zoom+=event.wheelDelta/12;
if (zoom>0) o.style.zoom=zoom+'%';
return false;
}
-->
</SCRIPT>
<META content="MSHTML 6.00.2900.3199" name=GENERATOR></HEAD>
<BODY><!--头部开始-->
<DIV class="top cbody">
<DIV class=toplogo><A href="http://www.th7.cn/"><IMG height=60 alt=第七城市
src="商场管理系统的设计与实现12.files/toplogo.gif" width=200></A></DIV>
<DIV class=topbanner>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/1.js"></SCRIPT>
</DIV>
<DIV class=toplink>
<UL>
<LI><A href="http://www.th7.cn/sitemap_index.xml">Google地图</A> </LI>
<LI><A
onclick="javascript:window.external.AddFavorite('http://www.th7.cn','第七城市');"
href="http://www.th7.cn/Article/bc/de/200801/87084_12.html#">收藏本站</A> </LI>
<LI><A href="http://www.th7.cn/SiteMap/Article1.htm">网站地图</A> </LI>
<LI><A
href="http://www.th7.cn/baidumap_article_1.xml">百度地图</A></LI></UL></DIV></DIV><!--导航栏-->
<DIV class="topmenu cbody">
<UL>
<LI><A class=thisclass href="http://www.th7.cn/">首页</A> </LI>
<LI><A href="http://www.th7.cn/Article/wy">网页制作</A> </LI>
<LI><A href="http://www.th7.cn/Article/pm/">平面设计</A> </LI>
<LI><A href="http://www.th7.cn/Article/bc/">编程开发</A> </LI>
<LI><A href="http://www.th7.cn/Article/cz/">操作系统</A> </LI>
<LI><A href="http://www.th7.cn/Article/sj/">数据库区</A> </LI>
<LI><A href="http://www.th7.cn/Article/zq/">Q Q 专区</A> </LI>
<LI><A href="http://www.th7.cn/Article/jj/">游戏教程</A> </LI>
<LI><A href="http://www.th7.cn/Article/">教程中心</A> </LI>
<LI><A href="http://www.th7.cn/Soft/">下载中心</A> </LI>
<LI><A href="http://www.th7.cn/photo/">视觉</A> </LI>
<LI><A href="http://bbs.th7.cn/">论坛</A> </LI></UL>
<DIV class=rssbut><A href="http://www.th7.cn/rss.asp"><IMG alt=RSS
src="商场管理系统的设计与实现12.files/rss_button.gif"></A> </DIV></DIV><!--搜索条--><B>
<DIV class="topsearch cbody">
<DIV class=title></DIV>
<DIV class=inpbox>
<FORM name=search action=http://www.th7.cn/Article/search.asp method=post><INPUT
id=Keyword onfocus="this.value='';" maxLength=50 size=16 value=请输入关键词
name=Keyword> <SELECT onchange="return ChangeChannel(this.value);" name=Channel>
<OPTION value=1 selected>站内文章</OPTION><OPTION value=2>软件中心</OPTION></SELECT>
<INPUT id=Submit type=image src="商场管理系统的设计与实现12.files/topsearch_submit.gif">
<INPUT id=Field type=hidden value=Title name=Field>
<SCRIPT language=JavaScript>
function ChangeChannel(ChannelID){
if(ChannelID==1){
document.search.action='Article/search.asp';
document.search.Field.value='Title';
}
else if(ChannelID==2){
document.search.action='Soft/search.asp';
document.search.Field.value='SoftName';
}
return false;
}
</SCRIPT>
</FORM></DIV>
<DIV>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/4.js"></SCRIPT>
</DIV></DIV>
<DIV align=center>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/10.js"></SCRIPT>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/11.js"></SCRIPT>
</DIV></B><!--内容-->
<DIV class="main cbody margintop"><!--左侧-->
<DIV class=pleft><!--位置导航-->
<DIV class=thisplace>
<DIV class=title></DIV>
<DIV class=placenav><SPAN></SPAN>您现在的位置: <A class=LinkPath
href="http://www.th7.cn/">第七城市</A> >> <A class=LinkPath
href="http://www.th7.cn/Article/Index.html">教程频道</A> >> <A
class=LinkPath
href="http://www.th7.cn/Article/bc/Index.html">编程开发</A> >> <A
class=LinkPath
href="http://www.th7.cn/Article/bc/de/Index.html">Delphi</A> >> 正文
</DIV></DIV><!--资讯内容-->
<DIV class=newsview><!--资讯标题-->
<DIV class=title>
<H1>商场管理系统的设计与实现</H1></DIV><!--相关信息-->
<DIV class=info><STRONG>作者:佚名 文章来源:<A
href="http://www.th7.cn/ShowCopyFrom.asp?ChannelID=1&SourceName=不详">不详</A> 点击数:
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/GetHits.htm"></SCRIPT>
更新时间:2008-1-22</STRONG> </DIV><!--资讯正文-->
<DIV class=content>
<DIV>
<CENTER>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/8.js"></SCRIPT>
</CENTER></DIV>
<DIV style="FLOAT: left; MARGIN: 10px 10px 10px 0px">
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/6.js"></SCRIPT>
<BR><IFRAME id=baiduframe marginWidth=0 frameSpacing=0 marginHeight=0
src="商场管理系统的设计与实现12.files/CAGLYF4H.htm" frameBorder=0 width=250 scrolling=no
height=60></IFRAME></DIV>= "select serial_no from sales"<BR>reader2 =
SqlCommand1.ExecuteReader(CommandBehavior.CloseConnection)<BR>While
reader2.Read<BR>GETSN = reader2.GetInt32(0)<BR>End While<BR>End Function
<P></P>
<P>Private Sub TextBox6_KeyPress(ByVal sender As Object, ByVal e As System.<A
class=channel_keylink
href="http://www.th7.cn/Article/cz/wi/Index.html">Windows</A>.Forms.KeyPressEventArgs)
Handles TextBox6.KeyPress<BR>If e.KeyChar = Chr(13)
Then<BR>SqlConnection1.Close()<BR>SqlConnection1.Open()<BR>Dim tmp As
Integer<BR>For tmp = 0 To count - 1<BR>SqlCommand1.CommandText = "insert into
sales values('" & row(tmp).Item(0) & "'," & row(tmp).Item(3) &
"," & _<BR>row(tmp).Item(2) * 100 & ",'" & timer & "','" &
TimeOfDay & "'," & MEMBER_ID & "," & sn &
")"<BR>SqlCommand1.ExecuteNonQuery()<BR>Next<BR>sn += 1<BR>StatusBarPanel1.Text
= " 当前流水号:" & Str(sn)<BR>TextBox6.Text = ""<BR>TextBox7.Text =
""<BR>TextBox4.Text = ""<BR>TextBox1.Focus()<BR>count =
0<BR>table1.rows.clear()<BR>zhongjia = 0<BR>End If<BR>End Sub</P>
<P>Function checksum(ByVal string1) As Boolean<BR>Dim i As Integer<BR>checksum =
True<BR>i = 0<BR>For i = 1 To Len(string1)<BR>If Mid(string1, i, 1) < "0" Or
Mid(string1, i, 1) > "9" Then<BR>checksum = False<BR>End If<BR>Next<BR>End
Function<BR>Protected Overrides Sub OnClosed(ByVal e As
System.EventArgs)<BR>End<BR>End Sub<BR>Private Sub TextBox1_KeyDown(ByVal sender
As Object, ByVal e As System.<A class=channel_keylink
href="http://www.th7.cn/Article/cz/wi/Index.html">Windows</A>.Forms.KeyEventArgs)
Handles TextBox1.KeyDown<BR>If e.KeyCode = 123 Then<BR>End<BR>End If<BR>End
Sub<BR>End
Class<BR>5.3.7商场客户端登录窗体的创建<BR>登录窗体的构架及所需控件属性设置<BR>控件属性属性取值<BR>NameForm1<BR>Form
Text请输入用户号及密码<BR><A class=channel_keylink
href="http://www.th7.cn/Article/cz/wi/Index.html">Windows</A>StateNormal<BR>Button1Text确定<BR>Button2Text取消<BR>代码如下:<BR>Public
Class Form1<BR>Inherits System.<A class=channel_keylink
href="http://www.th7.cn/Article/cz/wi/Index.html">Windows</A>.Forms.Form<BR>Private
Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click<BR>If Trim(TextBox1.Text) = "" Or Trim(TextBox2.Text) = ""
Then<BR>MsgBox("请输入用户名及密码")<BR>Exit Sub<BR>End If<BR>Dim reader1 As
SqlClient.SqlDataReader<BR>Dim password, string1 As String</P>
<P>SqlConnection1.Close()<BR>SqlConnection1.Open()<BR>SqlCommand1.CommandText =
"select * from operator where id='" & Trim(TextBox1.Text) &
"'"<BR>reader1 = SqlCommand1.ExecuteReader(CommandBehavior.Clo</P>
<P align=center><B><A
href="http://www.th7.cn/Article/bc/de/200801/87084_10.html"> << </A><A
href="http://www.th7.cn/Article/bc/de/200801/87084_11.html">上一页</A> <A
href="http://www.th7.cn/Article/bc/de/200801/87084_11.html">[11]</A> <FONT
color=red>[12]</FONT> <A
href="http://www.th7.cn/Article/bc/de/200801/87084_13.html">[13]</A> <A
href="http://www.th7.cn/Article/bc/de/200801/87084_14.html">[14]</A> <A
href="http://www.th7.cn/Article/bc/de/200801/87084_13.html">下一页</A>
</B></P></DIV>
<DIV class=cupage>责任编辑:sanda</DIV><!--操作-->
<DIV class=actbar>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/17.js"></SCRIPT>
</DIV>
<DIV class=context>
<DIV class=diggArea id=digg204>
<DIV class=diggtext>点击数</DIV>
<DIV class=diggNum>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/GetHits.htm"></SCRIPT>
</DIV></DIV>
<DIV>
<DIV style="FLOAT: left">
<LI>上一篇文章: <A class=LinkPrevArticle
title="文章标题:delphi还能用多久 作 者:佚名 更新时间:2008-1-22 0:09:51"
href="http://www.th7.cn/Article/bc/de/200801/87083.html">delphi还能用多久</A> <BR>
<LI>下一篇文章: <A class=LinkNextArticle
title="文章标题:再谈Delphi 7控制Word 2000 作 者:佚名 更新时间:2008-1-22 0:09:51"
href="http://www.th7.cn/Article/bc/de/200801/87085.html">再谈Delphi 7控制Word 2000</A>
</LI></DIV></DIV>
<DIV class=floatclear><!--清除浮动--></DIV></DIV></DIV></DIV><!--右侧-->
<DIV class=pright>
<DIV class="rlist margintop">
<DIV class=rbox>
<UL>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/2.js"></SCRIPT>
</UL>
<DIV class=title>栏目导航</DIV>
<DIV class=rbox>
<UL>
<DIV>
<TABLE width="100%" border=0>
<TBODY>
<TR>
<TD
style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid">
<SCRIPT language=JavaScript src="商场管理系统的设计与实现12.files/anv.js"
type=text/JavaScript></SCRIPT>
</TD>
<TD style="BORDER-LEFT: 1px solid">
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/7.js"></SCRIPT>
</TD></TR></TBODY></TABLE></DIV></UL></DIV>
<DIV class=rbox>
<UL>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/3.js"></SCRIPT>
</UL></DIV></DIV></DIV>
<DIV class=floatclear><!--清除浮动--></DIV></DIV>
<DIV>
<CENTER>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/5.js"></SCRIPT>
</CENTER></DIV>
<DIV class="footer cbody margintop">
<DIV class=copyright>
<DIV>
<P>广告业务QQ:56296102 技术服务QQ:57037 QQ群一:9177885 QQ群二:3756278</P>
<P>信息产业部备案号:浙ICP备05011664号 <A
href="tencent://message/?uin=56296102&Site=www.th7.cn&Menu=yes"
target=blank><IMG alt=有事,请联系 src="商场管理系统的设计与实现12.files/5_offline.gif"
border=0></A> <A
href="tencent://message/?uin=57037&Site=www.th7.cn&Menu=yes"
target=blank><IMG alt=有事,请联系 src="G:\my\商场管理系统的设计与实现12.files\5_offline(1).gif"
border=0></A> </P>
<P>©CopyRight 2003-2008 <A href="http://www.hp2008.net/">七城工作室</A>Inc. All
Rights Reserved</P>
<P><A title="" href="http://www.netpolice.gov.cn/wj/wlbj_info.asp"
target=_blank><IMG height=32 alt="" src="商场管理系统的设计与实现12.files/netpolice.gif"
width=71 border=0></A></P></DIV></DIV>
<DIV class=slogo>
<SCRIPT src="商场管理系统的设计与实现12.files/ystat.js" type=text/javascript></SCRIPT>
<NOSCRIPT><A href="http://js.tongji.yahoo.com.cn/"><IMG
src="商场管理系统的设计与实现12.files/ystat.gif"></A></NOSCRIPT>
<DIV style="DISPLAY: none" align=center>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/1273053.js"
type=text/javascript></SCRIPT>
</DIV></DIV>
<DIV class=floatclear></DIV></DIV>
<SCRIPT language=javascript src="商场管理系统的设计与实现12.files/18.js"></SCRIPT>
</DIV></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -