📄 pro_body.asp
字号:
<td height="15" colspan="2" bgcolor="#FFFFFF">产品缩略图:<input name="p_pic" type="text" class="textarea" id="p_pic" value="" size="30" maxlength="100">
上传图片：<iframe name=uploadformu frameborder=0 width=400 height=22 scrolling=no src=admin_upload.asp></iframe> </td>
</tr>
<tr>
<td height="25" colspan="2" align="left" bgcolor="#FFFFFF" class="chinese"> 中文简介1：
以下编辑器使用和Word相似,但请注意内容不要太多字数在1500以下为佳。</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF"><textarea name="p_jianjie" style="display:none"></textarea><iframe ID="eWebEditor1" src="eWebEditor/ewebeditor.asp?id=p_jianjie&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF"> 英文简介：</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF"><textarea name="p_jianjie_e" style="display:none"></textarea><iframe ID="eWebEditor1" src="eWebEditor/ewebeditor.asp?id=p_jianjie_e&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
</td>
</tr>
<tr>
<td height="30" colspan="2" align="center" bgcolor="#F5F5F5" class="chinese">
<input type="submit" name="Submit2" value="确定新增" class="button">
<input type="reset" name="Reset" value="清空重填" class="button"> </td>
</tr>
<input type="hidden" name="action" value="newpro">
<input type="hidden" name="MM_insert" value="true">
</form>
</table>
<%End if
if request.QueryString("action")="editpro" then
if request.querystring("id")="" then
errmsg=errmsg+"<br>"+"<li>请指定操作的对象！"
Call diserror()
response.End
else
if Not isinteger(request.querystring("id")) then
errmsg=errmsg+"<br>"+"<li>非法的产品ID参数！"
Call diserror()
response.End
End if
End if
sql="select * from p_info where p_id="&cint(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<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>
<input name="upfile2" type="hidden" value="<%= rs("p_pic") %>">
<tr>
<td colspan="2" bgcolor="#E8E8E8"><a name="newpro">修改产品1</a></font>
(注意：不要修改的地方，请不要改动保持原样！）</td>
</tr>
<tr>
<td width="38%" bgcolor="#FFFFFF" class="chinese"> 产品名称:
<input name="p_name" type="text" class="textarea" id="p_name" value="<%= rs("p_name") %>" size="30" maxlength="30">
<span class="style1">*</span> </td>
<td width="62%" bgcolor="#FFFFFF" class="chinese">英文名称:
<input name="p_name_e" type="text" class="textarea" id="p_name_e" value="<%= rs("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="<%= rs("p_spec") %>" 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="<%= rs("p_spec_e") %>" size="30" maxlength="30"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class="chinese"> 产品类别:
<select name="p_type" id="p_type" onChange="changelocation(document.form1.p_type.options[document.form1.p_type.selectedIndex].value)">
<%
'###############取出类别分类#################
'dim sql_p,rs_p
sql_p="select p_id,p_type from p_class"
set rs_p=server.createobject("adodb.recordset")
rs_p.open sql_p,conn,1,1
if Not(rs_p.BOF and rs_p.EOF) then
Do While Not rs_p.EOF
%>
<option value="<%= rs_p("p_type") %>" <% if rs_p("p_type")=rs("p_type") then Response.Write("selected") End if %> ><%= rs_p("p_type") %></option>
<%
rs_p.movenext
loop
rs_p.close
set rs_p=Nothing
'conn.close
'set conn=Nothing
End if
'####################取出分类结束#####################
%>
</select> <select name="p_small_type">
<option selected value="<%=rs("p_small_type")%>"><%=rs("p_small_type")%></option>
</select> </td>
<td bgcolor="#FFFFFF" class="chinese"><input name="p_other" type="checkbox" id="p_other3" value="1" <% if rs("p_other")=1 then %>checked <% End if %>>
加为会员可查看(注意：不选为所有人都可以查看) </td>
</tr>
<tr>
<td height="30" bgcolor="#FFFFFF" class="chinese">产品图片:
<input name="p_pic" type="text" class="textarea" id="p_pic" value="<%= rs("p_pic") %>" size="30" maxlength="100">
</td>
<td height="30" bgcolor="#FFFFFF" class="chinese">排序数值:
<input name="p_order" type="text" class="textarea" id="p_order2" value="<%= rs("p_order") %>" size="15" maxlength="15">
可以不填,数值越大,排得越前</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF" class="chinese">上传图片：<iframe name=ad frameborder=0 width=400 height=22 scrolling=no src=admin_upload.asp></iframe></td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF" class="chinese"> 中文简介1：</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF" class="chinese">
<textarea name="p_jianjie" style="display:none"><%=Server.HTMLEncode(Rs("P_jianjie"))%></textarea><iframe ID="eWebEditor1" src="eWebEditor/ewebeditor.asp?id=p_jianjie&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF" class="chinese"> 英文简介：</td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#FFFFFF" class="chinese">
<textarea name="p_jianjie_e" style="display:none"><%=Server.HTMLEncode(Rs("P_jianjie_e"))%></textarea><iframe ID="eWebEditor1" src="eWebEditor/ewebeditor.asp?id=p_jianjie_e&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
</td>
</tr>
<tr>
<td height="30" colspan="2" align="center" bgcolor="#F5F5F5" class="chinese">
<input type="submit" name="Submit2" value="确定修改" class="button">
<input type="reset" name="Reset" value="清空重填" class="button"> </td>
</tr>
<input type="hidden" name="id" value="<%= cint(request.querystring("id")) %>">
<input type="hidden" name="action" value="editpro">
<input type="hidden" name="MM_insert" value="true">
</form>
</table>
<%End if
if request.QueryString("action")="delpro" then
if request.querystring("id")="" then
errmsg=errmsg+"<br>"+"<li>请指定操作的对象！"
Call diserror()
response.End
else
if Not isinteger(request.querystring("id")) then
errmsg=errmsg+"<br>"+"<li>非法的产品ID参数！"
Call diserror()
response.End
End if
End if
sql="select * from p_info where p_id="&cint(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1%>
<table align="center" width="98%" border="1" cellspacing="0" cellpadding="4" bordercolor="#C0C0C0" style="border-collapse: collapse">
<form name="form1" method="post" action="">
<tr>
<td bgcolor="#E8E8E8"><a name="newpro">删除产品</a></font></td>
</tr>
<tr>
<td align="center" valign="top" bgcolor="#FFFFFF" class="chinese"> <span class="style1">你 确 定 要 删 除 ？</span></td>
</tr>
<tr>
<td bgcolor="#F5F5F5" class="chinese" height="30" align="center">
<input type="submit" name="Submit2" value="确定删除" class="button">
【<a href="admin_pro.asp">返回</a>】 </td>
</tr>
<input type="hidden" name="id" value="<%= request.querystring("id") %>">
<input type="hidden" name="action" value="delpro">
<input type="hidden" name="MM_insert" value="true">
</form>
</table>
<%End if%>
<br>
</td>
</tr>
<tr>
<td colspan="3" height="1" background="images/dotlineh.gif"></td>
</tr>
</table>
<%
rs.close
set rs=Nothing
End sub%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -