准备开始找工作了，把目的地定在了广州，到二哥的住处落脚先了，定于明天动身。
今天开始准备收拾些行李，一收拾才发现原来有这么多的东西。最烦人的就是这台电脑了，个人本来喜欢轻车简行的，没想到这次居然会带上一车的行李。
忽然之间做的决定，自己也有点措手不及。有的东西，短时间内是无法完成的了。
手上没有完成的东西，还真有点多，没办法，最近接了份兼职，还要弄自己的PHP简历程序(未完成)，事情多了，自然有许多东西都无法完成。
未完成：
[color=#0066aa]个人简历程序
日志档案插件(精华日志、热门日志)
完善友情链接插件
DIV+CSS布局入门教程
修改之前不成熟的作品，主要去掉一些冗余的CSS样式，并做部份美化
垃圾信息过滤功能舜子准备更新到下一版本中，省了
……
希望能尽快找到份工作，安定下来后开始完成上面这些未完成工作，舜子已经安定下来了，PJBLOG的更新工作将会继续，好羡慕舜子在腾讯的工作，呵~~
前面的过滤垃圾信息的代码，显示警告信息时经常为乱码，太难看了，这是由于未加载http头造成的。
修改一下代码，改为使用PJBLOG自定函数showmsg显示，不过这次把代码放到header.asp的第一个[color=Red]%号后面就可以了，代码如下：
[code]Dim GetFlag,ErrorSql,RequestKey,ForI
ErrorSql = “过滤字符||过滤字符”
ErrorSql = split(ErrorSql,”||”)
If Request.ServerVariables(”REQUEST_METHOD”)=”GET” Then
GetFlag=True
Else
GetFlag=False
End If
If GetFlag Then
For Each RequestKey In Request.QueryString
For ForI=0 To Ubound(ErrorSql)
If Instr(LCase(Request.QueryString(RequestKey)),ErrorSql(ForI))<>0 Then
showmsg “警 告!“,”禁止在本站发布垃圾信息!
返回“,”ErrorIcon”,”"
End If
Next
Next
Else
For Each RequestKey In Request.Form
For ForI=0 To Ubound(ErrorSql)
If Instr(LCase(Request.Form(RequestKey)),ErrorSql(ForI))<>0 Then
showmsg “警 告!“,”禁止在本站发布垃圾信息!
返回“,”ErrorIcon”,”"
End If
Next
Next
End If[/code]
[color=Red]***************************** 补 充 *****************************
发现在header.asp中添加后，无法过滤留言本信息，原因是留言本处理消息的bookaction.asp文件没有加载header.asp，因此还需要在留言本插件目录下的bookaction.asp中加入以上代码，并将showmsg一行改为:
程序代码本人将会尽快完成过滤补丁的安装文件以及过滤关键词管理插件。
