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="<%="<%= GetHomeContent("&ChannelID&",0,"&wordnum&") %>"%>" 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="<% ="<%= GetHomeContent("&ChannelID&",1,"&wordnum&") %>" %>" 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="<%="<%= GetHomeArticle("&ChannelID&","&linenum&","&wordnum&",0) %>"%>" 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="<% ="<%= GetHomeArticle("&ChannelID&","&linenum&","&wordnum&",1) %>" %>" 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="<%="<%= GetNewArticleImg("&ChannelID&","&wordnum&",150,200,0) %>"%>" 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="<% ="<%= GetNewArticleImg("&ChannelID&","&wordnum&",150,200,1) %>" %>" 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="<%="<%= GetRecommPro("&linenum&","&wordnum&",0) %>"%>" 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="<% ="<%= GetRecommPro("&linenum&","&wordnum&",1) %>" %>" 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="<%="<%= GetHomeImage("&ChannelID&","&linenum&","&wordnum&",0) %>"%>" 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="<% ="<%= GetHomeImage("&ChannelID&","&linenum&","&wordnum&",1) %>" %>" 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="<%="<%= GetHomeGuestBook("&ChannelID&","&linenum&","&wordnum&",0) %>"%>" 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="<% ="<%= GetHomeGuestBook("&ChannelID&","&linenum&","&wordnum&",1) %>" %>" 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="<%="<%= GetHomeHR("&ChannelID&","&linenum&",0) %>"%>" 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="<% ="<%= GetHomeHR("&ChannelID&","&linenum&",1) %>" %>" 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="<%="<%= GetHomeNode("&ChannelID&","&linenum&","&wordnum&") %>"%>" 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="<%="<%= HomeLinksList("&ChannelID&",0,1,0) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">中文文字链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,2,0) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">中文图片链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,3,0) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">中文文字列表链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,4,0) %>"%>" 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="<%="<%= HomeLinksList("&ChannelID&",0,1,1) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">英文文字链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,2,1) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">英文图片链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,3,1) %>"%>" size="50" /> </li> </ul> <ul> <li class="t1">英文图片链接调用代码:</li> <li class="t2"><input name="textfield" type="text" class="input" value="<%="<%= HomeLinksList("&ChannelID&",0,4,1) %>"%>" size="50" /> </li> </ul> <% End If %> <% End Select %> </form> <div class="clearboth"></div> </div> </div> </div> </body> </html> <% Call Closedb()%>