자세한 내용은 여기를 참조하십시오
http://hi.baidu.com/lael80/blog/item/6633d7fc89f9f282b801a061.html
http://www.gzyd.net/lael/coding.rar
파일 인코딩 변환/스크린 암호화 및 암호 해독/단순화 및 전통적인 중국 변환 1.0
사용에 대한 메모 :
1. 사용하기 전에 백업하십시오.이 소프트웨어를 사용하여 발생하는 손실에 대한 책임이 있습니다.
2. 인코딩 및 변환을 수행하기 전에 모든 파일의 소스 인코딩이 일관되고 올바른 것을 선택하는지 확인하십시오. 그렇지 않으면 오류가 발생할 수 있습니다.
3. ASP 코드를 암호화하거나 해독하거나 단순하고 전통적인 중국어를 변환하기 전에 파일의 코드가 ANSI인지 확인해야합니다. 그렇지 않으면 차량 코드가 발생할 수 있습니다.
작업을 완료 한 후 원래 코드로 돌아갈 수 있습니다.
4. ASP 암호화는 Microsoft를 호출하는 것과 같습니다.
포함 된 경우 : <%@language = "vbscript"CodePage = "936"%>
screnc.exe/s/f/xl/easp*.*
screnc.exe/s/f/xl/ehtm*.*
그렇지 않으면:
screnc.exe/s/f/easp*.*
screnc.exe/s/f/ehtm*.*
외부 *.js 또는 *.vbs 암호화, 먼저 파일을 추가하십시오.
<scriptLanguage = "Script Language"> Code </script>, 완료 후 삭제하십시오.
5. ASP 암호 해독은 혼자서 수정됩니다. 원본 텍스트는 jscript에서 나 왔으며 VBScript로 변경하는 데 하루가 걸렸습니다.
6. 원본 파일에 암호화 된 코드와 암호화되지 않은 코드가 모두 포함 된 경우 (상황이 거의 발생하지 않습니다 ~ _ ~)
암호 해독을 먼저 실행 한 다음 다시 암호화하십시오.
7. Coding.txt는 시스템 파일 인코딩 목록입니다. 원하는 인코딩을 사용할 수 없으면 줄을 추가 할 수 있습니다.
8.이 소프트웨어를 사용할 때는 코드에 개인 정보를 추가하지 않으므로 원래 향이 보장됩니다.
9. 사용해 주셔서 감사합니다.
10.이 소프트웨어는 여러 폴더 아래에서 동일한 디렉토리에 파일을 저장하는 데 도움이 될 수 있습니다 ~ _ ~
11. 일부 시스템은 VB6 또는 VB 런타임 라이브러리 또는 WindowsScriptenCoder를 설치해야 할 수도 있습니다.
기타 지침 :
1. TextBox가 이진 컨텐츠를 지원합니까?
2.이 소프트웨어는 암호화를 두 번 허용하지 않습니다.
코드를 해독하는 데 문제가있을 수 있습니다 (첫 번째 암호 해독 후에 알려지지 않은 문자가 나타납니다).
또한 일부 알려지지 않은 문자가 암호화에 여러 번 나타나서 암호 해독 작업이 실패 할 수도 있습니다. 위의 다른 지침에 언급 된 오류를 완료하는 데 관심이있는 경우
인코딩 변환 부분은 BOM 파일 헤더를 추가/삭제할지 여부를 자동으로 식별하고 자유롭게 선택할 수 있습니다.
이메일 주소와 내 URL을 남겨 주시면 소스 코드를 보내 드리겠습니다. 인코딩 자동 식별 ...
소스 코드에는 이미 함수가 있습니다 (module1.bas/filecodingcheck ()).
그러나 테스트 후에는 매우 정확하지 않습니다. 특히 BOM 헤더가없는 파일.
PublicFunctionFileCodingCheck (Byvalfilepathasstring)
Dimsmobjasnewadodb.stream
dimsmread1asinteger, smread2asinteger, smread3asinteger
smobj.type = 1
smobj.open
smobj.loadfromfilefilepath
smobj.position = 0
iflenb (smobj.read)> = 1then
smobj.position = 0
smread1 = ascb (smobj.read (1))
endif
smobj.position = 0
iflenb (smobj.read)> = 2then
smobj.position = 1
smread2 = ascb (smobj.read (1))
endif
smobj.position = 0
iflenb (smobj.read)> = 3then
smobj.position = 2
smread3 = ascb (smobj.read (1))
endif
ifsmread1 = & hffandsmread2 = & hfethen
filecodingCheck = "유니 코드"
elseifsmread1 = & hfeandsmread2 = & hfftthen
filecodingcheck = "unicodebigendian"
elseifsmread1 = & hefandsmread2 = & hbbandsmread3 = & hbftthen
filecodingCheck = "UTF-8"
또 다른
filecodingcheck = "ansi"
endif
smobj.close
setsmobj = 아무것도
최종 기능 장애