?? admin_inc.asp
字號:
subcat[<%=count%>] = new Array("<%= trim(rs("Nclass"))%>","<%= rs("anclassid")%>","<%= rs("Nclassid")%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.myform.Nclassid.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{ //這句不是很理解
document.myform.Nclassid.options[document.myform.Nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<tr>
<td width="20%" bgcolor="#D6DBF7" align="center">
選擇分類：
</td>
<td width="80%" bgcolor="#D6DBF7">
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_books where bookid="&bookid,conn,1,1
rs.open "select * from shop_anclass order by anclassidorder",conn,1,1
if rs.eof and rs.bof then
response.write "請先添加欄目。"
response.end
else
%>
<select class="wenbenkuang" name="anclassid" size="1" id="anclassid" onChange="changelocation(document.myform.anclassid.options[document.myform.anclassid.selectedIndex].value)">
<%
do while not rs.eof
%>
<option value="<%=rs("anclassid")%>" <%if rs1("anclassid")=rs("anclassid") then%>selected<%end if%>><%=trim(rs("anclass"))%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select>
小類：
<select class="wenbenkuang" name="Nclassid">
<%rs.open "select * from shop_Nclass where anclassid="&rs1("anclassid") ,conn,1,1
do while not rs.eof%>
<option value="<%=rs("NclassID")%>" <%if rs1("nclassid")=rs("nclassid") then%>selected<%end if%>><%=rs("Nclass")%></option>
<% rs.movenext
loop
rs.close
set rs = nothing
%>
</select>
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=1 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7" width="91%">
<input class="wenbenkuang" name="bookname" type="text" id="bookname" size="20" value="<%=trim(rs1("bookname"))%>">
浮動價
<select class="wenbenkuang" name="fudongjia" size=1>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_fudong order by id ",conn,1,1
if rs.recordcount=0 then
response.write "請先添加浮動價"
else
while not rs.eof
%>
<option value=<%=rs("id")%><%if rs1("banci")=rs("id") then%> selected<%end if%>><%=rs("shuoming")%></option>
<%
rs.movenext
wend
end if%>
</select>
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=2 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">
<input class="wenbenkuang" name="pingpai" type="text" id="pingpai" size="20" value="<%=trim(rs1("pingpai"))%>">
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=4 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">
<input class="wenbenkuang" name="bookchuban" type="text" id="bookchuban" size="5" value="<%=trim(rs1("bookchuban"))%>">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from danwei order by danweiorder ",conn,1,1
%>
<select class="wenbenkuang" name="select" onchange="(document.myform.bookchuban.value=this.options[this.selectedIndex].value)">
<option selected>請選擇單位</option>
<%
while not rs.eof
%>
<option value="<%=rs("danweiname")%>"><%=rs("danweiname")%></option>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>
</select>
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=5 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">市場價￥
<input class="wenbenkuang" name="shichangjia" type="text" id="shichangjia" 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("shichangjia")%>">
會員價￥
<input class="wenbenkuang" name="huiyuanjia" type="text" id="huiyuanjia" 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("huiyuanjia")%>">
VIP 價￥
<input class="wenbenkuang" name="vipjia" type="text" id="vipjia" 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("vipjia")%>">
元</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=6 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">庫存數(shù)：
<input class="wenbenkuang" name="kucun" type="text" id="kucun" value="<%=rs1("kucun")%>" size="5" 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'))" >
已銷售：
<input class="wenbenkuang" name="chengjiaocount" type="text" id="chengjiaocount" value="<%=rs1("chengjiaocount")%>" size="5" 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'))" readonly>
送積分：
<input class="wenbenkuang" name="yeshu" type="text" id="yeshu" value="<%=rs1("yeshu")%>" size="5" 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 bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=7 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">
<input class="wenbenkuang" name="bookpic" type="text" id="bookpic" size="20" value="<%=trim(rs1("bookpic"))%>">
<input class="go-wenbenkuang" type="button" name="Submit2" value="上傳小圖片" onClick="window.open('../upload_flash.asp?formname=myform&editname=bookpic&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')">
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7"></td>
<td bgcolor="#D6DBF7">
<input class="wenbenkuang" name="zhuang" type="text" id="zhuang" size="20" value="<%=trim(rs1("zhuang"))%>">
<input class="go-wenbenkuang" type="button" name="Submit2" value="上傳大圖片" onClick="window.open('../upload_flash.asp?formname=myform&editname=zhuang&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')">
</td>
</tr>
<tr>
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=8 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">
<textarea class="wenbenkuang" name="bookcontent" cols="50" rows="10" id="bookcontent"><%=trim(rs1("bookcontent"))%></textarea></td>
</tr>
<tr>
<td bgcolor="#D6DBF7"></td>
<td bgcolor="#D6DBF7">
<input name="newsbook" type="checkbox" id="bestbook" value="1" <%if rs1("newsbook")=1 then%>checked<%end if%>>
新品
<input name="bestbook" type="checkbox" id="bestbook" value="1" <%if rs1("bestbook")=1 then%>checked<%end if%>>
推薦
<input name="tejiabook" type="checkbox" id="bestbook" value="1" <%if rs1("tejiabook")=1 then%>checked<%end if%>>
特價
</td>
</tr>
<tr>
<%rs1.close
set rs1=nothing%>
<td bgcolor="#D6DBF7"></td>
<td bgcolor="#D6DBF7">
<input class="go-wenbenkuang" onClick="return check();" type="submit" name="Submit" value=" 修改保存 ">
<input class="go-wenbenkuang" onclick="ClearReset()" type=reset name="Clear" value=" 重新填寫 ">
</td>
</tr>
</table>
</form>
<%
end sub
sub myziliao()
if request.cookies("godbook")("shjianame")="" then
response.Redirect "shjia.asp"
response.End
end if
%>
<script language=JavaScript>
function IsDigit()
{
return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function checkuserinfo()
{
if(document.userinfo.useremail.value.length!=0)
{
if (document.userinfo.useremail.value.charAt(0)=="." ||
document.userinfo.useremail.value.charAt(0)=="@"||
document.userinfo.useremail.value.indexOf('@', 0) == -1 ||
document.userinfo.useremail.value.indexOf('.', 0) == -1 ||
document.userinfo.useremail.value.lastIndexOf("@")==document.userinfo.useremail.value.length-1 ||
document.userinfo.useremail.value.lastIndexOf(".")==document.userinfo.useremail.value.length-1)
{
alert("Email地址格式不正確！");
document.userinfo.useremail.focus();
return false;
}
}
else
{
alert("Email不能為空！");
document.userinfo.useremail.focus();
return false;
}
if(checkspace(document.userinfo.dz.value)) {
document.userinfo.dz.focus();
alert("對不起，請?zhí)顚懩脑敿毜刂罚?quot;);
return false;
}
if(checkspace(document.userinfo.pc.value)) {
document.userinfo.pc.focus();
alert("對不起，請?zhí)顚戉]編！");
return false;
}
if(document.userinfo.pc.value.length!=6) {
document.userinfo.pc.focus();
alert("對不起，請正確填寫郵編！");
return false;
}
if(checkspace(document.userinfo.tel.value)) {
document.userinfo.tel.focus();
alert("對不起，請留下您的聯(lián)系電話！");
return false;
}
}
</script>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [shjia] where username='"&request.cookies("godbook")("shjianame")&"' ",conn,1,1
%>
<table class="tableBorder" width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#D6DBF7">
<tr>
<td align="center" background="../admin/images/bg_3.gif" height="25" colspan="4"><b><font color="#ffffff">商店信息修改</font></b></td>
</tr>
<form name="userinfo" method="post" action="saveshjiainfo.asp?action=myziliao">
<tr bgcolor="#D6DBF7">
<td width="30%" align="right">商店名稱：</td>
<td width="70%"><font color=red><%=trim(rs("name"))%></font></td>
</tr>
<tr bgcolor="#D6DBF7">
<td align="right">負責人姓名：</td>
<td>
<input class="wenbenkuang" name="name2" type="text" id="name" maxlength="10" value="<%=trim(rs("name2"))%>">
<font color="#FF0000">**</font></td>
</tr>
<tr bgcolor="#D6DBF7">
<td align="right">電子郵件：</td>
<td>
<input class="wenbenkuang" name=useremail type="text" id="useremail" size="30" maxlength="40" value="<%=trim(rs("useremail"))%>">
<font color="#FF0000">**</font></td>
</tr>
<tr bgcolor="#D6DBF7">
<td align="right">詳細地址：</td>
<td>
<input class="wenbenkuang" name=dz type=text size="30" maxlength="40" value="<%=trim(rs("dz"))%>">
<font color="#FF0000">**</font> </td>
</tr>
<tr bgcolor="#D6DBF7">
<td align="right">聯(lián)系電話：</td>
<td >
<input class="wenbenkuang" name=tel type=text value="<%=trim(rs("tel"))%>" size="12">
<font color="#FF0000">**</font> </td>
</tr>
<tr>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -