日期:2014-05-17 浏览次数:21420 次
[ISAPI_Rewrite] # 3600 = 1 hour CacheClockRate 3600 RepeatLimit 32 #简体中文设置 RewriteRule /index\.html /index.asp RewriteRule /Login\.html /d_hydl.asp RewriteRule /Reg\.html /d_hyzc.asp RewriteRule /zffs\.html /d_zffs.asp RewriteRule /yjbl\.html /d_yjbl.asp RewriteRule /zfwg\.html /d_zfwg.asp RewriteRule /xtjs\.html /d_xtjs.asp RewriteRule /contact\.html /s_contact.asp RewriteRule /About\.html /s_about.asp RewriteRule /jsggView(\d+)\.html /d_jsggView\.asp\?newsid=$1 [N,I] RewriteRule /news(\d+)\.html /news\.asp\?newsid=$1 [N,I]
rem ==================
rem 伪静态规则
rem ==================
'isapi_write
Public Function ArchiveHtml(Textstr)
Str=Textstr
If isUrlreWrite = 1 Then
Dim Str,re,Matches,Match
Set re=new RegExp
re.IgnoreCase =True
re.Global=True
re.Pattern = "index\.asp"
str = re.Replace(str,"index.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)(&|&)topicmode=(\d+)?(&|&)list_type=([\d,]+)?(&|&)page=(\d+)?"
' str = re.Replace(str,"<a$1index_$2_$4_$6_$8.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)(&|&)action=(.[^&]*)?(&|&)topicmode=(\d+)?(&|&)list_type=([\d,]+)?(&|&)page=(\d+)?"
' str = re.Replace(str,"<a$1index_$2_$4_$6_$8_$10.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)?(&|&)action=(.[^<>""\'\s]*)?"
' str = re.Replace(str,"<a$1index_$2_$4_$6.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)(&|&)topicmode=(\d+)?"
' str = re.Replace(str,"<a$1index_$2_$4.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)?"
' str = re.Replace(str,"<a$1index_$2_$4_.html")
' re.Pattern = "<a(.[^>]*)index\.asp\?boardid=(\d+)"
' str = re.Replace(str,"<a$1index_$2.html")
' re.Pattern = "<a(.[^>]*)dispbbs\.asp\?boardid=(\d+)(&|&)replyid=(\d+)?(&|&)id=(\d+)?(&|&)skin=(\d+)?(&|&)page=(\d+)?(&|&)star=(\d+)?"
' str = re.Replace(str,"<a$1dispbbs_$2_$4_$6_skin$8_$10_$12.html")
' re.Pattern = "<a(.[^>]*)dispbbs\.asp\?boardid=(\d+)(&|&)replyid=(\d+)?(&|&)id=(\d+)?(&|&)skin=(\d+)?(&|&)star=(\d+)?"
' str = re.Replace(str,"<a$1dispbbs_$2_$4_$6_skin$8_$10.html")
' re.Pattern = "<a(.[^>]*)dispbbs\.asp\?boardid=(\d+)(&|&)replyid=(\d+)?(&|&)id=(\d+)?(&|&)skin=(\d+)?"
' str = re.Replace(str,"<a$1dispbbs_$2_$4_$6_skin$8.html")
' re.Pattern = "<a(.[^>]*)dispbbs\.asp\?boardid=(\d+)(&|&)id=(\d+)?(&|&