📄 editinfo.asp

📁 全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 系统概述：软件名称：全球商务网站系统当前版本：V1.0 最新版本：V1.1 运行环境：WINNT+（IIS）
💻 ASP
字号:
<%@ codepage ="936" %>
<!--#include file="../../conn/conn.asp"-->
<%
if Request.Cookies("globalec")("globalecmaster")="" or Request.Cookies("globalec")("masterflag")="" then
response.write "<script language='javascript'>"
response.write"this.location.href='../login.asp';</SCRIPT>" 
response.end
end if
if instr(Request.Cookies("globalec")("masterflag"),"83")=0 then
response.redirect "../err.asp"
response.end
end if
if request("id")="" then
Response.Redirect ("/login/chklogin.asp?login=4")
end if

if Chkrequest(request("id")) then
id=request("id")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加商业信息</title>
<link rel="stylesheet" type="text/css" href="../css/style.css">
</head>
<script LANGUAGE="JavaScript">
function check()
{
if (document.form.title.value=="")
{
alert("请输入资讯标题！")
document.form.title.focus()
document.form.title.select()
return
}
if (document.form.typeid.value=="")
{
alert("请选择资讯所属类别！")
document.form.typeid.focus()
document.form.typeid.select()
return
}
if (document.form.nfrom.value=="")
{
alert("请输入资讯添加人！")
document.form.nfrom.focus()
document.form.nfrom.select()
return
}

document.form.submit()
}
</script>
<table width="98%" border="0" cellspacing="0" cellpadding="0" align=center class="tableBorder"> 
  <tr> 
     <th height=25 colspan="2" class="tableHeaderText">商业信息管理 </th> 
  </tr> 
  <tr> 
     <td colspan="2" class="forumRowHighlight"><p><B>注意</B>：<BR> 
         ①类别直接与发布的信息相关联，删除类别可能会影响到以前发布的专项商机信息。<BR> </td> 
  </tr> 
  <tr> 
     <td width="10%" height=25 class="forumRowHighlight"> <B>操作选项</B></td> 
         <FORM name=searchForm action="info.asp" method=post onsubmit="javascript:if(doSearch()==false) return false;"><td class="forumRowHighlight">
       关键字：<input name="keywords" type="text" value="<%=keywords%>">
&nbsp;所属类别：
<select name="typeid" size="1">  
<%
set rs1=conn.execute("select * from expoinfotype")
do while not rs1.eof
response.write "<option value='"&rs1("id")&"'>"&rs1("type")&"</option>"&chr(13)+chr(10)
rs1.movenext
loop
rs1.close
%>
</select> <input type="submit" value="立刻查找" id=submit name=submit>
         </td></form>
  </tr>
  <tr>
    <td height=25 class="forumRowHighlight">&nbsp;</td>
	 <td class="forumRowHighlight"><a href="info.asp">管理展会资讯</a> | <a href="addinfo.asp">添加展会资讯信息</a> | <a href="type.asp">管理信息类别</a> | <a href="Class_Ok.asp?action=add_class_1">添加信息类别</a> | [<a href="javascript:location.reload()">刷新页面</a>] </td> 
  </tr> 
</table> 
<%
sql="select * from expoinfo where id="&id
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1

set rs1=conn.execute("select * from expoinfotype where id="&rs("typeid")&"")
%>
<form name="form" method="POST" action="saveedit.asp">
 <input type="hidden" name="picture" value = "<%if rs("picture")<>"nopicture.gif" then  response.write""&rs("picture")&""%>"> 
<input type="hidden" name="id" value="<%=rs("id")%>">
  <TABLE width="100%" border="0" align=center cellpadding="0" cellspacing="1" class="tableBorder"> 
    <tr> 
      <th height=25 colspan="2" class="tableHeaderText">添加商业信息</th> 
    </tr> 
    <TR ALIGN="center"> 
      <TD> <TABLE width="100%" border="0" cellpadding="5" cellspacing="2" bordercolorlight="#CEE7FF" bordercolordark="#CEE7FF" style="border-collapse: collapse"> 
          <TR> 
            <TD width="210" align="right" class="Forumrow"><b>信息标题：</b></TD> 
            <TD width="729" class="Forumrow"> <font color="#F4FAFF"> 
              <select name='IncludePic'> 
                <option selected> </option> 
                <option value='[图文]'>[图文]</option> 
                <option value='[组图]'>[组图]</option> 
                <option value='[推荐]'>[推荐]</option> 
                <option value='[注意]'>[注意]</option> 
              </select> 
              <input name="title" type="text" class="smallInput" value="<%=rs("title")%>" size="55"> 
              </font> <font color='#FF0000'>*</font> 
              <select name='TitleFontColor' id='TitleFontColor'> 
                <option value='' selected>颜色</option> 
                <option value=''>默认</option> 
                <option value='#000000' style='background-color:#000000'></option> 
                <option value='#FFFFFF' style='background-color:#FFFFFF'></option> 
                <option value='#008000' style='background-color:#008000'></option> 
                <option value='#800000' style='background-color:#800000'></option> 
                <option value='#808000' style='background-color:#808000'></option> 
                <option value='#000080' style='background-color:#000080'></option> 
                <option value='#800080' style='background-color:#800080'></option> 
                <option value='#808080' style='background-color:#808080'></option> 
                <option value='#FFFF00' style='background-color:#FFFF00'></option> 
                <option value='#00FF00' style='background-color:#00FF00'></option> 
                <option value='#00FFFF' style='background-color:#00FFFF'></option> 
                <option value='#FF00FF' style='background-color:#FF00FF'></option> 
                <option value='#FF0000' style='background-color:#FF0000'></option> 
                <option value='#0000FF' style='background-color:#0000FF'></option> 
                <option value='#008080' style='background-color:#008080'></option> 
              </select></TD> 
          </TR>
		            <TR> 
            <TD align="right" valign="middle" class="Forumrow"><b>信息分类：</b></td> 
            <TD class="Forumrow"> <font color="#F4FAFF"> 
              <select name="typeid" size="1" class="lh17">
<option selected value="<%=rs1("id")%>"><%=rs1("type")%></option> 
          <%
set rs1=conn.execute("select * from expoinfotype")
do while not rs1.eof
response.write "<option value='"&rs1("id")&"'>"&rs1("type")&"</option>"&chr(13)+chr(10)
rs1.movenext
loop
rs1.close
%> 
              </select> <a href="Class_Ok.asp?action=add_class_1"><font color='#FF0000'>添加</font></a></font> 
			   </font></TD> 
          </TR>  
          <TR> 
            <TD align="right" class="Forumrow"><b>信息属性： </b></TD> 
            <TD class="Forumrow"><input name="tj" type="checkbox" id="tj" value="1" <%if rs("tj")=1 then response.write"CHECKED"%>> 
              推荐&nbsp;&nbsp;&nbsp;<input name="pic_on" type="checkbox" id="pic_on" value="1" onClick=showadv()>
<font color="red"><span id="advance">上传标题图片</span></TD> 
          </TR>
		  		  		  		  <TR>
		  <td class="Forumrow"></td> 
<TD class="Forumrow">
<table width="100%" border="0" cellspacing="0" cellpadding="0" id=adv style="DISPLAY: none">
  <tr>
    <td width="92%">
<IFRAME name="upload" MARGINHEIGHT=0 MARGINWIDTH=0 Frameborder=0 SCROLLING=no width=100% height=35 bordercolor="#f1f3f5" Src="AdvUploadPicture.asp"></IFRAME> 
	  </td>
  </tr>
</table></TD>
</TR>
		  <TR> 
            <TD align="right" class="Forumrow"><b>信息来源：</b></td> 
            <TD valign="middle" class="Forumrow"><font color="#F4FAFF"> 
              <input name="nfrom" type="text" class="smallInput" value="<%=rs("nfrom")%>" size="50"> 
              <font color='blue'><=【<font color='green' onclick="document.form.nfrom.value='<%=webname%>信息中心'" style="cursor:hand;"><%=webname%>信息中心</font>】</font>
            </TD> 
          </TR> 
          <TR> 
            <TD align="right" class="Forumrow"><b>详细信息：</b></TD> 
            <TD class="Forumrow"><textarea name="content" style="display:none"><%=rs("content")%></textarea><iframe ID="eWebEditor1" src="../../editor/ewebeditor.asp?id=content&style=standard&originalfilename=d_originalfilename &savefilename=d_savefilename &savepathfilename=d_savepathfilename" frameborder="0" scrolling="no" width="617" HEIGHT="450"></iframe></TD> 
          </TR> 
          <TR height="40"> 
            <TD colspan="2" align="center" class="Forumrow" height="40">
              <input type="button" name="Submit" value=" 提　交 保 存" class="smallInput" onclick="check()">
			  &nbsp;&nbsp;&nbsp; 
            <input type="reset" name="Submit2" value=" 重　新 添 写" class="smallInput">          </TR> 
      </TABLE></TD> 
    </TR> 
  </TABLE> 
</FORM> 
<script>
function showadv(){
if (document.form.pic_on.checked == true) {
		adv.style.display = "";
		advance.innerText="取消上传标题图片"
	}else{
		adv.style.display = "none";
		advance.innerText="上传标题图片"
	}
}		
</script> 
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<!--#include file="../copy.asp" -->
💿 文件大小 12670 K
👤 上传用户 lujing200912345
📂 所属分类 SQL Server
🏷️ 相关标签

#GLOBALEC #WINNT #HTML
⌨️ 快捷键说明

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