ToTs컨설팅 || ToTb Online-ToTal Service - 인큐베이팅, 컨설팅, 파트너쉽

홈

서비스

ToTs 사례


전체글 2086 건

ㆍ로그인 중복 방지(필요하신 분들을 위해 잠시~)

ㆍASP에서 이미지 파일을 보호하는 방법

ㆍASP syntax

ㆍASP Tuning Point와 죽는 Web Server(3)

ㆍASP Tuning Point와 죽는 Web Server(2)

ㆍASP Tuning Point와 죽는 Web Server(1)

ㆍ서버기반의 스크립트 언어

ㆍ도대체 ASP는 왜 나왔을까욤?

ㆍASP 시식을 위한 준비.. ^^

ㆍ홈페이지 제작 때문에 큰 고민에 빠졌습니다

< 191 192 193 194 195 196 197 198 199200 >

#asp#ASP자동링크#자동링크

function AutoLink (content)

dim re
Set re = New RegExp

' First Pass for http
re.Pattern = "(\w+):\/\/([^/:]+)(:\d*\b)?([^# \n<]*).*\n"
re.Pattern = "([0-9a-zA-Z./@:~?&=_-]+)"
re.Pattern = "https://([0-9a-zA-Z./@:~?&=_-]+)"
re.Global = True
re.IgnoreCase = True

' ASP seems to be not supporting .MultiLine method.
're.MultiLine = True

content = re.Replace(content,"<a target=_blank href='http://$1'>https://$1</a>")

' Second Pass for mail
re.Pattern = "([_0-9a-zA-Z-]+(\.[_0-9a-zA-Z-]+)*)@([0-9a-zA-Z-]+(\.[0-9a-zA-Z-]+)*)"
AutoLink = re.Replace(content,"<a href='mailto:$1@$3'>$1@$3</a>")

end function