www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > admin/IndexGet.asp

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="opendb.asp" -->
<%
'Call CheckUserLogin(username)
Call CheckAdmin()
Call CnkAdminRight(30)

Dim action,ModuleType,wordnum,linenum
action=Trim(Request.Form("action"))
ModuleType=Clng(Request("ModuleType"))
wordnum=Trim(Request.Form("wordnum"))
linenum=Trim(Request.Form("linenum"))
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="admin.css" rel="stylesheet" type="text/css">
</head>
<body>
  <div class="cnkbox">
    <div class="title"><% =GetChannelContent(ChannelID,"ChannelName")%> 首页代码设置</div>
    <div class="content">
      <div id="list">
	  <form method="post" action="" name="form1" onSubmit="return validata_form();">
	  <% Select Case ModuleType
	  Case 1
	  if wordnum="" then wordnum=200 %>
        <ul>
          <li class="t1">首页显示内容字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeContent("&ChannelID&",0,"&wordnum&") %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetHomeContent("&ChannelID&",1,"&wordnum&") %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% Case 2 
		if linenum="" then linenum=6
		if wordnum="" then wordnum=29 %>
		<ul>
          <li class="t1">显示标题行数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
		<ul>
          <li class="t1">每行标题最多显示字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeArticle("&ChannelID&","&linenum&","&wordnum&",0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetHomeArticle("&ChannelID&","&linenum&","&wordnum&",1) %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文最新图片调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetNewArticleImg("&ChannelID&","&wordnum&",150,200,0) %&gt;"%>" size="50" />(ChannelID,标题字数,图片宽,图片高,语言)
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文最新图片调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetNewArticleImg("&ChannelID&","&wordnum&",150,200,1) %&gt;" %>" size="50" />(ChannelID,标题字数,图片宽,图片高,语言)</li>
        </ul>
        <% End If %>
		<% Case 3 
		if linenum="" then linenum=4
		if wordnum="" then wordnum=29 %>
		<ul>
          <li class="t1">显示图片数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
		<ul>
          <li class="t1">显示名称字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetRecommPro("&linenum&","&wordnum&",0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetRecommPro("&linenum&","&wordnum&",1) %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% Case 4 
		if linenum="" then linenum=4
		if wordnum="" then wordnum=29 %>
		<ul>
          <li class="t1">显示产品图片数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
		<ul>
          <li class="t1">显示产品名称字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeImage("&ChannelID&","&linenum&","&wordnum&",0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetHomeImage("&ChannelID&","&linenum&","&wordnum&",1) %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% Case 6 
		if linenum="" then linenum=10
		if wordnum="" then wordnum=20 %>
		<ul>
          <li class="t1">显示标题行数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
		<ul>
          <li class="t1">每行标题最多显示字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeGuestBook("&ChannelID&","&linenum&","&wordnum&",0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetHomeGuestBook("&ChannelID&","&linenum&","&wordnum&",1) %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% Case 7 
		if linenum="" then linenum=6
		'if wordnum="" then wordnum=20 %>
		<ul>
          <li class="t1">显示最新职位个数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeHR("&ChannelID&","&linenum&",0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<% ="&lt;%= GetHomeHR("&ChannelID&","&linenum&",1) %&gt;" %>" size="50" /></li>
        </ul>
        <% End If %>
		<% Case 8 
		if linenum="" then linenum=8
		if wordnum="" then wordnum=20 %>
		<ul>
          <li class="t1">显示网点个数:</li>
          <li class="t2">
            <input name="linenum" class="input" id="linenum" value="<%= linenum %>" size=40 maxlength="3">
          </li>
        </ul>
		<ul>
          <li class="t1">每行标题最多显示字数:</li>
          <li class="t2">
            <input name="wordnum" class="input" id="wordnum" value="<%= wordnum %>" size=40 maxlength="3">
          </li>
        </ul>
        <br />
        <ul>
          <li class="t1">
            <input name="ChannelID" type="hidden" id="ChannelID" value="<%= ChannelID %>" />
			<input name="ModuleType" type="hidden" id="ModuleType" value="<%= ModuleType %>" />
          </li>
          <li class="t2">
            <input name="submit" type="submit" class="button" value="生成新的代码" />
          </li>
        </ul>
		<br>
		<br>
		<br>
		<br>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文首页调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= GetHomeNode("&ChannelID&","&linenum&","&wordnum&") %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
		<% Case 9 %>
        <% If Lang=0 or Lang=2 Then %>
        <ul>
          <li class="t1">中文下拉菜单调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,1,0) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">中文文字链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,2,0) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">中文图片链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,3,0) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">中文文字列表链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,4,0) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
        <% If Lang=1 or Lang=2 Then %>
		<ul>
          <li class="t1">英文下拉菜单调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,1,1) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">英文文字链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,2,1) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">英文图片链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,3,1) %&gt;"%>" size="50" />
          </li>
        </ul>
		<ul>
          <li class="t1">英文图片链接调用代码:</li>
          <li class="t2"><input name="textfield" type="text" class="input" value="<%="&lt;%= HomeLinksList("&ChannelID&",0,4,1) %&gt;"%>" size="50" />
          </li>
        </ul>
        <% End If %>
		<% End Select %>
		</form>
        <div class="clearboth"></div>
      </div>
    </div>
  </div>
</body>
</html>
<% Call Closedb()%>