<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=euc-kr">
</head>
<body>
<%
sql = "select FileBlob, oriFileName from tblCustomer where FileNames = '통계자료.pdf' "
Set rs = oConn.Execute(Sql)
Binary = rs(0) '바이너리
set bd = Server.CreateObject("Chilkat_9_5_0.BinData")
strBase64 = bd.AppendBinary(Binary) '바이너리 로드
strBase64 = bd.GetEncoded("base64") '바이너리 -> base64 인코딩
response.write "base64 인코딩 된 값 : <p>" & strBase64
success = bd.Clear() '캐시삭제
success = bd.AppendEncoded(strBase64,"base64") 'base64 값을 로드
' Save to a GIF file.
success = bd.WriteFile("d:\Temp\" & rs(1)) '폴더에 파일저장
'response.write success
response.write "<p>완료"
%>
</body>
</html>
'classic asp' 카테고리의 다른 글
| [classic asp] SMTP 이용한 이메일발송 (0) | 2019.02.13 |
|---|---|
| [classic asp] 클래스에서 object 배열에 담기 (0) | 2019.02.13 |
| [classic asp] 클래스에서 개체 배열로 만들기 (0) | 2019.02.13 |
| [classic asp] 페이징처리 속도개선 (0) | 2019.02.13 |
| [classic asp] jquery 자동완성 (0) | 2019.02.13 |