📄 pro_body.asp
字号:
<%sub adminpro_body()
dim totalnews,Currentpage,totalpages,i
sql="select * from p_info order by p_id DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<HTML><HEAD><TITLE>管理中心</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="inc/djcss.css" type=text/css rel=StyleSheet>
<META content="MSHTML 6.00.2800.1126" name=GENERATOR>
<SCRIPT language=javascript>
var upfile_obj;
function OnUpFile()
{
upfile_obj.src=upfile_obj.lowsrc;
upfile_obj.src=document.forms["form1"].upfile.value;
}
</SCRIPT>
<script language = "javascript">
var i,j;
j=0;
goaler = new Array();
<%set rs_p=conn.execute("select * from p_class_small order by p_small_id")
if rs_p.eof then%>
goaler[0] = new Array("无分类","","");
<%else
i=0
do while not rs_p.eof%>
goaler[<%=i%>] = new Array("<%=rs_p("p_small_type")%>","<%=rs_p("p_type")%>");
<%rs_p.movenext
i=i+1
loop
end if
rs_p.close
%>
j=<%=i%>;
function changelocation(location_id)//传递一级分类的值,从而改变二级分类
{
document.form1.p_small_type.length = 0;
var p_type=location_id;
var i;
for (i=0;i < j; i++)
{
if (goaler[i][1] ==p_type)
document.form1.p_small_type.options[document.form1.p_small_type.length] = new Option(goaler[i][0],goaler[i][0]);
}
}
</script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</HEAD>
<body onkeydown=return(!(event.keyCode==78&&event.ctrlKey)) background=inc/dj_bg.gif>
<table align="center" width="98%" border="1" cellspacing="0" cellpadding="4" bordercolor="#C0C0C0" style="border-collapse: collapse">
<tr>
<td bgcolor="#E8E8E8" colspan="3">产品管理(图片上传时请注意图片的大小和格式，只可以上传大小在200K以下的“.jpg”或“.gif”结尾的图片。)</td>
</tr>
<tr bgcolor="#E8E8E8" align="center">
<td class="chinese" width="10%" bgcolor="#F5F5F5">编号</td>
<td bgcolor="#F5F5F5" class="chinese">产品名称</td>
<td class="chinese" width="20%" bgcolor="#F5F5F5">操作</td>
</tr>
<%if Not rs.EOF then
dim newsperpage
newsperpage=10
rs.movefirst
rs.pagesize=newsperpage
if trim(request("page"))<>"" then
page1=trim(request("page"))
if check_num(page1)=true then
currentpage=clng(request("page"))
if currentpage>rs.pagecount then
currentpage=rs.pagecount
End if
else
currentpage=1
end if
else
currentpage=1
End if
totalnews=rs.recordcount
if currentpage<>1 then
if (currentpage-1)*newsperpage<totalnews then
rs.move(currentpage-1)*newsperpage
dim bookmark
bookmark=rs.bookmark
End if
End if
if (totalnews mod newsperpage)=0 then
totalpages=totalnews\newsperpage
else
totalpages=totalnews\newsperpage+1
End if
i=0
Do While Not rs.EOF and i<newsperpage%>
<tr>
<td bgcolor="#FFFFFF" class="chinese" align="center"><%= rs("p_id") %> </td>
<td bgcolor="#FFFFFF" class="chinese"></span><%= rs("p_name") %>/<%= rs("p_name_e") %></td>
<td bgcolor="#FFFFFF" class="chinese" align="center"><a href="admin_pro.asp?id=<%=rs("p_id")%>&action=editpro#editpro">修改</a> <a href="admin_pro.asp?id=<%=rs("p_id")%>&action=delpro#delpro">删除 </td>
</tr>
<%i=i+1
rs.movenext
loop
else
if rs.EOF and rs.BOF then%>
<tr align="center">
<td bgcolor="#FFFFFF" colspan="3" class="chinese">当前没有产品！</td>
</tr>
<%End if
End if%>
</table>
<table align="center" width="98%" border="0" cellspacing="0" cellpadding="0">
<form name="form100" method="post" action="admin_pro.asp">
<tr>
<td class="chinese" align="right">
<%
if currentpage>1 then %>
<a href="admin_pro.asp?page=<%=currentpage-1%>" title="上一页"><<</a>
<% End if %>
<%=currentpage%>/<% =rs.pagecount%>页, 10条记录/篇每页.
<%
if currentpage<rs.pagecount then %>
<a href="admin_pro.asp?page=<%=currentpage+1%>" title="下一页">>></a>
<% End if %>
<input type="text" name="page" class="textarea" size="4">
<input type="submit" name="Submit" value="Go" class="button"></td>
</tr>
</form>
</table>
<br>
<%if request.QueryString("action")="newpro" then%>
<table align="center" width="98%" border="1" cellspacing="0" cellpadding="4" bordercolor="#C0C0C0" style="border-collapse: collapse">
<form name="form1" method="post" action="">
<INPUT name="upfile" onchange=return(OnUpFile()) type=hidden>
<tr>
<td colspan="2" bgcolor="#E8E8E8"><a name="newpro">新的产品</a></font></td>
</tr>
<tr>
<td width="36%" height="25" bgcolor="#FFFFFF" class="chinese"> 产品名称:
<input name="p_name" type="text" class="textarea" id="p_name" size="30" maxlength="30">
<span class="style1">*</span> </td>
<td width="64%" bgcolor="#FFFFFF" class="chinese">英文名称:
<input name="p_name_e" type="text" class="textarea" id="p_name_e" size="30" maxlength="30"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class="chinese"> 产品型号:
<input name="p_spec" type="text" class="textarea" id="p_spec" value="1.03R" size="30" maxlength="30">
<span class="style1">*</span> </td>
<td bgcolor="#FFFFFF" class="chinese">英文型号:
<input name="p_spec_e" type="text" class="textarea" id="p_spec_e" value="ydaer_1" size="30" maxlength="30"></td>
</tr>
<tr>
<td height="12" bgcolor="#FFFFFF" class="chinese"> 产品类别:
<select name="p_type" size="1" id="p_type" onChange="changelocation(document.form1.p_type.options[document.form1.p_type.selectedIndex].value)">
<%set rs=conn.execute("select p_id,p_type from p_class")
if rs.eof then%>
<option selected value="">无一级分类</option>
<%else%>
<option selected value="">一级分类</option>
<%do while not rs.eof
%>
<option value="<%=rs("p_type")%>"><%=rs("p_type")%></option>
<%rs.movenext
loop
end if%>
</select> <select name="p_small_type" >
<option selected value="">二级分类</option>
</select> </td>
<td height="12" bgcolor="#FFFFFF" class="chinese"><input name="p_other2" type="checkbox" id="p_other2" value="1">
加为会员可查看(注意：不选为所有人都可以查看) </td>
</tr>
<tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -