程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 數據庫知識 >> SqlServer數據庫 >> 關於SqlServer >> 用SQL在文本文件中追加數據

用SQL在文本文件中追加數據

編輯:關於SqlServer

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_movefile]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_movefile]
GO

/*--在文本文件中追加數據

 在文本文件中追加數據
 如果文件不存在,將創建文件

--鄒建 2004.08(引用請保留此信息)--*/

/*--調用示例

 exec p_movefile 'c:\aa.txt','測試寫入'
--*/
create proc p_movefile
@filename varchar(1000),--要操作的文本文件名
@text varchar(8000) --要寫入的內容
as
declare @err int,@src varchar(255),@desc varchar(255)
declare @obj int

exec @err=sp_oacreate 'Scripting.FileSystemObject',@obj out
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'OpenTextFile',@obj out,@filename,8,1
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'WriteLine',null,@text
if @err<>0 goto lberr

exec @err=sp_oadestroy @obj
return

lberr:
 exec sp_oageterrorinfo 0,@src out,@desc out
 select cast(@err as varbinary(4)) as 錯誤號
  ,@src as 錯誤源,@desc as 錯誤描述
go

 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved