万卷书   首页 > 电脑书籍 > Asp > 防止新闻系统里产生垃圾图片的方法
 

   在处理文件上传的时候,可以用稻香老农的无组件上传,把图片传到工作区中。并且把图片代码返回到编辑器中,当提交以后,将由以下代码来处理这些图片,我这里是根据新闻或文章的ID来创建文件夹的:
   sql="select top 1 form news where id is null"
   set rs=server.createobject("adodb.recordset")
   rs.open sql,conn,1,3
   rs.addnew
   rs("userid")=session("myid")'因为是新加的,所以先加上一条来取得ID
   rs.update
   newID=rs("newsid")'大部分情况下,这样可以取得ID的,可是为了保险起见,所以最好还是再判断一下了
   rs.close
   set rs=nothing
   if newsID="" then
   set rs=conn.execute("select top 1 newsid from news where userid=" & session("myid") & " order by newsid desc")
   newsID=rs("newsid")
   end if

   basefoder=server.mappath("photo")'假设图片存到当前目录下面的photo里面
   set fso=Server.CreateObject("Scripting.FileSystemObject")
   FiLePaTh = basefoder&"/"&newsID
   Fso.Createfolder(FiLePaTh)
   '假设将取得新闻的内容存在变量content里面下面就调用我的那个类blacksmith来处理分析文章的内容,处理图片的转移了
   set bs=new blacksmith
   bs.size=1
   bs.baseurl="photo/"&newsID'给图片加上目录的地址
   bs.basefilename="mynews"'给图片加上前缀
   bs.servername = ""
   bs.tofolder=FiLePaTh
   bs.processstr=content
   content=bs.str2img
   set bs=nothing
   '接下来就是新闻内容的保存的过程了,我这里就省去了,和其它的系统应该是一样的了



上一页 下一页