最近我的一个朋友的Blog上的上传功能丢失了，喊我看看，博客程序采用的是PJBlog，这个程序应该没有什么问题，检查了下，发现程序都正常，发表新日志的时候，提示缺少common/upfile.asp文件，随即下载了官方的upfile.asp文件，发现被我的江民提示病毒，asp后门，晕。把它当海洋木马了，仔细看了下代码，应该是“Stream”作为特征符的，随即用了个Replace 进行替换一切正常，哈哈。下面吧修改过的代码发上来，有那位朋友需要，可以参考下。
修改部分：
Dim strtemp2
Strtemp2=replace("adodb.sftfrfefafm","f","")
然后吧全部代码调用的Adodb.Stream 用StrTemp2替换
程序中，还有一处 Tstream变量也是，我随便命名了strtemp替换，就可以了
修改后的程序文件Upfile.asp下载：
