03.1.修改验证码,使它永远只出现四个“0” =================================================== 在个人Blog中使用验证码没什么意义,PJBlog后台又没有关闭验证码的选项,所以最好的办法就是让它只显示最简单的符号,本站把验证码全部改为4个“0”: 找到common\GetCode.asp,修改“Dim i, ii, iii”下面这段为:
程序代码 div style="float:left;font-weight:bold;color:#FF0000;"> 公告:/div>div style="text-align:left;float:left;"> div id="icefable1" style="width:500;font-size:12px;line-height:18px"> !--以下为滚动内容-->
li>建议使用浏览器IE6.0 或Firefox1.5,分辨率1024*768浏览本站。 a href="bloglink.asp">li>申请友情链接请点这里看说明后提交!/a> a href="http://www.creativecommons.cn/licenses/by-nc-sa/1.0/">li>如未特别说明,本站所有内容都遵循创作共用协议。 /a> a href="register.asp">li>虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号。/a> a href="LoadMod.asp?plugins=GuestBookForPJBlog">li>如果您对本站有任何建议或意见,或者想发牢骚,请点这里留言!/a>
程序代码 %else dim lArticle,EditLog,DeleteLog set lArticle=new logArticle lArticle.getLog(logid) if stat_EditAll or (stat_Edit and lArticle.logAuthor = memName) Then%> !--内容--> %IF Request.Form("action")="post" Then lArticle.categoryID = request.form("log_CateID") lArticle.logTitle = request.form("title")
程序代码 if action>2 then Dim archive_item_Len,Month_array,TempYear,MonthCounter if ubound(blog_archive,1)=0 then archive="":exit function Month_array=Array("01月","02月","03月","04月","05月","06月","07月","08月","09月","10月","11月","12月") archive_item_Len=ubound(blog_archive,2) TempYear=blog_archive(1,0) MonthCounter=0 For i=0 to archive_item_Len IF i=0 Then archive="a class=""sideA"" style=""margin:0px 0px 0px -2px;"" href=""default.asp?log_Year="blog_archive(1,i)""" title=""查看"blog_archive(1,i)"年的日志"">"blog_archive(1,i)"/a>" IF blog_archive(1,i)=TempYear Then archive=archive"a style=""margin-right:5px;"" href=""default.asp?log_Year="blog_archive(1,i)"log_Month="blog_archive(2,i)""" title="""blog_archive(1,i)"年"blog_archive(2,i)"月有"blog_archive(0,i)"篇日志"">"Month_array(blog_archive(2,i)-1)"/a>" MonthCounter=MonthCounter+1 IF MonthCounter=6 Then MonthCounter=0:archive=archive"br/>" Else MonthCounter=1 archive=archive"a class=""sideA"" style=""margin:6px 0px 0px -2px;"" href=""default.asp?log_Year="blog_archive(1,i)""" title=""查看"blog_archive(1,i)"年的日志"">"blog_archive(1,i)"/a>" archive=archive"a style=""margin-right:5px;"" href=""default.asp?log_Year="blog_archive(1,i)"log_Month="blog_archive(2,i)""" title="""blog_archive(1,i)"年"blog_archive(2,i)"月有"blog_archive(0,i)"篇日志"">"Month_array(blog_archive(2,i)-1)"/a>" TempYear=blog_archive(1,i) End IF Next end if
程序代码 tr>td align="right" width="85">strong>电子邮件:/strong>/td>td align="left" style="padding:3px;">%if (blog_Mem("mem_HideEmail") and (not stat_Admin)) or len(blog_Mem("mem_Email"))1 or isnull(blog_Mem("mem_Email")) then response.write "该用户没有或不公开电子邮件" else response.write blog_Mem("mem_Email") end if%>/td>/tr>