url = "https://tapproval.smartropay.co.kr/payment/approval/offCancel.do"  		' 테스트
' url = "https://approval.smartropay.co.kr/payment/approval/offCancel.do" 		' 운영

Tid = "";						// 취소 요청할 Tid 입력
Mid = "";						// 발급받은 테스트 Mid 설정(Real 전환 시 운영 Mid 설정)
CancelAmt = "1004";				// 취소할 거래금액
Edidate = "202301231120734";	// 전문전송일시
PartialCancelCode = "0";		// 0: 전체취소, 1: 부분취소
AppNo = "1234567890";			// 카드사 승인번호
AppDt = "20231231";				// 원거래 승인일자
TraceNo = "0006";				// 전문추적번호
CurrencyCode = "410";			// 통화코드
CancelPwd = "9999";				// 취소비밀번호
MerchantKey = "";  				// 발급받은 테스트 상점키 설정(Real 전환 시 운영 상점키 설정)

' 취소 요청 파라미터 셋팅
Set paramData = jsObject()
paramData("Tid") = Tid
paramData("Mid") = Mid
paramData("CancelAmt") = CancelAmt
paramData("Edidate") = Edidate
paramData("PartialCancelCode") = PartialCancelCode
paramData("TraceNo") = TraceNo
paramData("AppNo") = AppNo
paramData("AppDt") = AppDt
paramData("CurrencyCode") = CurrencyCode
paramData("CancelPwd") = CancelPwd
		
    

        
' json 데이터 AES256 암호화
EncData = CryptoUtil.Aes256Encrypt(paramData, left(merchantKey, 32))

Set body = jsObject()
body("EncData") = EncData
body("Mid") = Mid

result = sendPost(url, body)

Function sendPost(url, objJson)
    Set httpRequest = Server.CreateObject("MSXML2.ServerXMLHTTP")
    httpRequest.open "POST", url, False
    httpRequest.setRequestHeader "Content-type","application/json"
	httpRequest.setRequestHeader "Accept","application/json"
    httpRequest.send objJson.jsString
    postResponse = httpRequest.ResponseText

	sendPost = postResponse
End Function


// DLL 암호화 소스
using System;
using System.EnterpriseServices;
using System.IO;
using System.Runtime.InteropServices;
using System.Security.Cryptography;
using System.Text;

namespace SmartropayLib
{
	public class CryptoUtil : ServicedComponent
    {
        /// 

        /// AES256 암호화
        /// 
        /// 문자열
        /// 키
        /// 암호화 문자열
        public string Aes256Encrypt(string text, string key)
        {
            RijndaelManaged aes = new RijndaelManaged();
            aes.KeySize = 256;
            aes.BlockSize = 128;
            aes.Mode = CipherMode.CBC;
            aes.Padding = PaddingMode.PKCS7;
            aes.Key = Encoding.UTF8.GetBytes(key);
            aes.IV = new byte[] { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };

            var encrypt = aes.CreateEncryptor(aes.Key, aes.IV);
            byte[] xBuff = null;
            using (var ms = new MemoryStream())
            {
                using (var cs = new CryptoStream(ms, encrypt, CryptoStreamMode.Write))
                {
                    byte[] xXml = Encoding.UTF8.GetBytes(text);
                    cs.Write(xXml, 0, xXml.Length);
                }
                xBuff = ms.ToArray();
            }

            return Convert.ToBase64String(xBuff);
        }
        
        /// 

        /// AES256 복호화
        /// 
        /// 암호화 문자열
        /// 키
        /// 복호화 문자열
        public string Aes256Decrypt(string text, string key)
        {
            RijndaelManaged aes = new RijndaelManaged();
            aes.KeySize = 256;
            aes.BlockSize = 128;
            aes.Mode = CipherMode.CBC;
            aes.Padding = PaddingMode.PKCS7;
            aes.Key = Encoding.UTF8.GetBytes(key);
            aes.IV = new byte[] { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
 
            var decrypt = aes.CreateDecryptor();
            byte[] xBuff = null;
            using (var ms = new MemoryStream())
            {
                using (var cs = new CryptoStream(ms, decrypt, CryptoStreamMode.Write))
                {
                    byte[] xXml = Convert.FromBase64String(text);
                    cs.Write(xXml, 0, xXml.Length);
                }
                xBuff = ms.ToArray();
            }
 
            return Encoding.UTF8.GetString(xBuff);
        }
    }
}