<option value=20>20</option>
<option value=21>21</option>
<option value=22>22</option>
<option value=23>23</option>
<option value=24>24</option>
<option value=25>25</option>
<option value=26>26</option>
<option value=27>27</option>
<option value=28>28</option>
<option value=29>29</option>
<option value=30>30</option>
<option value=31>31</option>
</select>日 (最好提前1天预定,当天加急配送的,请电话13910250117确定)
<%
dim sendMonth,sendDay,mysend
mysend=DateAdd("d",1,now())
sendMonth=Month(mysend)
sendDay=day(mysend)
%>
<script language="java script">
document.mymainform.sendMonth.selectedIndex=<%=(sendMonth-1)%>
document.mymainform.sendDay.selectedIndex=<%=(sendDay-1)%>
</script>
</td>
</tr>
<tr class="bg1">
<td width="14%">特定说明:
</td>
<td width="86%" colspan=3>
<input type="text" id="payMemo" name="payMemo" size=80 maxlength=140 value="">
</td>
</tr>
</table>
<br>
<!--其他人收货-->
<table width="760" border="0" cellspacing="1" cellpadding="3" bgcolor="#4a4a4a" align="center">
<tr class="title">
<td><b>其他人收货<font color="#FF0000">(选择其他人收货时候显示这栏内容)</font></b></td>
<%
if (session("userautoid")>0) then
%>
<td>你曾经送过的朋友:
<select id=recsex name=recsex class="buy_box">
<option value=m>1</option>
<option value=f>2</option>
</select>
</td>
<%
当用户填写完表单,单击“确定并提交”按钮时需要对用户输入的信息进行验证,以确保用户输入信息都是有效的。例程3-15为表单验证的java script源代码。
例程3-15 表单验证的java script源代码
<script language="java script">
function setReceiverFormVisible(vGet)
{
if(vGet=='1'){
document.all.receiverinfo_form.style.display='none';
}else{
document.all.receiverinfo_form.style.display='block';
}
}
function checkinput()
{
var payName=document.mymainform.MypayName.value;
if (payName=="")
{
alert("付款人名称不能为空!");
document.mymainform.MypayName.focus();
return false;
}
var payPhone=document.mymainform.payPhone.value;
if (payPhone=="")
{
alert("付款人电话不能为空!");
document.mymainform.payPhone.focus();
return false;
}
if(document.mymainform.myrec2.checked==true)
{
var recName=document.mymainform.recName.value;
if (recName=="")
{
alert("收货人名称不能为空!");
document.mymainform.recName.focus();
return false;
}var recPhone=document.mymainform.recPhone.value;
if (recPhone=="")
{
alert("收货人电话不能为空!");
document.mymainform.recPhone.focus();
return false;
}
return true;}
</script>
3.5.5用户注册的设计与实现
用户注册页面,首先提供一个供用户输入注册信息的表单,当用户提交表单信息的时候,由另一个页面去完成注册。本实例提供注册表单的页面是reg.asp,完成具体注册处理的页面是regsuess.asp.图3-24为用户注册页面。
图3-24用户具体注册页面
图3-24所示的注册页面实现比较简单,这里就不详细介绍了。在此主要介绍regsucess.asp页面完成用户注册部分的详细过程。例程3-16为完整注册处理的代码。
例程3-16 完整注册处理代码
<%
dim conn
dim userid,pass,sqlm
shopopendatabase conn
userid=Trim(request("USERID"))
pass=Trim(request("PASS"))
confirmpass=Trim(request("CONFIRMPASS"))
realname = Trim(request("REALNAME"))
sex = Trim(request("SEX"))
phone = Trim(request("HOMEPHONE"))
email = Trim(request("EMAIL"))
mobile = Trim(request("MOBILE"))
persoind = Trim(request("PERSONID"))
message=""
if (userid <> "") then '用户是否存在
sqlm = "select userid from myuser where userid='"&userid&"'"
set rsm = conn.execute(sqlm)
if not rsm.eof then
message="用户名称已经存在,如果确定是你的邮箱,"
message=message&"请<a href='findpass.asp'>找回密码</a><br>"
else
sql = "insert into myuser(userid,pwd,realname,sex,mobile,phone,personid)"
sql = sql &" values('"&userid&"','"&pass&"','"&realname&"','"&sex&"','"&mobile&"','"&phone&"','"&personid&"')"
conn.execute sql
dim myrs
set myrs=conn.execute("select @@IDENTITY as newIDValue FROM myuser")
dim userautoid
userautoid=myrs("newIDValue")
closerecordset myrs
message="恭喜"&realname&",您已经注册为Lvzhi网络用户!"end if
rsm.close
set rsm = nothing
end if
shopclosedatabase conn
%>
3.5.6订单查询
当用户确定购买产品并成功生成订单后,用户还可以随时查询已经生成的订单,查看订单的发货状态,订单金额,收货人等信息。用户可以在界面底部单击“查询订单”去查看订单信息。
由于订单包含的信息比较多,因此在用户查询订单信息时,首先给出订单的一个列表,显示每个订单的概要信息,当用户单击某个订单的时候,再显示该订单包含的产品等详细信息。也正是考虑到这点,在设计数据库存储时便把订单分为订单概要信息和订单明细分别进行储存。
显示订单概要信息的OrderQuery.asp页面的执行结果如图3-25所示。
图3-25 显示订单概要信息的OrderQuery.asp 页面执行结果
显示订单概要信息就是从数据库表myorder中查询属于登录用户订单,然后把订单概要信息显示在页面中,并且在订单号列提供连接,当用户在订单号列单击某个订单号时跳转到OrderDetail.asp 页面,由页面OederDetail.asp.显示订单的详细信息。例程3-17为显示订单概要信息页面OrderQuery.asp的代码。
例程3-17 显示订单概要信息页面代码
<%
dim dbc,rs,query
shopopendatabase dbc
query = "select * from myorder where userid = " & session("userautoid") & " order by lasttime desc"
set rs = dbc.execute(query)
dim n
n=0
Do WHILE not rs.EOF
%>
<tr><td><atarget="_blank" href="OrderDetail.asp?id=<%=rs("autoid")%>"><%=rs("autoid")%></a></td><td><%=rs("realpay") 元</td><td><%=rs("lasttime")%></td><td><%=rs("recname")%> </td>
<td><%=rs("orderstatus")%></td>
</tr>
<%
n=n+1
rs.movenext
Loop
%>
四、 结 论
网上花店管理系统是将传统的花店经营管理模式结合计算机及网络管理的综合经营管理的模式。将人、机、物的需求,活动和运作进行系统分析、设计并管理,以实现现代高效、科学且安全的电子商务。系统设计时,从传统花店的经营模式,网上用户需求与业务经营模式,计算机网络管理、系统设计等几方面综合分析,定义系统的输入、输出、实现功能、系统运作能力、系统安全性、系统可维护性等各项要求。其中应用了网页设计工具,数据库Access, 动态网页开发工具ASP,数据库设计,密码,身份验证等技术进行系统的设计与开发。
实现用户足不出户进行商品查询,购买,租借和经验交流等活动;提供最新商品介绍、价格及购花养花字典;方便快捷的后台商品维护、统计报表和用户定单管理;多用户实时数据库访问。用户可操作性:标准统一的用户界面;方便快捷的数据查询、交互式信息渠道;安全可靠的用户档案、定单信息跟踪与管理。
五、致 谢
近几个月时间是我学生生涯中最有价值的一段时光。这里有治学严谨而不失亲切的老师,有互相帮助的同学,更有向上、融洽的学习生活氛围。借此范文之际,我想向所有人表示我的谢意。
首先感谢杨老师。本范文是在杨老师的指导下修改完成的。在此,要对他的细心帮助和指导表示由衷的感谢。在这段时间里,我从他们身上不仅学到了许多的专业知识,更感受到了他们工作中的兢兢业业,生活中的平易近人。此外,他们严谨的治学态度和忘我的工作精神值得我去学习。
非常感谢同学,在我的文档设计中,他的指导给予了我极大的帮助,使我对整个文档设计的思路有了总体的把握,并耐心的帮我解决了许多实际问题,使我有了很大收获。
。
感谢三年来传授我知识的老师们,更要感谢我的家人对我学业上的支持和鼓励,感谢所有关心帮助过我的人。同时感谢大学,感谢工商学院。
总之,在以后的学习生活中我将以加倍的努力作为对给予我帮助的学校、老师及同学们的回报。
六、参考文献
[1] 工商学院的课程设计.
[2] ASP从入门到精通[M].北京:电子工业出版社,2006. 1-385.
[3] .北京:清华大学出版社,2001.1-589.
[4] 耿祥义,张跃平.ASP实用教程[M].北京:清华大学出版社,2006.5,83-170.
[5] 飞思科技产品研发中心著.ASP应用开发详解(第二版)[M].北京:电子工业出版社,2006.179-231.
[6] 萨师煊,王 珊.数据库系统概论[M].北京: 高等教育出版社.2006.91-132.
[7] 苏林忠、冀翼. 基于ASP技术的动态WEB开发[J].河南师范大学学报(自然科学版), 2006,31(3):06-07.
[8] 程文.基于ASP开发动态网站的设计与实现[J].现代计算机,2006,总第一四九期:47-50.