。
3.3网站数据库设计
此数据库包含如下表:(共5张表格)
表3.1:admin_info
表3.2:goods_info
表3.3:news
表3.4:tj_info
表3.5:user_info
第4章网站设计与实现
4.1前台的功能和实现
前台卖家经过身份验证如果是已经注册的用户可直接登陆到首页,如果是
注册的用户系统提示注册。
买家通过主页面进入商品区,选择进入一个商品区,然后查看商品,选择商品。并且有搜索商品,查看推荐商品的功能。
图4.1
4.2后台的功能和实现
后台管理员可以对商品的类别进行添加,对商品进行添加维护,可以查看前台注册的用户的具体信息,通过管理数据库对留言进行维护。
图4.2
4.3汽车销售系统模块的设计
4.3.1管理员网站参数设计模版
包括了对密码,网站名称,网址,联系方式和公告的管理。
代码如下:<%
ifsession("admin")<>"smallstick"then
response.redirect"login.asp"
response.end
endif
%>
<%
sql="select*fromadmin_info"
setrs=Server.CreateObject("ADODB.Recordset")
rs.opensql,conn,1,3
action=request("action")
ifaction="save"then
adminname=request.form("adminname")
adminpassword=request.form("adminpassword")
homepage=request.form("homepage")
url=request.form("url")
email=request.form("email")
qq=request.form("qq")
gg=request.form("gg")
ifrs.eoforrs.bofthen
rs.addnew
endif
rs("admin_name")=adminname
rs("admin_password")=adminpassword
rs("homepage")=homepage
rs("url")=url
rs("email")=email
rs("qq")=qq
rs("gg")=gg
rs.update
endif
%>
基本资料修改
functionis_number(str)
{
exp=/[^0-9()-]/g;
if(str.search(exp)!=-1)
{
returnfalse;
}
returntrue;
}
functionis_email(str)
{if((str.indexOf("@")==-1)||(str.indexOf(".")==-1)){
returnfalse;
}
returntrue;
}
functionCheckInput(){
if(form.adminname.value==''){
alert("用户名不能为空!");
form.adminname.focus();
returnfalse;
}
if(form.adminname.value.length>20){
alert("用户名超过20个字符!");
form.adminname.focus();
returnfalse;
}
if(form.adminpassword.value==''){
alert("密码不能为空!");
form.adminpassword.focus();
returnfalse;
}
if(form.homepage.value==''){
alert("网站名称不能为空!");
form.homepage.focus();
returnfalse;
}
if(form.url.value==''){
alert("网址不能为空!");
form.url.focus();
returnfalse;
}
if(form.email.value==""){
alert("E-mail不能为空!")
form.email.focus();
returnfalse;
}
if(!is_email(form.email.value))
{alert("非法的EMail地址!");
form.email.focus();
returnfalse;
}
if(form.qq.value=="")
{alert("QQ不能为空!")
form.qq.focus();
returnfalse;
}
if(!is_number(document.form.qq.value)){
alert("QQ号必须是数字!");
form.qq.focus();
returnfalse;
}
returntrue;
}
用户名:
"size="20"maxlength="20">
小于20个字符
密码:
"size="20"maxlength="20">
小于20个字符
网站名称:
"size="30"maxlength="30">
网址:
"size="30"maxlength="50">
网址需包含http://
Email:
"size="30"maxlength="30">
QQ:
"size="20"maxlength="20">
公告:
<%=rs("gg")%>>
4.3.2网站新闻管理
在此模块中,包含了新闻的审核管理,修改和新闻添加等功能
4.3.3销售商商品增加
图4.3管理员登录界面
1.程序清单(goods_add)
functionCheckInput(){
if(input.goodsname.value==''){
alert("商品名称不能为空!");
input.goodsname.focus();
returnfalse;}
if(input.goodscontert("商品描述不能为空!");
input.goodscontent.focus();
returnfalse;}
if(input.goodsprice.value==''){
alert("商品价格不能为空!");
input.goodsprice.focus();
returnfalse;}
if(input.goodsamount.value==''){
alert("商品数量不能为空!");
input.goodsamount.focus();
returnfalse;}
if(input.goodslong.value==''){
alert("有效期不能为空!");
input.goodslong.focus();
returnfalse;}
returntrue;}
发布商品
商品名称
*不超过20个字符注意:注册后不能修改
商品描述:
>
*不超过255个字符
商品价格:
元*
商品数量:
个*
有效期:
有效期
1个礼拜
2个礼拜
1个月
3个月
半年
长期有效
*
商品图片:
上传图片:
<%
Randomize'初始代随机数种子
num1=rnd()'产生随机数num1
num1=int(26*num1)+65'修改num1的范围以使其是A-Z范围的Ascii码,以防表单名出错
session("antry")="test"&chr(num1)'产生随机字符串
%>">
4.3.4图片上传按钮
图4.4
1.程序清单(goods_edit.asp)
<%
ifsession("user_id")=""then
response.write""&VbCRlf
response.write"alert('非法操作!');"&VbCrlf
response.write"history.go(-1);"&vbCrlf
response.write""&VbCRLF
else
ifrequest("action")="upload"then
ifsession("goods_id")<>""then
setrs=server.CreateObject("Adodb.recordset")
sql="select*fromgoods_infowheregoods_id="&session("goods_id")
rs.opensql,conn,1,3
ifrs("goods_pic")<>""then
tempfpath=rs("goods_pic")
FiLePaTh=Server.MapPath(tempfpath)
Setfso=CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(FiLePaTh)
Setfso=nothing
rs.close
setrs=nothing
endif
session("goods_id")=""
endif
user_id="user_id_"&session("user_id")&"_"
nowtime=now()
sj=cstr(year(nowtime))+"-"+right("0"+cstr(month(nowtime)),2)+"-"+right("0"+cstr(day(nowtime)),2)
dimupload,file,formName,formPath,iCount
setupload=newupload_F
functionMakedownName()
dimfname
fname=now()
fname=replace(fname,"-","")
fname=replace(fname,"","")
fname=replace(fname,":","")
fname=replace(fname,"PM","")
fname=replace(fname,"AM","")
fname=replace(fname,"上午","")
fname=replace(fname,"下午","")
fname=int(fname)+int((10-1+1)*Rnd+1)
MakedownName=fname
endfunction
formPath="uploadfiles/"
iCount=0
foreachformNameinupload.file''列出所有上传了的文件
setfile=upload.file(formName)''生成一个文件对象
iffile.FileSize<100then
response.write"上传发生错误,请先选择你要上传的文件! [重新上传]"
response.end
endif
iffile.FileSize>51200then
response.write"上传发生错误,文件大小超过了50K![重新上传]"
response.end
endif
fileExt=lcase(right(file.filename,4))
iffileEXT<>".gif"andfileEXT<>".jpg"andfileEXT<>".bmp"then
response.write"上传发生错误,文件格式不正确![重新上传]"
response.end
endif
iffile.FileSize>0then''如果FileSize>0说明有文件数据
newname=user_id&MakedownName()&"."&mid(file.FileName,InStrRev(file.FileName,".")+1)
file.SaveAsServer.mappath(formPath&newname)''保存文件
iCount=iCount+1
else
response.write"未找到文件返回"
endif
next
Response.Write("parent.input.goodspic.value+='uploadfiles/"&newname&"'")
else
%>
(gif或jpg格式,200K以下)
<%
endif
endif%>
4.3.5销售商商品信息
图4.5
3.程序清单(goods_info.asp)
<%=Conn.ExeCute("selectgoods_namefromgoods_infowheregoods_id="&Request("goods_id")&"")(0)%>
该商品已被浏览<%=rs("goods_hits")%>次
找不到该商品!
<%else
conn.execute("updategoods_infosetgoods_hits=goods_hits+1wheregoods_id="&request("goods_id")&"")
%>
<%=Conn.ExeCute("selectgoods_namefromgoods_infowheregoods_id="&Request("goods_id")&"")(0)%>
该商品已被浏览<%=rs("goods_hits")%>次
target=_blank>"width="80"height="100"
border=0style="border:1pxsolid#008000">
价格:<%=rs("goods_price")%>元
数量:<%=rs("goods_amount")%>个
有效期:<%=rs("goods_long")%>天
上架时间:<%=rs("goods_date")%>
店铺名称:<%=Conn.ExeCute("selectshop_namefromuser_infowhereuser_id="&rs("user_id")&"")(0)%>
店铺掌柜:<%=Conn.ExeCute("selectuser_realnamefromuser_infowhereuser_id="&rs("user_id")&"")(0)%>
店铺地址:<%=Conn.ExeCute("selectshop_addressfromuser_infowhereuser_id="&rs("user_id")&"")(0)%>
联系电话:<%=Conn.ExeCute("selectshop_phonefromuser_infowhereuser_id="&rs("user_id")&"")(0)%>
联系OICQ:&Site=大学校园网络店铺&Menu=yes><%=Conn.ExeCute("selectuser_qqfromuser_infowhereuser_id="&rs("user_id")&"")(0)%>
商品描述:<%=left(rs("goods_content"),100)%>
[">浏览该店铺的其它商品]
<%endif%>
4.3.6销售商商品列表
图4.6
4.程序清单(goods_list.asp)
functionCheckInput(){
if(input.username.value==''){
alert("用户
上一篇:ASP毕业设计选题管理系统(asp+sql)(论文和程序)
下一篇:什么是“双核心期刊”