반응형
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 | 29 | 30 | 31 |
Tags
- 원두
- 에스프레소
- 제주도
- Classic ASP
- xamarin
- 프렌치프레스
- 함수
- 태그를 입력해 주세요.
- xamarin.android
- xamarin.forms
- NGUI
- fso
- shared
- 커피풍미
- KnockoutJS
- vbscript
- 커피역사
- 드립 커피
- 아라비카
- 여행
- 커피
- KO
- 커피블로그
- 로부스타
- 자마린
- 템플릿
- Android
- asp
- Unity
- ServerVariables
Archives
- Today
- Total
목록유효성체크 (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