|
 | 作者: rjmj [rjmj]
 论坛用户 |
登录 |
| 各位大虾们,我的源码是这样的 <!--#include file="inc/config.asp"--> <!--#include file="inc/FORMAT.asp"--> <!--#include file="inc/function.asp"--> <link href="inc/adminstyle.css" type="text/css" rel="StyleSheet" /> <br /> <center> <p></p> <% dim founderr,errmsg founderr=false errmsg="" if session("adminlogin")<>sessionvar then founderr=true errmsg=errmsg+"<br>"+"<li>你尚未登录，或者超时了！请<a href='admin.asp'>重新登录</a>！" call diserror() response.end else select case Request("menu") case "" config case "config" config case "configok" configok end select end if sub config %> <form method="post" action="?menu=configok"> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF0000">网站基本信息</font></td> </tr> <tr class="a3"> <td width="50%">网站名称：</td> <td><input size="30" name="webname" value="<%=webname%>" /></td> </tr> <tr class="a4"> <td>网站域名：<br /> <font color="FF0000">可用2级域名</font></td> <td><input size="30" name="weburl" value="<%=weburl%>" /></td> </tr> <tr class="a3"> <td>网站实际地址：<br /> 例如： <font color="FF0000">http://<%=Request.ServerVariables("server_name")%><%=replace(Request.ServerVariables("script_name"),"admin_setup.asp","")%></font></td> <td><input size="30" name="trueurl" value="<%=trueurl%>" /></td> </tr> <tr class="a3"> <td>网站LOGO：</td> <td><input size="30" name="logo" value="<%=logo%>" /></td> </tr> <tr class="a4"> <td>站长名字：</td> <td><input size="30" name="webboss" value="<%=webboss%>" /></td> </tr> <tr class="a3"> <td>建站时间：</td> <td><input size="30" value="<%=setupdate%>" name="setupdate" />  格式为2004-5-1,2004-10-1</td> </tr> <tr class="a4"> <td>站长Email：</td> <td><input size="30" value="<%=webemail%>" name="webemail" /></td> </tr> <tr class="a3"> <td>站长QQ：</td> <td><input size="30" value="<%=qq%>" name="qq" /></td> </tr> <tr class="a4"> <td>站长生日：</td> <td><input size="30" value="<%=born%>" name="born" /></td> </tr> <tr class="a3"> <td>站长地区：</td> <td><input size="30" value="<%=From%>" name="From" /></td> </tr> <tr class="a4"> <td>站长简绍（首页显示，支持HTML）：<br /> 注意：<font color="FF0000"><br /> 为不影响美观,请控制在548X85大小以内!<font></font></font></td> <td> <script>document.write("<textarea name=jieshao rows=5 cols=40><%=Replace(jieshao,"<Br>","")%></textarea>"); </script> </td> </tr> <tr class="a3"> <td>表格边框颜色：</td> <td><input size="30" value="<%=border%>" name="border" /></td> </tr> <tr class="a4"> <td>上传图片路径：</td> <td><input size="30" value="<%=upimages%>" name="upimages" /></td> </tr> <tr class="a4"> <td>上传图片大小：</td> <td><input size="5" value="<%=upbig%>" name="upbig" /> K</td> </tr> <tr class="a3"> <td>界面方案：默认为：<font color="#FF0000">meng100</font><br /> 注意：界面方案在skins目录下的文件夹里</td> <td><input size="30" value="<%=face%>" name="face" /></td> </tr> <tr class="a4"> <td>广告代码（首页显示，支持HTML）：<br /> 注意：<font color="FF0000"><br /> 为不影响美观,请控制在548X85大小以内!<font></font></font></td> <td> <script>document.write("<textarea name=add rows=5 cols=40><%=Replace(add,"<Br>","")%></textarea>"); </script> </td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF9900">网站倒记时设置</font></td> </tr> <tr class="a3"> <td width="50%">倒计时名称：</td> <td><input size="30" value="<%=datename%>" name="datename" />   如：五一劳动节，国庆 </td> </tr> <tr class="a4"> <td>倒计时的日期：</td> <td><input size="30" value="<%=datecheck%>" name="datecheck" />   格式为2004-5-1,2004-10-1 </td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF00CC">游客权限设置</font></td> </tr> <tr class="a3"> <td width="50%">是否允许新用户注册：</td> <td height="25"><%if usery="yes" then%><input name="usery" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="usery" value="no" /> 不允许<%else%><input name="usery" type="radio" value="yes" /> 允许 <input name="usery" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a4"> <td>是否允许游客查看：</td> <td></td> </tr> <tr class="a3"> <td width="50%">视听设置：</td> <td height="25"><%if guestdj="yes" then%><input name="guestdj" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestdj" value="no" /> 不允许<%else%><input name="guestdj" type="radio" value="yes" /> 允许 <input name="guestdj" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a4"> <td width="50%">下载设置：</td> <td height="25"><%if guestsoft="yes" then%><input name="guestsoft" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestsoft" value="no" /> 不允许<%else%><input name="guestsoft" type="radio" value="yes" /> 允许 <input name="guestsoft" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a3"> <td width="50%">文章设置：</td> <td height="25"><%if guestart="yes" then%><input name="guestart" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestart" value="no" /> 不允许<%else%><input name="guestart" type="radio" value="yes" /> 允许 <input name="guestart" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a4"> <td width="50%">图片设置：</td> <td height="25"><%if guestphoto="yes" then%><input name="guestphoto" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestphoto" value="no" /> 不允许<%else%><input name="guestphoto" type="radio" value="yes" /> 允许 <input name="guestphoto" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a3"> <td width="50%">日记设置：</td> <td height="25"><%if guestdiary="yes" then%><input name="guestdiary" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestdiary" value="no" /> 不允许<%else%><input name="guestdiary" type="radio" value="yes" /> 允许 <input name="guestdiary" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a4"> <td width="50%">许愿设置：</td> <td height="25"><%if guestwish="yes" then%><input name="guestwish" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestwish" value="no" /> 不允许<%else%><input name="guestwish" type="radio" value="yes" /> 允许 <input name="guestwish" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> <tr class="a3"> <td width="50%">FLASH设置：</td> <td height="25"><%if guestflash="yes" then%><input name="guestflash" type="radio" value="yes" checked="" /> 允许 <input type="radio" name="guestflash" value="no" /> 不允许<%else%><input name="guestflash" type="radio" value="yes" /> 允许 <input name="guestflash" type="radio" value="no" checked="" /> 不允许<%end if%></td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF9900">二级菜单设置</font></td> </tr> <tr class="a3"> <td width="50%">菜单1名称&连接：</td> <td><input size="10" value="<%=menu1%>" name="menu1" />   <input size="30" value="<%=murl1%>" name="murl1" />   </td> </tr> <tr class="a4"> <td>菜单2名称&连接：</td> <td><input size="10" value="<%=menu2%>" name="menu2" />   <input size="30" value="<%=murl2%>" name="murl2" />   </td> </tr> <tr class="a3"> <td width="50%">菜单3名称&连接：</td> <td><input size="10" value="<%=menu3%>" name="menu3" />   <input size="30" value="<%=murl3%>" name="murl3" />   </td> </tr> <tr class="a4"> <td width="50%">菜单4名称&连接：</td> <td><input size="10" value="<%=menu4%>" name="menu4" />   <input size="30" value="<%=murl4%>" name="murl4" />   </td> </tr> <tr class="a3"> <td width="50%">菜单5名称&连接：</td> <td><input size="10" value="<%=menu5%>" name="menu5" />   <input size="30" value="<%=murl5%>" name="murl5" />   </td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="##339900">数据相关设置</font></td> </tr> <tr class="a3"> <td width="50%">数据库路径&名称：</td> <td><input size="30" value="<%=datadir%>" name="datadir" />   <input size="30" value="<%=dataname%>" name="dataname" />   </td> </tr> <tr class="a4"> <td>备份数据库路径&名称：</td> <td><input size="30" value="<%=datadirbak%>" name="datadirbak" />   <input size="30" value="<%=datanamebak%>" name="datanamebak" />   </td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#0000CC">首页显示设置</font></td> </tr> <tr class="a3"> <td>首页显示的新闻条数：</td> <td><input size="4" value="<%=indexnews%>" name="indexnews" /> 条  [默认:7]</td> </tr> <tr class="a4"> <td>首页显示的公告条数：</td> <td><input size="4" value="<%=diaryperpage%>" name="diaryperpage" /> 条  [默认:1]</td> </tr> <tr class="a3"> <td>首页显示的影音条数：</td> <td><input size="4" value="<%=indexdj%>" name="indexdj" /> 条  [默认:5]</td> </tr> <tr class="a4"> <td>首页显示的文章条数：</td> <td><input size="4" value="<%=indexarticle%>" name="indexarticle" /> 条  [默认:5]</td> </tr> <tr class="a3"> <td>首页显示的程序条数：</td> <td><input size="4" value="<%=indexsoft%>" name="indexsoft" /> 条  [默认:5]</td> </tr> <tr class="a4"> <td>首页显示的图片个数：</td> <td><input size="4" value="<%=indexpic%>" name="indexpic" /> 个  [默认:4]</td> </tr> <tr class="a3"> <td>首页显示的链接条数：</td> <td><input size="4" value="<%=indexfriendlink%>" name="indexfriendlink" /> 条  [默认:8]</td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF9900">新闻链接显示选项</font></td> </tr> <tr class="a3"> <td width="50%">每页显示的新闻的条数：</td> <td><input size="6" value="<%=newsperpage%>" name="newsperpage" /> byte  [默认:15]</td> </tr> <tr class="a4"> <td>每页显示的链接个数：</td> <td><input size="6" value="<%=adflperpage%>" name="adflperpage" /> byte  [默认:20]</td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="##339900">影音显示选项</font></td> </tr> <tr class="a3"> <td width="50%">每页显示的影音的个数：</td> <td><input size="6" value="<%=djperpage%>" name="djperpage" /> byte  [默认:15]</td> </tr> <tr class="a4"> <td>显示推荐影音的个数：</td> <td><input size="6" value="<%=bestdj%>" name="bestdj" /> byte  [默认:5]</td> </tr> <tr class="a3"> <td>显示点击次数最多的X个影音：</td> <td><input size="6" value="<%=topdjnum%>" name="topdjnum" /> byte  [默认:5]</td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#FF00CC">文章显示选项</font></td> </tr> <tr class="a3"> <td width="50%">每页显示的文章的篇数：</td> <td><input size="6" value="<%=articleperpage%>" name="articleperpage" /> byte  [默认:15]</td> </tr> <tr class="a4"> <td>显示阅读次数最多的X篇文章：</td> <td><input size="6" value="<%=toparticlenum%>" name="toparticlenum" /> byte  [默认:20]</td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#999900">下载显示选项</font></td> </tr> <tr class="a3"> <td width="50%">每页显示的程序个数：</td> <td><input size="6" value="<%=softperpage%>" name="softperpage" /> byte  [默认:8]</td> </tr> <tr class="a4"> <td>显示最新的程序个数：</td> <td><input size="6" value="<%=newsoft%>" name="newsoft" /> byte  [默认:5]</td> </tr> <tr class="a3"> <td>显示下载次数最多的X个程序：</td> <td><input size="6" value="<%=topsoftnum%>" name="topsoftnum" /> byte  [默认:10]</td> </tr> </tbody> </table> <br /> <table cellspacing="1" cellpadding="2" width="760" border="0" class="a2" align="center"> <tbody> <tr height="25"> <td class="a1" align="middle" colspan="2"><font COLOR="#CCFF00">图片显示选项</font></td> </tr> <tr class="a3"> <td width="50%">每页显示的图片的个数：</td> <td><input size="6" value="<%=picperpage%>" name="picperpage" /> byte  [默认:12]</td> </tr> <tr class="a4"> <td>显示推荐图片的个数：</td> <td><input size="6" value="<%=bestpic%>" name="bestpic" /> byte  [默认:2]</td> </tr> <tr class="a3"> <td>显示点击次数最多的X个图片：</td> <td><input size="6" value="<%=toppicnum%>" name="toppicnum" /> byte  [默认:5]</td> </tr> <tr class="a3"> <td>每页显示的日记的个数：</td> <td><input size="6" value="<%=e_page%>" name="e_page" /> byte  [默认:2]</td> </tr> </tbody> </table> <br /> <br /> <input type="submit" value=" 更 新 " /> </form> <br /> <br /> <% %><%=GBL_CHK_TempStr%><br /> 服务器不支持在线写入文件功能，请使用FTP等功能，将<font color="Red">inc/config.asp</font>文件替换成框中内容(注意备份)<p> <textarea name="fileContent" cols="80" rows="30" class="fmtxtra"><%=Server.htmlencode(TempStr)%></textarea></p> </center><% GBL_CHK_TempStr = "" End If end sub%> 为什么我的网站打开的时候会提示我说 错误类型： Microsoft VBScript 编译器错误 (0x800A03F8) 缺少 'Sub' /admin_config.asp, line 399, column 4 End If ---^ 浏览器类型： Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) 网页： GET /admin_config.asp 谢谢.请赐教~~~~~在线等~~  |
| 地主 发表时间: 05-11-02 10:30 |
 | 回复: NetFog [q70213526]  版主 |
登录 |
|
晕.已经在群里帮你解决了.. |
| B1层 发表时间: 05-11-02 16:14 |
|
20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写：NetDemon
粤ICP备05087286号
论坛: 网站建设
标题: ASP语言问题!