dbWriter Write file SQL code
Stored procedure to write a text file using the
Scripting.FileSystemObject:
CREATE PROCEDURE zp_WriteFile(@FileName
varchar(255), @Text1 varchar(1000))
AS
DECLARE
@FS int,
@OLEResult int,
@FileID int
EXECUTE @OLEResult = sp_OACreate 'Scripting.FileSystemObject',
@FS OUT
IF @OLEResult <> 0
PRINT 'Scripting.FileSystemObject'
--Open a file
execute @OLEResult = sp_OAMethod @FS, 'OpenTextFile', @FileID
OUT, @FileName, 8, 1
IF @OLEResult <> 0
PRINT 'Error in opening text file!!'
--Write Text1
execute @OLEResult = sp_OAMethod @FileID, 'WriteLine', Null,
@Text1
IF @OLEResult <> 0
PRINT 'Error in writing to file!!'
EXECUTE @OLEResult = sp_OADestroy @FileID
EXECUTE @OLEResult = sp_OADestroy @FS
GO
|
|
