SQL如何查找字段中IMG标签中src属性的值并更新到另一个字段中
如:<Palign=center><IMGsrc="/qbx_text_edit/UploadFile/20087484240782.jpg"border=0></P><...
如:<P align=center><IMG src="/qbx_text_edit/UploadFile/20087484240782.jpg" border=0></P> <P align=left> 经过一段时间的沉寂后,国内白电龙头企业</p>,将以上内容中img标签中src属性值"/qbx_text_edit/UploadFile/20087484240782.jpg"取出来并更新到另一字段中。
问题我已经解决了,给大家分享下吧 在VS2005以上版本中建立数据库服务项目,然后在项目中添加用户自定义函数,此函数用来处理寻找字符串中的img标签src属性值,然后生成、部署,在数据库的“函数”——>“标题值函数”中就可找到你在VS中编码的函数,这个函数就可在数据库中直接使用了。 展开
问题我已经解决了,给大家分享下吧 在VS2005以上版本中建立数据库服务项目,然后在项目中添加用户自定义函数,此函数用来处理寻找字符串中的img标签src属性值,然后生成、部署,在数据库的“函数”——>“标题值函数”中就可找到你在VS中编码的函数,这个函数就可在数据库中直接使用了。 展开
2个回答
展开全部
每次查询都更新到另一字段中?
<%
TheStr="<P align=center><IMG src='/qbx_text_edit/UploadFile/20087484240782.jpg' border=0></P> <P align=left> 经过一段时间的沉寂后,国内白电龙头企业</p>"
Function RegImg(TheStr)
Dim RegEx
Set RegEx = New RegExp '建立正则表达对象。
RegEx.IgnoreCase =True ' 是否区分大小写,True为不区分且默认
RegEx.Global = True '全部匹配还是只匹配第一个
RegEx.Pattern = "<img[^>]*src\s*=\s*['"&CHR(34)&"]?([\w/\-\:.]*)['"&CHR(34)&"]?[^>]*>" ' 搜索所使用的正则表达式
If Regex.test(TheStr) Then ' 判断是否有匹配值,返回True或者False。不受Global属性影响。
Dim Matches
Set Matches = RegEx.Execute(TheStr) ' 执行搜索。Execute 方法返回一个Matches 集合,其中包含了在 TheStr 中找到的每一个匹配的 Match 对象。如果未找到匹配,Execute 将返回空的 Matches 集合。
For Each Match in Matches ' 遍历匹配集合。
'RetStr = RetStr & Match.Value & "<br />"获取整个img
RetStr = RetStr & Match.SubMatches(0) '只取src
Next
RegImg = RetStr
End If
End Function
if RegImg(TheStr)<>"" then
'在此处写入更新,其值为RegImg(TheStr)问题是每次查询更新和有多个插图?
Response.Write RegImg(TheStr)
End If
%>
<%
TheStr="<P align=center><IMG src='/qbx_text_edit/UploadFile/20087484240782.jpg' border=0></P> <P align=left> 经过一段时间的沉寂后,国内白电龙头企业</p>"
Function RegImg(TheStr)
Dim RegEx
Set RegEx = New RegExp '建立正则表达对象。
RegEx.IgnoreCase =True ' 是否区分大小写,True为不区分且默认
RegEx.Global = True '全部匹配还是只匹配第一个
RegEx.Pattern = "<img[^>]*src\s*=\s*['"&CHR(34)&"]?([\w/\-\:.]*)['"&CHR(34)&"]?[^>]*>" ' 搜索所使用的正则表达式
If Regex.test(TheStr) Then ' 判断是否有匹配值,返回True或者False。不受Global属性影响。
Dim Matches
Set Matches = RegEx.Execute(TheStr) ' 执行搜索。Execute 方法返回一个Matches 集合,其中包含了在 TheStr 中找到的每一个匹配的 Match 对象。如果未找到匹配,Execute 将返回空的 Matches 集合。
For Each Match in Matches ' 遍历匹配集合。
'RetStr = RetStr & Match.Value & "<br />"获取整个img
RetStr = RetStr & Match.SubMatches(0) '只取src
Next
RegImg = RetStr
End If
End Function
if RegImg(TheStr)<>"" then
'在此处写入更新,其值为RegImg(TheStr)问题是每次查询更新和有多个插图?
Response.Write RegImg(TheStr)
End If
%>
展开全部
兄你,你建表1的时候将src作为一个字段,里面的值就为图片的路径/qbx_text_edit/UploadFile/20087484240782.jpg
这样你在操作的时候就可以这样做:
update 表名 set src=(select src from 表1 where id=?) where id=? ;
这样你在操作的时候就可以这样做:
update 表名 set src=(select src from 表1 where id=?) where id=? ;
追问
不是这个意思 ,是以前的数据要处理,新的功能已加图片路径 ,但是以前大量的图片路径数据没有单独存到数据库的字段中
追答
哦,那你就只有写存储过程来解决了
先把你的以前的图片的路径取出来
用字符串截取的方式,将路径截取出来
然后在把它更新到新表中去
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询