Die folgende Unterroutine kann im Grunde genommen als relativ gute allgemeine Übereinstimmung angesehen werden. (PS: Ich habe plötzlich festgestellt, dass Code_lite meinem UBB entkommen war !!! Ich war so schwindelig, dass ich mich selbst entkommen musste ...)
Dimobjregexp, Matches, i, dc9_dot_cn_match
DimaryMatch ()
REDIMPREServearymatch (0)
SetObjregexp = newregexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.patternN = "(?:/[^/]]+/] ([^/[]+)/[// [^/]+/]) |
SetMatches = objregexp.execute ("[img] 2312.jpg [/img] [img] 2312.jpg [/img] hh [img] http://www.dc9.cn/cm/upload/2ed312.jpg [/img] <ahrf =" h. jpg ""> </a> href = "" http://www.dc9.cn/dccdd.jpg ""> [img_right = 400,300, title] Upload/2assas.jpg [/iMg_right] <sceptsrc = "Http://wwwww.dc9.cn.
Dimtmpmatch
Fei = 0Tomatches.count-1
CallinsertDatatoArray (Matches (i) .Submatches (0), Arymatch)
CallinsertDatatoArray (Matches (i) .Submatches (1), Arymatch)
Nächste
Fei = 0toubund (Arymatch)
Ifnotisnull (arymatch (i)) andtrim (arymatch (i)) <> "" thenResponse.writeArymatch (i) & "<br>"
Nächste
FIunternInsertDatatoArray (Daten, ByreFaryMatch)
Iftrim (data) <> "" dann
Daten = Ersetzen (Daten, "'", "")
Daten = Ersetzen (Daten "," "," ")
Data = ersetzen (Daten, "/", "/")
Data = Split (Daten, "/") (Ubound (Split (Daten ",/")))
REMPREERServearymatch (Ubound (Arymatch) +1)
Dc9_dot_cn_match = false
FORJ = 0Toubund (Arymatch)
IFaryMatch (j) = datathendc9_dot_cn_match = true
Nächste
IFNOTDC9_DOT_CN_MATCHTHENARYMATCH (UBOUND (ARYMATCH)) = Daten
Endif
Endfunktion
Wenn Z-Blog verwendet wird, reicht es aus, um den Upload zu erreichen (aber um Probleme zu sparen und genauer zu sein, füge ich das Upload einfach zum oben genannten Übereinstimmung hinzu. Daher scheint das Folgende komplizierter zu sein. Tatsächlich sollte das Folgende einfacher sein. Sie brauchen keinen Split/. Um es so zu schreiben:
Dimobjregexp, übereinstimmt, i, zc_upload_match
DimaryMatch ()
REDIMPREServearymatch (0)
SetObjregexp = newregexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.patternN = "(?:/[^/]]+/] [^/[]*Upload // ([^/[|^// |^//]+)/[// [^/]+/] ) | (? :( ?: href | src) = "" {0,1} [^/s |^"" |^> |^']*Upload // ([^/s |^>]+) ["|> |
SetMatches = objregexp.execute ("[img] 2312.jpg [/img] [img] 2312.jpg [/img] HH [img] http: // ww w.dc9.cn/cm/upload/2ed312.jpg[/img weibliche; p: //www.dc9.cn/dccdd.jpg ""> [img_right = 400,300, Titel] Upload/2assas.jpg [/img_right] <s ceptsrc = "" http://www.dc9.cn/upload/ss.jpg "" src = http: //www.dc9.cn/upload/ss.jpg '> ")
Dimtmpmatch
Fei = 0Tomatches.count-1
CallinsertDatatoArray (Matches (i) .Submatches (0), Arymatch)