function urnfutidain(str) dim relisurnfu,surnfuppp,Articlesave,Articleclassname2,surnfukz Articlesave="Articl" Articleclassname2="class" surnfukz="html" Set relisurnfu=new RegExp relisurnfu.IgnoreCase =true relisurnfu.Global=True relisurnfu.Pattern="\Article_Class2.asp[?]ClassID=(\d+)" str=relisurnfu.replace(str,Articlesave&"/"&Articleclassname2&"/"&"$1"&"_1."&surnfukz) relisurnfu.Pattern="\classtree.asp[?]ChannelID=(\d+)" str=relisurnfu.replace(str,"classtree/classtree"&"$1"&"."&surnfukz) urnfutidain=str set relisurnfu=nothing end function dim a a="http://030313.org/books/classtree.asp?ChannelID=444 xxxxhttp://030313.org/books/Article_Class2.asp?ClassID=4xx" response.write urnfutidain(a) 执行结果 ： http://030313.org/books/classtree.asp?ChannelID=444 xxxxhttp://030313.org/books/Articl/class/4_1.htmlxx 也就是说上面代码红色部分能执行 蓝色部分不能执行 对比一下两部分 可以发现是一样的 请教原因 谢谢

正则表达式,还没用过

帮不了你

<% function urnfutidain(str) dim relisurnfu,surnfuppp,Articlesave,Articleclassname2,surnfukz Articlesave="Articl" Articleclassname2="class" surnfukz="html" Set relisurnfu=new RegExp relisurnfu.IgnoreCase =true relisurnfu.Global=True relisurnfu.Pattern="/Article_Class2.asp[?]ClassID=(\d+)" str=relisurnfu.replace(str,"/" & Articlesave & "/" & Articleclassname2 & "/" & "$1" & "_1." & surnfukz) relisurnfu.Pattern="/classtree.asp[?]ChannelID=(\d+)" str=relisurnfu.replace(str,"/classtree/classtree" & "$1" & "." & surnfukz) urnfutidain=str set relisurnfu=nothing end function dim a a="http://030313.org/books/classtree.asp?ChannelID=444 xxxxhttp://030313.org/books/Article_Class2.asp?ClassID=4xx" response.write urnfutidain(a) %> 把 / 打反了，另外，我最讨厌用 & 连接的时候前后不加空格了。

呵 谢谢呀 可以了 可是为什么 relisurnfu.Pattern="\Article_Class2.asp[?]ClassID=(\d+)" str=relisurnfu.replace(str,Articlesave&"/"&Articleclassname2&"/"&"$1"&"_1."&surnfukz) 能执行？？？？ 还有 & 连接加空格有什么好处？我从来不加的 用别人的代码我也会把空格删了

relisurnfu.Pattern="\"&Articleclass2&"[?]"&articleclassqukid&"=(\d+)" str=relisurnfu.replace(str,Articlesave&"/"&Articleclassname2&"/"&"$1"&"_1."&surnfukz) 如果把上面红色打为/ 为发执行呀！！！