0

日付を名前として作成されたフォルダにpdfファイルを保存する方法を知りたいです。作成したばかりのフォルダーにpdfを保存する必要があります。

ここに私のコードがあります:

DECLARE @SP VARBINARY(MAX),
@DT VARCHAR(MAX),
@OT INT,
@Rr varchar(30),
@PL varchar(100),
@fL varchar(100)
SET @fL = 'L' + REPLACE(CONVERT(varchar(10), GETDATE(), 101), '/', '')
set @PL = 'c:\'+ @fL
EXEC master.dbo.xp_create_subdir @PL


SET @DESTPATH = '@PL' + CAST(@Rr AS varchar) + '.pdf'
EXEC sp_OACreate 'ADODB.Stream', @OT OUTPUT
EXEC sp_OASetProperty @OT, 'Type', 1
EXEC sp_OAMethod @OT, 'Open'
EXEC sp_OAMethod @OT, 'Write', NULL, @SOURCEPATH
EXEC sp_OAMethod @OT, 'SaveToFile', NULL, @DESTPATH, 2
EXEC sp_OAMethod @OT, 'Close'
EXEC sp_OADestroy @OT
4

0 に答える 0