⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 freeadd.asp

📁 产品管理系统 <script language="JavaScript" src="js.asp?nclassid=1"> js.asp改成你的本文件的url nclassid可以改成cl
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
  response.redirect "admin.asp"
end if
%>
<!--#include file="../include/const.asp"-->
<!--#include file="../include/CODE.asp"-->
<html>
<script>
function preview(){
window.open(document.myform.images.value)
}
</script>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>添 加 文 章</title>
<link rel="stylesheet" type="text/css" href="../include/STYLE.CSS">
<%
dim rs
dim sql
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from ANclass order by Nclassid asc"
rs.open sql,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("Nclass"))%>","<%= trim(rs("classid"))%>","<%= trim(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>
</head>

<body>
<br><br>
<form method="POST" name="myform" action="adminsave.asp?action=add">
  <div align="center"><center><table class="border" cellspacing="0" width="80%" border="0" cellpadding="4" cellspacing="0" >
    <tr>
      <td width="100%" class="title" height="20"><center><p><b>添 加 信 息</b></td>
    </tr>
    <tr align="center">
      <td class="tdbg" width="100%">
	<table border="0" cellspacing="1" width="100%">
            <tr> 
              <td width="15%" align="right" valign="top" height="20"><b>产品类型:</b></td>
              <td width="85%"> <%
        sql = "select * from Aclass"
        rs.open sql,conn,1,1
	if rs.eof and rs.bof then
	response.write "请先添加栏目。"
	response.end
	else
%> <select name="classid" onChange="changelocation(document.myform.classid.options[document.myform.classid.selectedIndex].value)" size="1">
                  <option selected value="<%=trim(rs("classid"))%>"><%=trim(rs("class"))%></option>
                  <%      dim selclass
         selclass=rs("classid")
        rs.movenext
        do while not rs.eof
%>
                  <option value="<%=trim(rs("classid"))%>"><%=trim(rs("class"))%></option>
                  <%
        rs.movenext
        loop
	end if
        rs.close
%>
                </select> <select name="Nclassid">
                  <%sql="select * from ANclass where classid="&selclass
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
                  <option selected value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
                  <% rs.movenext
do while not rs.eof%>
                  <option value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
                  <% rs.movenext
loop
end if
        rs.close
        set rs = nothing
        conn.Close
        set conn = nothing
%>
                </select>
                ** </td>
            </tr>
            <tr> 
              <td width="15%" align="right" height="30"><b>产品名称:</b></td>
              <td width="85%" height="30"><input type="text" name="txttitle" size="70"
          class="smallinput" maxlength="100"></td>
            </tr>
            <tr> 
              <td align="right" height="30">产<b>品图片:</b></td>
              <td height="30"><input type="text" name="images" size="60"
          class="smallinput" maxlength="100">
                [<a href="javascript:preview()">图片预览</a>]</td>
            </tr>
            <tr> 
              <td align="right" height="30">图<b>片上传:</b></td>
              <td height="30"><iframe name="ad" frameborder=0 width=100% height=30 scrolling=no src="upload.asp"></iframe></td>
            </tr>
            <tr>
              <td align="right" height="30">是否推荐:</td>
              <td height="30"><input type="checkbox" name="recommend" value="1"></td>
            </tr>
            <tr> 
              <td width="15%" align="right" height="30"><b>UBB标签:</b></td>
              <td width="85%" height="30"> <img onclick=bold() src="pic/icon_editor_bold.gif" width="22" height="22" alt="粗体" border="0"> 
                <img onclick=italicize() src="pic/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0"> 
                <img onclick=underline() src="pic/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0"> 
                <img onclick=center() src="pic/icon_editor_center.gif" width="22" height="22" alt="居中" border="0"> 
                <img onclick=hyperlink() src="pic/icon_editor_url.gif" width="22" height="22" alt="超级连接" border="0"> 
                <img onclick=email() src="pic/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0"> 
                <img onclick=image() src="pic/icon_editor_image.gif" width="23" height="22" alt="图片" border="0"> 
                <img onclick=flash() src="pic/swf.gif" width="23" height="22" alt="Flash图片" border="0"> 
                <img onclick=showcode() src="pic/icon_editor_code.gif" width="22" height="22" alt="编号" border="0"> 
                <img onclick=quote() src="pic/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0"> 
                <img onclick=list() src="pic/icon_editor_list.gif" width="23" height="22" alt="目录" border="0"> 
                <IMG onclick=setfly() height=22 alt=飞行字 src="pic/fly.gif" width=23 border=0> 
                <IMG onclick=move() height=22 alt=移动字 src="pic/move.gif" width=23 border=0> 
                <IMG onclick=glow() height=22 alt=发光字 src="pic/glow.gif" width=23 border=0> 
                <IMG onclick=shadow() height=22 alt=阴影字 src="pic/shadow.gif" width=23 border=0><br>
                字体: 
                <SELECT onchange=showfont(this.options[this.selectedIndex].value) name=font>
                  <option value="宋体" selected>宋体</option>
                  <option value="楷体_GB2312">楷体</option>
                  <option value="新宋体">新宋体</option>
                  <option value="黑体">黑体</option>
                  <option value="隶书">隶书</option>
                  <OPTION value="Andale Mono">Andale Mono</OPTION>
                  <OPTION value=Arial>Arial</OPTION>
                  <OPTION value="Arial Black">Arial Black</OPTION>
                  <OPTION value="Book Antiqua">Book Antiqua</OPTION>
                  <OPTION value="Century Gothic">Century Gothic</OPTION>
                  <OPTION value="Comic Sans MS">Comic Sans MS</OPTION>
                  <OPTION value="Courier New">Courier New</OPTION>
                  <OPTION value=Georgia>Georgia</OPTION>
                  <OPTION value=Impact>Impact</OPTION>
                  <OPTION value=Tahoma>Tahoma</OPTION>
                  <OPTION value="Times New Roman" >Times New Roman</OPTION>
                  <OPTION value="Trebuchet MS">Trebuchet MS</OPTION>
                  <OPTION value="Script MT Bold">Script MT Bold</OPTION>
                  <OPTION value=Stencil>Stencil</OPTION>
                  <OPTION value=Verdana>Verdana</OPTION>
                  <OPTION value="Lucida Console">Lucida Console</OPTION>
                </SELECT> &nbsp;&nbsp;&nbsp;&nbsp; 字体大小 
                <select name="size" onChange="showsize(this.options[this.selectedIndex].value)">
                  <option value="1">1</option>
                  <option value="2">2</option>
                  <option value="3" selected>3</option>
                  <option value="4">4</option>
                </select> &nbsp;&nbsp;&nbsp;<font face="宋体" color=#333333>颜色:</font> 
                <SELECT onchange=showcolor(this.options[this.selectedIndex].value) name=color>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -