防止新闻系统里产生垃圾图片的方法

给图片加上目录的地址
bs.basefilename="mynews"给图片加上前缀
bs.servername = ""
bs.tofolder=FiLePaTh
bs.processstr=content
content=bs.str2img
set bs=nothing
接下来就是新闻内容的保存的过程了，我这里就省去了，和其它的系统应该是一样的了

<p style=line-height: 150%>在处理新闻的修改的时候用：
创建工作目录
set fso=Server.CreateObject("Scripting.FileSystemObject")
FiLePaTh = server.mappath("temp"&session("myid"))
If Not FSO.FolderExists(FiLePaTh) Then
Fso.Createfolder(FiLePaTh)
End If

<p style=line-height: 150%>FiLePaTh = basefoder&"/"&newsID
If  FSO.FolderExists(fp) Then
on error resume next
fso.copyfile fp&"*.*",FiLePaTh&""把那个目录下面的所有文件全拷到工作目录下面，防止出现修改了不保存，所以先不删除原有的内容
if err.num>0 then err.clear
End If
set fso=nothing
end if
把原有的文件内容进行处理，改变里面的图片路径,比如说这此内容还是保存在content里面
content=replace(trim(content,"photo/"&newsID&"/mynews","temp"&session("myid")&"/mynews")这个只是一个比较简单的替换，相信由此引起误替换的机会应该是相当小的了
保存的过程和添加的过程是一样的，所不同的是，要先把原来的那个目录里面的文件清空，我这里就不多说了。
新闻删除的时候，要记着把这个ID相对应的文件夹删除了，在用户登出的时候，也要把它的工作目录清空。