<% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="63"
	dir="../err.asp" 
  %>
 <!--#include file="../../conn/conn.asp"-->
 <!--#include file="../rolecheck.asp"-->

<%
 
if request("id")="" then
Response.Redirect ("/login/chklogin.asp?login=4")
end if
if 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> 
<!-- Hide 
function killErrors() { 
return true; 
} 
window.onerror = killErrors; 
 // --> 
</SCRIPT> 


<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  height="20" colspan="2"   ><font color="#666666">温馨提示： 
         ①类别直接与发布的信息相关联，删除类别可能会影响到以前发布的专项商机信息。</font>  </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=server.CreateObject("adodb.recordset")
sql1="select * from Websen_expoinfotype"
rs1.open sql1,conn,1,1
if not rs1.eof then
do while not rs1.eof
response.write "<option value='"&rs1("id")&"'>"&rs1("type")&"</option>"&chr(13)+chr(10)
rs1.movenext
loop
rs1.close
end if
%>
</select> <input type="submit" value="立刻查找" id=submit name=submit>
         </td></form>
  </tr><tr><td height="1" bgcolor="#CCCCCC" colspan="2"></td></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 Websen_expoinfo where id="&id
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if not rs.eof then
 
 %>

  <TABLE width="100%" border="0" align=center cellpadding="0" cellspacing="1" class="tableBorder"> 
    <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")%>"><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"> 
                
              <input name="title" type="text" class="smallInput" value="<%=rs("title")%>" size="55" maxlength="25"> 
              </font> <font color='#FF0000'>*</font> 
              </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  value="" >请选择类别</option>
           <%
set rs1= Server.CreateObject("ADODB.Recordset")
sql1="select * from Websen_expoinfotype"
rs1.open sql1,conn,1,1
if not rs1.eof then
do while not rs1.eof
%>
 <option value="<%=rs1("id")%>" <%if rs("typeid")=rs1("id") then response.Write("selected") end if%>><%=rs1("type")%></option>
 <%
rs1.movenext
loop
rs1.close
end if
 %> 
              </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 type="checkbox" name="topzhi" id="topzhi" value="1">置顶&nbsp;&nbsp;&nbsp;<input name="pic_on" type="checkbox" id="pic_on" value="1" onClick=showadv()>
<font color="red"><span id="advance">上传标题图片</span>
<%
if rs("picture")<>""  or rs("picture")<>"nopicture.gif" then
  %>
<img src="../../UploadFile/<%=rs("picture")%>"  width="35" height="35">

<%
else
%>
暂无图片!
<%
end if
%></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 id="d_file" frameborder="0" src="../../inc/upload.asp?tMode=4&istwo=0&utype=expkind" width="300" height="40" scrolling="no"></iframe>
  <!---------------------------------------------------------------------------> 
  <input type="hidden" name="oldpic" value="<%=rs("picture")%>" maxlength="40"> 
	  </td>
  </tr>
  <tr><td><input type="radio" name="cimg" value="1" checked><b><font color="red">▲</font></b>使用原有图片 
           <input type="radio" name="cimg" value="2"><b><font color="red">◆</font></b>删除原有图片重新上传</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" maxlength="25"> 
              <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> </FORM> 

  </TABLE> 
<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
end if
conn.close
set conn=nothing
%>
<!--#include file="../copy.asp" -->