성태의 닷넷 이야기
홈 주인
모아 놓은 자료
프로그래밍
질문/답변
사용자 관리
사용자
메뉴
아티클
외부 아티클
유용한 코드
온라인 기능
MathJax 입력기
최근 덧글
[정성태] Reordering on an Alpha processor ;...
[정성태] 공유 감사합니다. ^^ 참고로, WPF에서 WindowsF...
[Tom Lee] 답변 감사합니다. 나름의 해결책 연구해보고 여기에도 공유해봅니다...
[정성태] 아래의 글을 보면, MoveWindow 하면 될 듯한데요. ^^...
[Tom Lee] 안녕하세요 올려주신 글 참고하여 WPF 어플리케이션 안에 Uni...
[정성태] A graphical depiction of the steps ...
[정성태] 질문을 주셔서 출판사 측에 문의를 했습니다. 약 한 달 정도 후...
[Thorondor
] @정성태 개인 블로그인데도 거의 커뮤니티 급 인 것 같아요. 요...
[정성태] Roll A Lisp In C - Reading ; https...
[정성태] Java - How to use the Foreign Funct...
글쓰기
제목
이름
암호
전자우편
HTML
홈페이지
유형
닷넷
.NET 3.0
.NET 3.5
.NET 4.0
VC++
개발 환경 구성
제품 소개
VS.NET IDE
Vista
Windows 7
Windows 8
Windows 서버
Team Foundation Server
IIS
디버깅 기술
Win32
64비트
오피스
웹
기타
Phone
부모글 보이기/감추기
내용
뉴스그룹에 올라온 소스입니다. VB 스크립트로 작성한 Binary -> ASCII 디코딩 소스인데, XMLHTTP 의 반환값을 해석하는 데에 유용하게 쓸 수 있습니다. 보통 XMLHTTP 가 XML 문서가 아닌 반환값에 대해서는 Binary 데이터만을 보여주어서 한글이 깨져 보이게 됩니다. 즉, 한글이 포함된 HTML 문서의 경우에는 아래에서 보여주는 BinDecode VB 함수를 사용하시면 됩니다. 한가지 주의하실 것은, 아무래도 Script 함수이다 보니 조금 긴 HTML 텍스트의 경우에는 과도한 루프와 문자열 연산때문에 CPU 부하가 너무 걸린다는 것이죠. 스크립트로는 극복할 수 없고, 만약 ActiveX 를 배포할 수 있는 상황이라면 VC++ COM 개체로 구현하시는 것도 좋은 방법일 수 있습니다. <pre> <script language="javascript"> function ViewHtmlPage() { var x = new ActiveXObject("Microsoft.XMLHTTP") x.open("get","test.asp",false); x.send(); var strv = x.responseBody; document.body.innerHTML = BinDecode(strv); } </script> <script language="vbscript"> '----------------------------------------- ' BinDecode (바이너리 -> 아스키 변환) ' mongmong - 2003. 2 '----------------------------------------- Public Function BinDecode(byVal binData) Dim i, byteChr, strV For i = 1 to LenB(binData) byteChr = AscB(MidB(binData,i,2)) If byteChr > 127 Then i = i + 1 strV = strV & Chr("&H" & Hex(byteChr) & Hex(AscB(MidB(binData,i,2)))) Else strV = strV & Chr(byteChr) End if Next BinDecode = strV End Function </script> </pre>
첨부파일
스팸 방지용 인증 번호
5529
(왼쪽의 숫자를 입력해야 합니다.)