新微赢技术网

标题: [求助]字符串中检索图片名称 [打印本页]

作者: 飞.逝﹏.. 时间: 2010-1-9 01:48
标题: [求助]字符串中检索图片名称
　　最近遇到一个难题，是这样的我们一般做新闻的时候都是用编辑器上传图片，上传到一个特定的文件夹，而我们的编辑器里面的代码就如下：

<P><IMG height=420 src="/images_1/20071020214844840.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020214919741.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020215157563.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020214940487.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020215018517.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020215117551.jpg" width=560 border=0><IMG height=420 src="/images_1/20071020215139327.jpg" width=560 border=0></P>

现在要解决的是如果我要删除这篇新闻，并且连新闻中出现的图片也要删除，就是删除“20071020214844840.jpg、20071020214919741.jpg……”，不知道怎么处理，望高手指点！

其实如果是单个表单项目删除很容易的，但是这个是在很多字符串中，虽然有编辑器自带的文件管理工具，但是对于客户来说他是不会去进去删除的，所以很想解决这个很实际的问题！我也想用检索字符来提取，但是写了很多都没有达到预期的效果。

作者: ゛， 时间: 2010-1-9 01:48

\".+\.jpg\"

复制代码

试试

作者: 若叶花吹雪 时间: 2010-1-9 01:48
用fso删除这些文件,应该可以吧

作者: …═☆幻 时间: 2010-1-9 01:48
用ＦＳＯ获得文件的存放地址，然后删除就可以了！

作者: 别问我是谁 时间: 2010-1-9 01:49
以下是引用multiple1902在2007-11-18 13:29:50的发言：

\".+\.jpg\"

复制代码

试试
请问斑竹我这样写好象说不对啊！我对正则没有多大的研究。望指教啊！

Public Function GetPIC(strHtml)
Dim strPatrn
strpatrn=".+\.jpg\" '==这里不知道将你写的那个代码怎么写==
Dim regEx
Set regEx = New RegExp
regEx.Pattern = strPatrn
regEx.IgnoreCase = True
regEx.Global = True
GetPIC = regEx.Replace(strHtml,"")
End Function

作者: 成熟之惑 时间: 2010-1-9 01:49
正则表达式

作者: 「①冄12號 时间: 2010-1-9 01:49
我也不会正则，楼主可以这样试试，我发现你的img 的border属性都为0，
我的笨办法就是用把你这一长串定义为一个str，然后用split根据border分割，然后用replace替换。
然后再用fso进行删除操作。个人看法，仅作参考。

作者: 僞o碬侎〾 时间: 2010-1-9 01:49
以下是引用multiple1902在2007-11-18 13:29:50的发言：

\".+\.jpg\"

复制代码

试试
先谢过了，去试试！

作者: ωǒ祗憙歡伱 时间: 2010-1-9 01:49
以下是引用t是变量在2007-11-17 16:58:50的发言：
正则表达式
如何写了，望楼上的指教，我对正则表达式研究得少！

作者: 一切还好 时间: 2010-1-9 01:49
FSO是可以删除的，但是你怎么将这些字符串中的图片名称检索出来呢！

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)