서버에있는 image형식 파일 다운로드

 

DECLARE
@IMG_PATH VARCHAR(MAX),
@TIMESTAMP VARCHAR(MAX),
@ObjectToken INT,
@FILENAME varbinary(MAX),---new variable here
@hr int
 
 
   SELECT @IMG_PATH = filnm
                    ,@FILENAME = filedata ---column selected here
  FROM syver01t   a
  where  a.filnm  = 'apf01.pbd'
 
  SET @TIMESTAMP = 'd:\sign\'+@IMG_PATH
 
  select @IMG_PATH,@TIMESTAMP,@FILENAME
 
  EXEC @hr = sp_OACreate 'ADODB.Stream', @ObjectToken OUTPUT
  select @hr
  EXEC @hr = sp_OASetProperty @ObjectToken, 'Type', 1
  select @hr
  EXEC @hr = sp_OAMethod @ObjectToken, 'Open'
   select @hr
  EXEC @hr = sp_OAMethod @ObjectToken, 'Write', NULL, @FILENAME --new variable here
  select @hr
  EXEC @hr =sp_OAMethod @ObjectToken, 'SaveToFile', NULL, @TIMESTAMP, 2
  select @hr
  EXEC @hr =sp_OAMethod @ObjectToken, 'Close'
  select @hr
  EXEC @hr =sp_OADestroy @ObjectToken
  select @hr