UTF-8인코딩 및 디코딩 관련 함수 (URLEncodeUTF8,URLDecodeUTF8)
http://cafe.naver.com/q69/71121ASP뉴스그룹의 멍멍이님께서 작성하신 함수 인데 퍼왔슴다.. ^^ 요즘 PC팔고 계시다는데.. 장사 잘되시길 바랍니다..ㅋㅋ Public Function URLEncodeUTF8(byVal szSource) Dim szChar, WideChar, nLength, i, result nLength = Len(szSource) 'szSource = Replace(szSource," ","+") For i = 1 To nLength szChar = Mid(szSource, i, 1) If Asc(szChar) < 0 Then WideChar = CLng(AscB(MidB(szChar, 2, 1))) * 256 + AscB(MidB(szChar, 1, 1))..
더보기
단축키
내 블로그
| 내 블로그 - 관리자 홈 전환 |
Q
Q
|
| 새 글 쓰기 |
W
W
|
블로그 게시글
| 글 수정 (권한 있는 경우) |
E
E
|
| 댓글 영역으로 이동 |
C
C
|
모든 영역
| 이 페이지의 URL 복사 |
S
S
|
| 맨 위로 이동 |
T
T
|
| 티스토리 홈 이동 |
H
H
|
| 단축키 안내 |
Shift + /
⇧ + /
|
* 단축키는 한글/영문 대소문자로 이용 가능하며, 티스토리 기본 도메인에서만 동작합니다.