다음의 서브 루틴은 기본적으로 비교적 좋은 일반 경기로 간주 될 수 있습니다. (PS : 나는 갑자기 code_lite가 내 ubb를 탈출했다는 것을 알았습니다 !!! 나는 너무 어지러워서 스스로 탈출해야했습니다 ...)
Dimobjregexp, Matches, I, DC9_DOT_CN_MATCH
이형 매치 ()
redimpreservearymatch (0)
setobjregexp = newRegexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "(? :/[[^/]]+/] ([^/[]+)/[// [^/]]+/]) | (? :(? : href | src) = ([^/s |^>]+) [" "|> |/s/'])"
setMatches = objregexp.execute ( "[img] 2312.jpg [/img] [img] 2312.jpg [/img] hh [img] http://www.dc9.cn/cm/upload/2ed312.jpg [/img] <ahref =" "http://ww.dc; jpg ""> </a> href = ""http://www.dc9.cn/dccdd.jpg "">
dimtmpmatch
fori = 0tomatches.count-1
CallinsertDatatoArray (일치 (i) .Submatches (0), arymatch)
CallinsertDatatoArray (일치 (i) .Submatches (1), arymatch)
다음
fori = 0toubound (arymatch)
ifnotisnull (arymatch (i)) 및trim (arymatch (i)) <> ""thenresponse.writearymatch (i) & "<br>"
다음
FunctionInsertDatatoArray (데이터, 바이 파리 마치)
iftrim (data) <> "" "그런 다음
data = replace (data, " '", "")
data = replace (data, "" "", "")
data = replace (data, "/", "/")
data = split (data, "/") (ubound (split (data, "/")))
redimpreservearymatch (ubound (arymatch) +1)
DC9_DOT_CN_MATCH = FALSE
forj = 0toubound (arymatch)
ifaryMatch (j) = dataThendc9_dot_cn_match = true
다음
ifnotdc9_DOT_CN_MATCHTHARNALLACH (ubound (arymatch)) = data
endif
최종 기능 장애
실제로 Z-Blog가 사용되는 경우 업로드를 일치시키는 것으로 충분합니다 (그러나 문제를 절약하고 더 정확하기 위해서는 위의 일치에 업로드를 추가하기 위해서는 다음과 같은 것이 더 복잡해 보입니다. 실제로 이론적으로 다음은 더 간단해야합니다. 결국 제어를위한 업로드가 있어야합니다 ...). 분할이 필요하지 않습니다. 다음과 같이 씁니다.
Dimobjregexp, Matches, I, zc_upload_match
이형 매치 ()
redimpreservearymatch (0)
setobjregexp = newRegexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "(? :/[[^/]]+/] [^/[]*upload // ([^/[|^// |^//]+)/[// [^/]+/] ) | (? :( : href | src) = ""{0,1} [^/s |^""|^>^']*업로드 // ([^/s |^>]+) [ ""|> |/s/'].
setMatches = objregexp.execute ( "[img] 2312.jpg [/img] [img] 2312.jpg [/img] hh [img] http : // ww w.dc9.cn/cm/upload/2ed312.jpg= "htt : //www.dc9.cn/ddd.jpg" "> </a> href =" "htt p : //www.dc9.cn/dccdd.jpg ""> [img_right = 400,300, 제목] 업로드/2assas.jpg [/img_right] <s ceptsrc = ""http://www.dc9.cn/upload/sss.jpg ""src = http : //www.dc9.cn/upload/ssss.jpg '> ")
dimtmpmatch
fori = 0tomatches.count-1
CallinsertDatatoArray (일치 (i) .Submatches (0), arymatch)