게시판 본문 ASP, ASP.NET, IIS & Script - Read Only
re: 정규식 관련 질문인데요... |
---|
작성자: 송원석
작성일시: 2004-03-31 12:44,
조회수: 3,228
|
안녕하세요? 송원석입니다. ^_^
다음과 같이 한 번 해보시면 어떨까요? <% Public Function RegExpExec(Patrn, TestStr) Dim ObjRegExp On Error Resume Next Set ObjRegExp = New RegExp ObjRegExp.Pattern = Patrn ObjRegExp.Global = True ObjRegExp.IgnoreCase = True Set RegExpExec = ObjRegExp.Execute(TestStr) Set ObjRegExp = Nothing End Function Dim Test_String Dim Result_Match Dim Result_Matches_Collection Dim Pattern_String Test_String = "Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+Hotbar+4.4.2.0)" Pattern_String = "(MSIE\+[0-9\.]+?);.*(Windows\+[a-zA-Z0-9\.\+]+?)[;|\)]+?" Set Result_Matches_Collection = RegExpExec(Pattern_String, Test_String) For Each Result_Match In Result_Matches_Collection Response.Write "IE 버전 : " & Result_Match.SubMatches(0) & "<br>" Response.Write "OS 버전 : " & Result_Match.SubMatches(1) & "<br>" Next %>위의 코드를 실행시켜보시면 원하시는 결과와 거의 동일한 결과를 얻으실 수 있으실 것입니다. 다만 + 기호가 남아있게 되는데 이는 Replace() 함수로 쉽게 처리하실 수 있으실 겁니다. ^_^ 감사합니다. |
IP 주소: 61.80.31.136
|
호이 |
감사합니다. ^^ 패턴 어디서 시작할건지 부터 제가 생각을 잘못 했던 거 같아요.
|
2004-03-31 13:58 |
호이 |
답해주신 패턴 분석해 보는데 여전히 머리 복잡해지는... ^^;;;
|
2004-03-31 13:59 |
게시물 | ||||
---|---|---|---|---|
311 | 2004-04-07 | 6,271 | ||
310 |
알고싶다 |
2004-04-06 | 903 | |
309 | 2004-04-06 | 3,228 | ||
308 |
알고싶다 |
2004-04-06 | 964 | |
307 |
정백호 |
2004-04-04 | 943 | |
306 |
re: iis 디렉토리에서.. [1] |
2004-04-06 | 3,467 | |
305 |
정백호 |
2004-04-06 | 1,264 | |
304 | 2004-04-06 | 3,245 | ||
303 |
호이 |
2004-03-31 | 953 | |
2004-03-31 | 3,228 | |||
301 | 2004-03-29 | 3,080 | ||
300 | 2004-03-29 | 3,495 | ||
299 |
궁금이 |
2004-03-25 | 956 | |
298 | 2004-03-25 | 3,016 | ||
297 | 2004-03-23 | 3,276 | ||
296 | 2004-03-23 | 3,227 | ||
295 | 2004-03-24 | 3,259 | ||
294 | 2004-03-24 | 3,242 | ||
293 |
궁금이 |
2004-03-17 | 1,210 | |
292 |
궁금이 |
2004-03-17 | 932 | |
291 | 2004-03-17 | 4,223 | ||
290 |
이렇게 하는 방법도.... [1] |
2004-03-21 | 3,480 | |
289 |
궁금이 |
2004-03-15 | 948 | |
288 | 2004-03-16 | 3,284 | ||
287 |
강지윤 |
2004-03-15 | 951 |