해당 함수는 Content 중 URL을 자동으로 인식하여 링크를 시켜주는 함수 입니다.
<HTML>
<HEAD>
<TITLE>ASP 정규식</TITLE>
</HEAD>
<BODY>
<h1>ASP 정규식</h1><p>
<font size=2 face=굴림>
<%
Function UrlLink(strng)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "([^=""|='](http|https|ftp|telnet|news):\/\/[a-z0-9-]+\.[][a-zA-Z0-9:&#@=_~%;\?\/\.\+-]+)"
regEx.IgnoreCase = True
regEx.Global = True
UrlLink = regEx.Replace(strng,"<a href='$1' target='_blank'>$1</a>")
End Function
content = "홈페이지 : http://www.ihelpers.co.kr"
response.write "<b>Source : </b>" & content & "<br>"
response.write "<b>함수적용 : </b>" & UrlLink(content)
%>
</font>
</BODY>
</HTML>
출처 : 아이헬퍼스
'프로그래밍 > ASP' 카테고리의 다른 글
| [뭉충닷컴 펌]ASP 페이징 쉽게 처리하기 (0) | 2010.04.23 |
|---|---|
| [강좌] ASP 에서 CLASS(클래스) 사용하기 (0) | 2010.04.23 |
| ASP강좌 5강 DB,SQL & ADO객체 (0) | 2009.06.13 |
| ASP용 DB 클래스 (0) | 2009.06.13 |
| 이미지 저장시 리사이즈 (0) | 2009.06.04 |