질문합니다! ㅠㅠ
이퓨리한나
2023.04.01
Public Function Change(Str As String) As StringDim i&For i = 1 To Len(Str) If Len(Hex(Asc(Mid$(Str, i, 1)))) = 4 Then Change = Change & % & Mid$(Hex(Asc(Mid$(Str, i, 1))), 1, 2) & % & Mid$(Hex(Asc(Mid$(Str, i, 1))), 3, 2) Else Change = Change & % & Hex(Asc(Mid$(Str, i, 1))) End IfNextEnd Function
이걸로 Change(안녕하세요) 이렇게 했지만, 한글은 출력이 안되더라구요..그래서 Text1.text에 영어로 적으니 그사이트 댓글이 등록되더라구요..한글만 등록안되네요, 유니코드를 쓰는것같은데,저 소스를 유니코드로 바꾸거나..Change 처럼 유니코드로 바꿔서 보내는 것이 있을까요
-
벛꽃잎
인터넷의 URL에는 입력 가능한 문자 스펙에 한글이 없기 때문에 유니코드(UTF-8)로 변환해서 보내줘야 합니다.
예를들어 \가\라는 문자는 유니코드로 ea b0 80이고 웹에선 구분자를 %로 하니 %ea%b0%80 이렇게 변형되어 전송되는것이지요.
위의 함수 Change가 그런 역할을 하고 있다고 봅니다. 일단 제가 직접 실행을 해보겠습니다만...
....
제가 했을때 잘 되는데요..?
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2694421 | 리스트 박스... 다음으로 넘어가기? | 난슬 | 2025-05-11 |
| 2694399 | RegWrite 등록확인방법이있나요? | 하린 | 2025-05-10 |
| 2694340 | 아스키코드 출력 | 다힘 | 2025-05-10 |
| 2694286 | 1,900,000 - 백 구십 만원 (6) | 허우룩 | 2025-05-09 |
| 2694230 | 텍스트복사 | 거북이 | 2025-05-09 |
| 2694203 | 당신의 지식을 공유해주세요! | 후예 | 2025-05-09 |
| 2694174 | 디버거 크랙방지 (8) | 덕이 | 2025-05-08 |
| 2694146 | 수다 사이트글 조회한사람 목록추출가능? (5) | 곰돌츼 | 2025-05-08 |
| 2694070 | vb_vbnet님의 사이트댓글자동작성기인데 이것을요. | 가시 | 2025-05-07 |
| 2694041 | 모듈은 무었인가요? | 하람 | 2025-05-07 |
| 2694013 | 비쥬얼베이직 책 추천좀요^^... | 초코맛캔디 | 2025-05-07 |
| 2693985 | 리소스문제데요...ㅋㅋ (1) | 아리에스 | 2025-05-07 |
| 2693929 | 했는데 ㅠㅠ | 볼수록중독 | 2025-05-06 |
| 2693870 | 수정좀요 ^^;; (2) | 차오름 | 2025-05-06 |
| 2693812 | ※고구마는 보아라 (6) | 솔길 | 2025-05-05 |
| 2693789 | 마우스가있는곳의 좌표 보기 | 하예진 | 2025-05-05 |
| 2693759 | 실시간으로 서버 열렸는지 닫혔는지 확인하는법좀 | 참이 | 2025-05-05 |
| 2693728 | 로그인 유지 관련 제발 성실답변좀요 | 에녹 | 2025-05-04 |
| 2693705 | 아 재질문합니다 (5) | 모아 | 2025-05-04 |
| 2693677 | Dim a (1 to 11) AS Long에서 11을 K로 놓는 방법 질문 | 진주 | 2025-05-04 |