www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/html_adds.asp

    <%Admin="InfoAdd"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_info.asp"-->
<!--#include file="config.asp"-->
<%
'==========================================
'
'  晓宇听幽新闻文章管理系统 2004
'
'  主页地址:http://www.xoYu.com
'
'==========================================
'程序名称:晓宇听幽新闻文章管理系统
'英文名称:xoYu News 2004 Professional
'程序创建时间:2003-7-10
'程序完成时间:2003-9-11
'最后修改时间:2003-10-10
'==========================================
set rs=server.CreateObject("ADODB.RecordSet")
TT=TT & "<a class=xoYuNewsSort href=Html_List.asp>文章首页</a>"
if request("id")<>"" then
  rs.open "select * from infotype where id="&request("id"),conn,1,1
    if not rs.EOF then
        TN=split(rs("tname"),"|")
        TI=split(rs("ts"), ",")
          for i = 0 to ubound(TN)-1
            TT=TT & ">> <a class=xoYuStudioSort href=Html_List.asp?id="&TI(i)&">"&TN(i)&"</a>"
          next
    tj=rs("tj")
    end if
    rs.close
end if
thistype=TT
rs.open ("select * from infotype where tj>1 order by ts"),conn,1,1
tn=""
do while not rs.eof
tname=replace(rs("tname"),"|","->")
if rs("tj")=2 and rs("tn")<>tn then
i=i+1
  if i=2 then
  i=0
     color="#808000"
  else
     color="#000000"
  end if
end if
tn=rs("tn")
typelist=typelist&"<option style='COLOR:"&color&"' value='"&rs("id")&"'>"&tname&"</option>"
rs.MoveNext
loop
rs.close



SS=SS & "<a class=xoYuStudioSort href=SpecialLB.asp>专题首页</a>"
if request("SPid")<>"" then
  rs.open "select * from specialx where id="&request("spid"),conn,1,1
    if not rs.EOF then
        TNs=split(rs("sname"),"|")
        TIs=split(rs("ts"), ",")
          for i = 0 to ubound(TNs)-1
            SS=SS & ">> <a class=xoYuStudioSort href=SpecialLB.asp?id="&TIs(i)&">"&TNs(i)&"</a>"
          next
    tjs=rs("tj")
    end if
    rs.close
end if
thisSPtype=SS
SPtypelist=SPtypelist&"<option style='COLOR:"&color&"' value='0'>不属于任何专题</option>"
rs.open ("select * from specialx where tj>1 order by ts"),conn,1,1
tns=""
do while not rs.eof
sname=replace(rs("sname"),"|","->")
if rs("tj")=2 and rs("tn")<>tns then
i=i+1
  if i=2 then
  i=0
     color="#808000"
  else
     color="#000000"
  end if
end if
tns=rs("tn")
SPtypelist=SPtypelist&"<option style='COLOR:"&color&"' value='"&rs("id")&"'>"&sname&"</option>"
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<SCRIPT LANGUAGE=javascript>
<!--
function Juge(frmAnnounce)
{

if (frmAnnounce.id.value == "")
	{
		alert("栏目类别不能为空!");
		frmAnnounce.id.focus();
		return (false);
	}
}
function checktext(text)
{
	allValid = false;
		
	var checkOK = "0123456789";

	for (i = 0;  i < text.length;  i++)
	{
		ch = text.charAt(i);
		for (j = 0;  j < checkOK.length;  j++)
		if (ch == checkOK.charAt(j))
			break;
		if (j == checkOK.length)
		{
  		allValid = true;
			break;
		}
	}
return allValid;
}
//-->
</script>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="WWW.2KY.CN 共享世纪">
<title>共享世纪新闻文章管理系统—添加文章</title>
<link rel="stylesheet" href="admin.css" type="text/css">
</head>
<!--#include file="top.asp"-->
<table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<form action="html_add.asp" method=post name="frmAnnounce">
<tr> 
<th width="100%" class="tableHeaderText" height=25>文章添加 (1/2)</th>
</tr>
<tr>
<td class="forumrow">
<p>第一步:先选择想要添加的栏目,清在选择完成之后点击“进入下一步”进行下面的操作。</td>
</tr>
        <td width="100%" height="10" class="forumrow">
        <p align="center"><b>文章类别</b>:
<select size="1" name="id">
<%
response.write("<option selected value=''>- - = = = 请选择文章分类 = = = - -</option>")
%><%=typelist%>
</select>      
</td></tr> 
<tr>
        <td width="100%" height="9" class="forumrow">
        <p align="center"><b>专题类别</b>:
<select size="1" name="spid">
<%
response.write("<option selected value=''>- - = = = 请选择专题分类 = = = - -</option>")
%><%=SPtypelist%>
</select>      
</td></tr> 
<tr><td class="forumrow">
            <p align="center">
<input type="submit" value="进入下一步" name="B1"> </p>
</form>                                                                                                                     
</td></tr>
</table>