اريد تصدير جدول إلى ملف text بمواصفات محددة

السلام عليكم ورحمة الله و بركاته :

الإجرائية هده ربما تفيدك .. جربها و أخبرني بالنتيجة :

CREATE PROCEDURE sp_AppendToFile(@FileName varchar(255), @Text1 varchar(255)) 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 'OpenTextFile'

--Write Text1
execute @OLEResult = sp_OAMethod @FileID, 'WriteLine', Null, @Text1
IF @OLEResult <> 0 PRINT 'WriteLine'

EXECUTE @OLEResult = sp_OADestroy @FileID
EXECUTE @OLEResult = sp_OADestroy @FS

طبعاً طول النص المرسل إلى المف النصي يمكنك أن تغيره كما تشاء .. ;)

--------------------------------------------------------------

أيضاً شوف الرابط التالي حول التعامل مع الملفات النصية من داخل الإجرائية المخزنة لربما يفيدك :

التعامل و الكتابة في الملفات النصية

السلام عليكم و رحمة الله وبركاته :

شرح بسيط للإجرائية .. :blink:

CREATE PROCEDURE sp_AppendToFile(@FileName varchar(255), @Text1 varchar(255)) AS
DECLARE @FS int, @OLEResult int, @FileID int

-- (.. مثلاً IO) للتعامل مع ملفات خارجية  Stream  إنشاء كائن شبيه بالـ  
-- @FS  سوف تعيد مقبض للتعامل مع المجرى وهو هنا Sp_OACreate طبعاً الدالة 

EXECUTE @OLEResult = sp_OACreate 'Scripting.FileSystemObject', @FS OUT
IF @OLEResult <> 0 PRINT 'Scripting.FileSystemObject'

-- sp_OAMethod
-- "هده كـ "إفتح الملف Stream سنستخدم الدالة هده لإرسال أمر معين للـ 
--  @FileID مع العملية "فتح ملف" ستعيد مقبض لاستخدامه في الكتابة داخل الملف كما سنرى   sp_OAMethod أيضاً الدالة

execute @OLEResult = sp_OAMethod @FS, 'OpenTextFile', @FileID OUT, @FileName, 8, 1
IF @OLEResult <> 0 PRINT 'OpenTextFile'

--Write Text1
execute @OLEResult = sp_OAMethod @FileID, 'WriteLine', Null, @Text1
IF @OLEResult <> 0 PRINT 'WriteLine'

-- و لتدمير المجرى sp_OADestroy استخدام الكائن لإغلاق الملف المفتوح 

EXECUTE @OLEResult = sp_OADestroy @FileID
EXECUTE @OLEResult = sp_OADestroy @FS

------------------------------------------------------------------------------------

إخواني لمزيد من المعلومات و التوسع ستجدون في الـ Help ما يكفيكم إن شاء الله .

الاخ العزيز اشكر جهودك:

لكني لا ازال مبتدئ ، ولا اعلم كيف يتم توظيف الاجرائية لتنفيذ المطلوب

ممكن توضح ذلك من خلال مثال لجدول يضم حقل واحد

الجدول :

15

8

ثم طريقة التصديرالى ملف نصي او استعلام

بحيث يكون النتاتج

0015

0008

مع كل الشكر

السلام عليكم ورحمة الله وبركاته :

Declare @len int , @freq int , @Text Nvarchar(4)

Set @Text = cast( 29 AS Nvarchar(4))  -- convert to string Type
Set @len = len( @Text )   ----  result = 2
Set @freq = 4 - @len  ---- @freq = 2

Declare @i int , @Zeros Nvarchar(4)
Set @i =0
while @i < @freq
Begin
  Set  @Zeros = '0'
  Set @i = @i + 1
End

Set @Text = @Zeros + @Text

Print  @Text  -- result = '0029'
-- this result will pass it as a parameter for the previous procedure

أكتب هذا الكود في الـ Query Analyzer و نفذها

السلام عليكم و رحمة الله أخي الكريم .. :)

وضعت المثال في الرابط ده و إن شاء الله سيعجبك .. ;)

تصدير جدول بيانات إلى ملف نصي باستخدام T-SQL