classic asp sha512 암호화

1. asp 암호화를 지원해주는 CAPICOM.DLL을 웹서버에 설치한다.

(설치파일은 첨부했습니다.)

 

2. 설치된 경로로 이동하여 (C:\Program Files (x86)\Microsoft CAPICOM 2.1.0.2 SDK) LIB 폴더안에 있는 CAPICOM.DLL을 복사한다.

 

3. 설치하려는 웹서버가 64비트인 경우 windows\syswow64 폴더안에 붙여넣고, 32비트인경우 windows\system32 에 붙여넣는다.

 

4. 옮겨넣기가 끝나면 다음 레지스트리에 등록한다.

- 64비트 : 

 cmd창을 열어서 windows\syswow64까지 이동한다음. 옆에 코드를 실행한다. -> regsvr32.exe capicom.dll

-32비트 : 

 cmd창을 열어서 windows\system32까지 이동한다음. 옆에 코드를 실행한다. -> regsvr32.exe capicom.dll

 

5. 등록이 완료되면 IIS관리자로 이동한다음 응용프로그램풀을 선택한다. 적용하려는 사이트와 연결된 응용프로그램을 선택 후 오른측클릭 하면 응용프로그램 풀 기본값설정에 들어갈수 있다.

 

6. 기본값 설정 창이 뜨면 32비트 응용프로그램사용에 False로 되있는값을 True로 변경한다.

 

7. iis 재시작 후 아래 코드를 실행하면 정상적으로 암호화 되는것을 확인할 수 있다.

FUNCTION ENCRYPTION(STR,STREN)
  DIM CP
  SET CP=SERVER.CREATEOBJECT("CAPICOM.HASHEDDATA")
  SELECT CASE UCASE(STREN) '입력된 암호화의 종류에 따라 암호화함.
    CASE "SHA1" : CP.ALGORITHM=0
    CASE "MD2"  : CP.ALGORITHM=1
    CASE "MD4"  : CP.ALGORITHM=2
    CASE "MD5"  : CP.ALGORITHM=3
    CASE "SHA256" : CP.ALGORITHM=4
    CASE "SHA384" : CP.ALGORITHM=5
    CASE "SHA512" : CP.ALGORITHM=6
    CASE ELSE '암호화 종류가 입력되지 않거나 지원되지 않는 암호화
      ENCRYPTION="0" : SET CP=NOTHING : EXIT FUNCTION
  END SELECT
  CP.HASH USTR2BSTR(STR) 'UNICODE를 BYTE로 변환
  ENCRYPTION=CP.VALUE
  SET CP=NOTHING
END FUNCTION
 
'UNICODE를 BYTE로 변환
FUNCTION USTR2BSTR(USTR)
  DIM I: DIM STRCHAR: DIM STRRESULT: STRRESULT=""
  FOR I=1 TO LEN(USTR)
    STRCHAR=MID(USTR, I, 1)
    STRRESULT=STRRESULT&CHRB(ASCB(STRCHAR))
  NEXT
  USTR2BSTR=STRRESULT
END FUNCTION
 
response.Write ENCRYPTION(param,"SHA512")

[아래 파일명을 클릭하시면 파일을 다운로드합니다 (안전한 링크이니 안심하세요.)]

capicom_dc_sdk.msi