<%

' ======================
' 功能：增加新闻
' 描述：提供一个新增表单，包括新闻标题和新闻内容，新闻内容使用eWebEditor进行编辑；
'       同时接收上传文件，以便删除新闻时，同时删除上传文件；
'       并由编辑区中上传的文件，提供标题新闻的图片选择。
' ======================

'Call Header("增加新闻")
Call Content()
'sCall Footer()


' 本页内容区
Sub Content()
	%>

	<Script Language=JavaScript>
	// 当上传图片等文件时，往下拉框中填入图片路径，可根据实际需要更改此函数
	function doChange(objText, objDrop){
		if (!objDrop) return;
		var str = objText.value;
		var arr = str.split("|");
		var nIndex = objDrop.selectedIndex;
		objDrop.length=1;
		for (var i=0; i<arr.length; i++){
			objDrop.options[objDrop.length] = new Option(arr[i], arr[i]);
		}
		objDrop.selectedIndex = nIndex;
	}

	// 表单提交客户端检测
	function doSubmit(){
		if (document.myform.d_title.value==""){
			alert("新闻标题不能为空！");
			return false;
		}
		// getHTML()为eWebEditor自带的接口函数，功能为取编辑区的内容
		if (eWebEditor1.getHTML()==""){
			alert("新闻内容不能为空！");
			return false;
		}
		document.myform.submit();
	}

	// 表单提交客户端检测
	function doCheck(){

		if (document.myform.d_title.value==""){
			alert("新闻标题不能为空！");
			return false;
		}
		// getHTML()为eWebEditor自带的接口函数，功能为取编辑区的内容
		if (eWebEditor1.getHTML()==""){
			alert("新闻内容不能为空！");
			return false;
		}

		// 表单有效性检测完后，自动上传远程文件
		// 函数：remoteUpload(strEventUploadAfter)
		// 参数：strEventUploadAfter ; 上传完后，触发的函数名，如果上传完后不需动作可不填参数
		eWebEditor1.remoteUpload("doSubmit()");
		return false;

	}

	// 表单提交（当远程上传完成后，触发此函数）
	function doSubmit(){
		document.myform.submit();
	}

	</Script>
	<link href="web_jspok.css" rel="stylesheet" type="text/css" />
	
	
	<form action="addsave.asp" method="post" name="myform" onsubmit="return doCheck();">
	<% '取源文件名 %>
	<input type=hidden name=d_originalfilename>
	<% '取保存的方件名，如果不要带路径的填充下拉框，可以在下面的表单项加入onchange事件 %>
	<input type=hidden name=d_savefilename>
	<% '取保存的文件名（带路径），使用带路径的填充下拉框 %>
	<input type=hidden name=d_savepathfilename onchange="doChange(this,document.myform.d_picture)">

	<table width="100%" align=center cellspacing=1 class="txtbgcolor">
	<tr>
	  <td colspan="2" align="center" class="bgcolor">发布产品</td>
	  </tr>
	<tr>
	  <td colspan="2" align="center" bgcolor="#FFFFFF">&nbsp;</td>
	  </tr>
	<tr>
		<td width="19%" align="center" class="bgcolor">产品名称</td>
		<td width="81%" class="bgcolor"><input type="text" name="d_title" value="" style="width:400px"></td>
	</tr>
	<tr>
	  <td align="center" class="bgcolor">产品类别</td>
	  <td class="bgcolor"><select name="d_type" id="d_type" style="width:400px">
<%Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from webmenu where m_type='产品类型' and m_top<>'root' order by m_id desc"
rs.open sql,conn,1,3 
if not rs.eof and not rs.bof then %>
<%while not rs.eof %>
        <option value="<%=rs("m_name")%>"><%=rs("m_name")%></option>
      <%rs.movenext
	  wend%>
	  <%else%>
	  <option value="没有类别">没有类别</option>
	  <%end if%>
	  </select>
	    <%rs.close
	  set rs=nothing%></td>
	  </tr>
	<tr>
	  <td align="center" class="bgcolor">时&nbsp;&nbsp;&nbsp; 间</td>
	  <td class="bgcolor"><input name="d_time" type="text" id="d_time" style="width:160px" value="<%=date()%>" />
	    型号
	  ：
      <input name="d_pid" type="text" id="d_time" style="width:160px" /></td>
	  </tr>
	
	<tr>
	  <td align="center" class="bgcolor">产品序号</td>
	  <td class="bgcolor"><input name="d_url" type="text" id="d_url" style="width:400px" value="1" /></td>
	  </tr>
	<tr>
	  <td align="center" class="bgcolor">是否置顶</td>
	  <td class="bgcolor"><input type="radio" name="txt_top" value="是" />是
      &nbsp; <input name="txt_top" type="radio" value="否" checked="checked" />否</td>
	  </tr>
	<tr>
      <td align="center" class="bgcolor">产品内容</td>
	  <td class="bgcolor"><%
			' ewebeditor.asp文件调用的参数：
			'	id：下面表单项textarea的名称，在此表单中是d_content，注意大小写
			'	style：编辑器的样式名称，可在eWebEditor的后台设置
			'	originalfilename：用于获取源文件名的表单项名，在此表单中是d_originalfilename
			'	savefilename：用于获取保存文件名的表单项名，在此表单中是d_savefilename
			'	savepathfilename：用于获取保存带路径文件名的表单项名，在此表单中是d_savepathfilename
			%>
          <textarea name="d_content" style="display:none"></textarea>
          <iframe id="eWebEditor1" src="../webdesign/ewebeditor.asp?id=d_content&amp;style=webpic&amp;originalfilename=d_originalfilename&amp;savefilename=d_savefilename&amp;savepathfilename=d_savepathfilename" frameborder="0" scrolling="No" width="100%" height="350"></iframe></td>
	  </tr>
	<tr>
      <td align="center" class="bgcolor">产品图片</td>
	  <td class="bgcolor"><select name="d_picture" size="1" style="width:400px">
	    <option value=''>无</option>
	    </select></td>
	  </tr>
	<tr>
	  <td colspan="2" align="center" class="bgcolor">&nbsp;</td>
	  </tr>
	<tr>
	  <td colspan="2" align="center" class="bgcolor"><input type=submit name=btnSubmit value=" 提 交 " />
      &nbsp;&nbsp;&nbsp;&nbsp;  <input type=reset name=btnReset value=" 重 填 " /></td>
	  </tr>
	</table>
	</form>
	<%
End Sub
%>

 
