当我用Ewebeditor上传了内容（内容包括文字和图片）之后，想把这条消息删除掉，但怎样能同时删除上传到服务器的图片，如果是批量删除，那又该怎么做，请各位高手帮帮忙，谢谢！！！

不好做因为eWebEditor里保存的是HTML代码，而图片路径跟HTML代码混在一起很不好摘出来

是啊！我也是为这个问题发愁，有没有好的解决方法啊！！

菜鸟更不会

这个就需要用到字符串截取来截取图片格式为 .gif .jpg 或者其他图片格式，然后统计出这个图片的个数循环调用FSO来删除

程序得到.gif后从.gif到前面的/之后整个获得图片名 N2008119153131.gif 这个文件
如果文件名有个固定的长度，那获取文件名就更容易了

<%
dim Centent,len1,len2,Folder,len,Fso
Centent="<img src=abc/N2008119153134.gif /><img src=abc/N2008119153133.jpg />"
Folder="abc/"   '图片文件夹路径
len=14   '图片名长度，也就是 N2008119153131 有多少个字节

Set Fso=Server.CreateObject("scripting.filesystemobject")   '创建FSO组件

if instr(Centent,".gif")<>0 then
len1=split(Centent,".gif")
for i=0 to UBound(len1)-1 '统计一共有多少个.gif
if Fso.FileExists(Server.Mappath(Folder&right(len1(i),len)&".gif")) then
   Fso.deletefile Server.Mappath(Folder&right(len1(i),len)&".gif"),ture
end if
next
end if

if instr(Centent,".jpg")<>0 then
len2=split(Centent,".jpg")
for i=0 to UBound(len2)-1 '统计一共有多少个.jpg
if Fso.FileExists(Server.Mappath(Folder&right(len2(i),len)&".jpg")) then
   Fso.deletefile Server.Mappath(Folder&right(len2(i),len)&".jpg"),ture
end if
next
end if

Set Fso=Nothing   '关闭FSO组件
%>

上传的文件夹地址是固定你是知道的，所以FSO删除的时候文件夹地址你是固定写好的，只有图片名是动态的，这样只要得到图片名和格式就可以删除了，批量删除也是同理

代码刚写的还没测试，你看看

[[it] 本帖最后由 hmhz 于 2008-11-17 12:45 编辑 [/it]]

这个还有一个问题，如果他是远程的图片怎么办，就是以：http://什么开始的图片地址！

远程的图片？晕，难不成你还要删除远程服务器上的图片？那你要删除的话就是痴人说梦话了

非常感谢hmhz版主！