?? epro.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'/*----------------------------------------------
'項目名: 東區網上書店(ASP課程設計)
'開始日期: 2003年12月18日18:00
'完成日期： 2003年12月27日53:00
'最后修改： -
'制作地點： 科干東區宿舍
'程序制作： 陳文杰
'聯系方式： QQ:168909
'
'
' Email:Cwj@edu.21cn.com
'
' *未經同意本程序不得使用！*
'
' 請尊重他人勞動成果，保留上面信息！
'-----------------------------------------------*/
%><!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/chk.asp"-->
<%
if session("rank")>1 then
call Msgbox("你的權限不夠！","Back","None")
response.End
end if
%>
<%
dim id
id=request.QueryString("id")
If NOT IsEmpty (request("SaveEditSubmit")) then
dim productdate,discount
discount=round(request("price2")/request("price1"),2)
if request("productdateyear")<>"" then
productdate=trim(request("productdateyear"))&"年"&trim(request("productdatemonth"))&"月"
else
productdate=""
end if
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from product where id="&id,conn,1,3
rs("productdate")=productdate
rs("discount")=discount
rs("name")=trim(request("name"))
rs("format")=request("format")
if request("pagenum")<>"" then
rs("pagenum")=int(request("pagenum"))
else
rs("pagenum")=0
end if
if request("printed")<>"" then
rs("printed")=int(request("printed"))
else
rs("printed")=0
end if
rs("author")=trim(request("author"))
rs("mark")=trim(request("mark"))
rs("introduce")=trim(request("introduce"))
rs("price1")=trim(request("price1"))
rs("price2")=trim(request("price2"))
rs("vipprice")=trim(request("vipprice"))
rs("pic")=trim(request("pic"))
rs("categoryid")=int(request("categoryid"))
rs("sortsid")=int(request("sortsid"))
rs("score")=request("score")
rs("type")=trim(request("type"))
if request("detail")<>"" then
rs("detail")=htmlencode2(request("detail"))
end if
if request("content")<>"" then
rs("content")=htmlencode2(request("content"))
end if
if request("detail")<>"" then
rs("desc")=htmlencode2(strvalue(request("detail") ,100))
end if
if request("recommend")=1 then
rs("recommend")=1
else
rs("recommend")=0
end if
rs.Update
rs.Close
set rs=nothing
call MsgBox("修改成功！","GoUrl","mpro.asp")
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>東區網上書店</title>
<link href="../style.css" rel="stylesheet" type="text/css">
</head>
<body>
<!--#include file="head.htm"-->
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="219" align="left" valign="top"><br>
<!--#include file="menu.htm"-->
<br></td><td width="561" align="left" valign="top"> <table border="0" cellpadding="0" cellspacing="0">
<tr>
<td><img src="../images/w.gif" width="18" height="18"></td>
<td style="color:#415373">編輯商品屬性</td>
</tr>
</table> <%
dim count
set rs=server.createobject("adodb.recordset")
rs.open "select * from sorts order by sortsorder ",conn,1,1
%> <script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("sorts"))%>","<%= rs("categoryid")%>","<%= rs("sortsid")%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.myform.sortsid.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform.sortsid.options[document.myform.sortsid.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script> <br> <form action="" method="post" name="myform" id="myform">
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td width="21%" align="right"><span class="redfont">*</span>選擇分類：</td>
<td colspan="2">
<%
rs.open "select * from category order by categoryorder",conn,1,1
if rs.eof and rs.bof then
response.write "請先添加欄目。"
else
dim rs1
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from product where id="&id,conn,1,1
%>
<select name="categoryid" size="1" id="categoryid" onChange="changelocation(document.myform.categoryid.options[document.myform.categoryid.selectedIndex].value)">
<option selected value="<%=rs("categoryid")%>"><%=trim(rs("category"))%></option>
<% dim selclass
selclass=rs1("categoryid")
rs.movenext
do while not rs.eof
response.write "<option value="&rs("categoryid")
if rs1("categoryid")=rs("categoryid") then response.write " selected "
response.write ">"&trim(rs("category"))&"</option>"
rs.movenext
loop
end if
rs.close
%>
</select>
小類：
<select name="sortsid">
<%rs.open "select * from sorts where categoryid="&selclass ,conn,1,1
if not(rs.eof and rs.bof) then
%>
<option selected value="<%=rs("sortsid")%>"><%=rs("sorts")%></option>
<% rs.movenext
do while not rs.eof
response.write "<option value="&rs("sortsid")
if rs1("sortsid")=rs("sortsid") then response.write " selected "
response.write ">"&trim(rs("sorts"))&"</option>"
rs.movenext
loop
end if
rs.close
set rs = nothing
%>
</select>
<font color="#FF0000"> </font></td>
</tr>
<tr>
<td align="right"><span class="redfont">*</span>書名： </td>
<td colspan="2"><input name="name" type="text" id="name2" size="30" value="<%=trim(rs1("name"))%>"></td>
</tr>
<tr>
<td align="right"><span class="redfont">*</span>作者：</td>
<td colspan="2"><input name="author" type="text" id="mark" size="30" value="<%=trim(rs1("author"))%>"></td>
</tr>
<tr>
<td align="right"><span class="redfont">*</span>出 版 社：</td>
<td colspan="2"><input name="mark" type="text" id="mark2" size="30" value="<%=trim(rs1("mark"))%>"></td>
</tr>
<tr>
<td align="right">裝幀： </td>
<td colspan="2"><input name="introduce" type="text" id="introduce2" size="30" value="<%=trim(rs1("introduce"))%>"></td>
</tr>
<tr>
<td height="20" align="right"><span class="redfont">*</span>出版日期：</td>
<td colspan="2"><select name="productdateyear" id="select">
<%dim i
for i=1996 to 2006
response.write "<option value="&i
if int(left(rs1("productdate"),4))=i then response.write " selected "
response.write ">"&i&"</option>"
next
%>
</select>
年
<select name="productdatemonth" id="select2">
<%dim b
b=array("01","02","03","04","05","06","07","08","09","10","11","12")
for i=1 to 12
response.write "<option value="&trim(b(i-1))
if left(right(rs1("productdate"),3),2)=trim(b(i-1)) then response.write " selected "
response.write ">"&i&"</option>"
next%>
</select>
月</td>
</tr>
<tr>
<td align="right" valign="top"><span class="redfont">*</span>價格： </td>
<td colspan="2">市場價：
<input name="price1" type="text" id="price12" size="5" onkeypress = "return regInput(this, /^\d*\.?\d{0,2}$/, String.fromCharCode(event.keyCode))"
onpaste = "return regInput(this, /^\d*\.?\d{0,2}$/, window.clipboardData.getData('Text'))"
ondrop = "return regInput(this, /^\d*\.?\d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=rs1("price1")%>">
元，普通會員價
<input name="price2" type="text" id="price22" size="5" onkeypress = "return regInput(this, /^\d*\.?\d{0,2}$/, String.fromCharCode(event.keyCode))"
onpaste = "return regInput(this, /^\d*\.?\d{0,2}$/, window.clipboardData.getData('Text'))"
ondrop = "return regInput(this, /^\d*\.?\d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=rs1("price2")%>">
元, VIP會員價：
<input name="vipprice" type="text" id="vipprice2" size="5" onkeypress = "return regInput(this, /^\d*\.?\d{0,2}$/, String.fromCharCode(event.keyCode))"
onpaste = "return regInput(this, /^\d*\.?\d{0,2}$/, window.clipboardData.getData('Text'))"
ondrop = "return regInput(this, /^\d*\.?\d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=rs1("vipprice")%>">
元<br>
贈送積分：
<INPUT NAME="score" VALUE="<%=trim(rs1("score"))%>" SIZE="4" TYPE="text" ONKEYPRESS = "return regInput(this, /^[0-9]*$/, String.fromCharCode(event.keyCode))"
ONPASTE = "return regInput(this, /^[0-9]*$/, window.clipboardData.getData('Text'))"
ONDROP = "return regInput(this, /^[0-9]*$/, event.dataTransfer.getData('Text'))">
分</td>
</tr>
<tr>
<td height="19" align="right">開本：</td>
<td colspan="2"><input name="format" type="text" id="grade2" size="10" value="<%=trim(rs1("format"))%>"></td>
</tr>
<tr>
<td height="19" align="right">版次：</td>
<td colspan="2"><input name="printed" type="text" id="printed" value="<%=trim(rs1("printed"))%>" size="10"></td>
</tr>
<tr>
<td height="19" align="right">頁數： </td>
<td colspan="2"><input name="pagenum" type="text" id="pagenum" value="<%=trim(rs1("pagenum"))%>" size="10"></td>
</tr>
<tr>
<td height="19" align="right"><span class="redfont">*</span>ISBN：</td>
<td colspan="2"><input name="type" type="text" id="type" value="<%=trim(rs1("type"))%>" size="30">
</td>
</tr>
<tr>
<td align="right"><span class="redfont">*</span>商品圖片：</td>
<td colspan="2"><input name="pic" type="text" id="pic2" size="30" value="<%=trim(rs1("pic"))%>">
<input type="button" name="Submit2" value="上 傳" onClick="javascript:window.open('upfile.asp','','width=580,height=160,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"></td>
</tr>
<tr>
<td align="right" valign="top">詳細說明： </td>
<td colspan="2"><textarea name="detail" cols="46" rows="8" id="textarea"><% if rs1("detail")<>"" then response.write HTMLDecode(trim(rs1("detail")))%></textarea></td>
</tr>
<tr>
<td align="right" valign="top">目錄：</td>
<td colspan="2"><textarea name="content" cols="46" rows="8" id="textarea2"><%if rs1("content")<>"" then response.write HTMLDecode(trim(rs1("content")))%></textarea></td>
</tr>
<tr>
<td height="32" colspan="3"><div align="center"> </div> <div align="center">
<input name="recommend" type="checkbox" id="recommend2" value="1" <%if rs1("recommend")=1 then response.write "checked"%>>
推薦此商品
<input type="submit" name="SaveEditSubmit" value="修改" onClick="return check();">
<input name="id" type="hidden" id="id" value="<%=id%>">
</div></td>
</tr>
</table>
</form> <%rs1.close
set rs1=nothing
conn.close
set conn=nothing%> <script language="JavaScript">
<!--
function checkpro()
{
if(checkspace(document.myform.name.value)) {
document.myform.name.focus();
alert("請輸入書名！");
return false;
}
if(checkspace(document.myform.author.value)) {
document.myform.author.focus();
alert("請輸入作者！");
return false;
}
if(checkspace(document.myform.mark.value)) {
document.myform.mark.focus();
alert("請輸入出版社！");
return false;
}
if(checkspace(document.myform.type.value)) {
document.myform.type.focus();
alert("請輸入ISBN！");
return false;
}
if(checkspace(document.myform.price1.value)||document.myform.price1.value==0) {
document.myform.price1.focus();
alert("請輸入市場價！");
return false;
}
if(checkspace(document.myform.price2.value)||document.myform.price2.value==0) {
document.myform.price2.focus();
alert("請輸入會員價！");
return false;
}
if(checkspace(document.myform.vipprice.value)||document.myform.vipprice.value==0) {
document.myform.vipprice.focus();
alert("請輸入VIP價！");
return false;
}
if(checkspace(document.myform.price1.value)) {
document.myform.price1.focus();
alert("請輸入商品市場價格！");
return false;
}
if(checkspace(document.myform.price2.value)) {
document.myform.price2.focus();
alert("請輸入商品會員價格！");
return false;
}
if(checkspace(document.myform.vipprice.value)) {
document.myform.vipprice.focus();
alert("請輸入VIP月會員商品價格！");
return false;
}
}
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function regInput(obj, reg, inputStr)
{
var docSel = document.selection.createRange()
if (docSel.parentElement().tagName != "INPUT") return false
oSel = docSel.duplicate()
oSel.text = ""
var srcRange = obj.createTextRange()
oSel.setEndPoint("StartToStart", srcRange)
var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
return reg.test(str)
}
//-->
</script> <br> <br>
</td>
</tr>
</table>
<!--#include file="foot.htm"-->
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -