111,126
社区成员
发帖
与我相关
我的任务
分享如何将此段VBSCRIPT改为C#程序
Function GetCode(str,regstr)
Dim Reg,RetStr,Matches
set Reg= new RegExp
Reg.IgnoreCase = True
Reg.MultiLine = True
Reg.Global = True '全部查询，如果些为FLASE只采集一条
Reg.Pattern =regstr
Set Matches = Reg.Execute(str) '' 执行搜索。
For Each Match in Matches '' 循环遍历Matches集合。
Set r = New RegExp
r.ignoreCase = true
r.Pattern = "<div[\s|\S]*?>([\s|\S]*)?</div>" '替换正则标签内的字符串
str2 = r.replace(Match.Value,"$1") '使用替换必须进行操作
RetStr = RetStr & str2 &"," '加回车或其它分割字符
Next
GetCode=RetStr
end function
Dim Reg,RetStr,Matches
set Reg= new RegExp
Reg.IgnoreCase = True
Reg.MultiLine = True
Reg.Global = True '全部查询，如果些为FLASE只采集一条
Reg.Pattern =regstr
Set Matches = Reg.Execute(str) '' 执行搜索。
For Each Match in Matches '' 循环遍历Matches集合。
Set r = New RegExp
r.ignoreCase = true
r.Pattern = "<div[\s|\S]*?>([\s|\S]*)?</div>" '替换正则标签内的字符串
str2 = r.replace(Match.Value,"$1") '使用替换必须进行操作
RetStr = RetStr & str2 &"," '加回车或其它分割字符
Next
GetCode=RetStr
end function
...全文
请发表友善的回复…
发表回复
jingsong2008 2009-04-30
- 打赏
- 举报
去网上搜一下，有那种转换工具的
seven_diligent 2009-04-30
- 打赏
- 举报
哪位大哥，能说说吗？
