CREATE PROCEDURE dbo.sp_AppendToTextFile(@FileName varchar(255), @TextData varchar(8000))
AS
DECLARE @FS int, @OLEResult int, @FileID int
EXECUTE @OLEResult = master..sp_OACreate 'Scripting.FileSystemObject', @FS OUT
IF @OLEResult <> 0 PRINT 'Scripting.FileSystemObject'
--Open a file
execute @OLEResult = master..sp_OAMethod @FS, 'OpenTextFile', @FileID OUT, @FileName, 8, 1
IF @OLEResult <> 0 PRINT 'OpenTextFile'
--Write Text1
execute @OLEResult = master..sp_OAMethod @FileID, 'WriteLine', Null, @TextData
IF @OLEResult <> 0 PRINT 'WriteLine'
EXECUTE @OLEResult = master..sp_OADestroy @FileID
EXECUTE @OLEResult = master..sp_OADestroy @FS
GO
--사용예)
EXEC dbo.sp_AppendToTextFile @FileName='C:\Log.txt', @TextData='메롱.'
(0) 
(0)Posted by 좐군
