반응형
Notice
Recent Posts
Recent Comments
Link
| 일 | 월 | 화 | 수 | 목 | 금 | 토 |
|---|---|---|---|---|---|---|
| 1 | 2 | 3 | 4 | 5 | 6 | 7 |
| 8 | 9 | 10 | 11 | 12 | 13 | 14 |
| 15 | 16 | 17 | 18 | 19 | 20 | 21 |
| 22 | 23 | 24 | 25 | 26 | 27 | 28 |
Tags
- KO
- 아라비카
- 원두
- vbscript
- asp
- 리베리카
- xamarin.android
- KnockoutJS
- Android
- xamarin
- xamarin.forms
- 제주도
- 프렌치프레스
- 커피풍미
- 자마린
- 여행
- Unity
- ServerVariables
- Classic ASP
- 드립 커피
- fso
- 커피블로그
- 함수
- 태그를 입력해 주세요.
- 템플릿
- 커피
- 로부스타
- 커피역사
- shared
- NGUI
Archives
- Today
- Total
목록email (1)
개발人
이메일 유효성 체크
Function IsValidEmail(strEmail) Dim bIsValid bIsValid = True If Len(strEmail) < 5 Then bIsValid = False Else If Instr(1, strEmail, " ") 0 Then bIsValid = False Else If InStr(1, strEmail, "@", 1) < 2 Then bIsValid = False Else If InStrRev(strEmail, ".") < InStr(1, strEmail, "@", 1) + 2 Then bIsValid = False End If End If End If End If IsValidEmail = bIsValid End Function
Classic ASP
2015. 5. 23. 19:28