أخواني الأعزاء أرجوا ممن عنده خبره ومعرفة بكيفية استيراد بيانات من جدول اكسل ان يشرح لي الطريقة حيث ان لدي
بيانات مهمة في جدول اكسل نسختها من صديقي واريد أن اضيفها الى قاعدة البيانات أكرر الطلب الى المشرفين وكذا استاذي العزيز وديع القباطي وأن شاء الله ما تخيبوني

بصراحة اعرف انه يمكن تحويلة الى access ومنها يسهل تحويلة الى oracle

شكرا أخي خالد عيد على مرورك وردك على الموضوع
على العموم ممكن تشرح كيفية النقل من أكسس الى اوراكل وأنا ساقوم بنقل البيانات من اكسل الى اكسس وبعدها أنقلها الى اوراكل

كيفية نقل البيانات من اكسل الي اكسس
1- عمل ماكرو جديد وكتابة الأمرRunCommand
وكتابة الأمر import أسفل
قم بالتشغيل يفتح لك معالج يطلب من نوع الملف المراد الاستيراد منه اكسل / وورد كما يحلو لك
اختار وتابع المعالج
وان شاء في النهاية تم انشاء جدول بالاسم اللى انت عايزه بالبيانات اللى بتستوردها

ولكن أعزائي من عنده الحل من الاكسل الي الأوراكل مباشرة يخبرني وجزاكم الله خير

ولكن أعزائي من الاكسل الي الأوراكل مباشر لا أعرفه
ومن عنده خبر .. يبلغ من ليس عنده خبر مثلي

شكرا أخي أشرف على الرد وسأقوم بالتجربه وإن شاء الله تعمل
وأكرر لك المشرفين اذا كانت هناك طريقة مباشرة فالرجاء لا يبخلوا علينا
وشكرا للجميع

شكرا أخي أشرف بالفعل جربت طريقتك وهي ناجحة ولكن كان هناك طريقة أسهل وهي إنشاء جدول مباشرة عن طريق استيراد البيانات(بالضغط بالزر الايمن للماوس في شاشة إنشاء الجداول) ...

أنا مستغرب إن كل العباقرة الموجودين في هذا المنتدى ما أحد منهم رد ليش الاحتكار يا اخوة انا ما تعودنا على هذه الاشياء في هذا المنتدى ..
الرجاءءءءءءءءءءءءءء
ممن عنده معلومة عن تصدير البيانات الى الاوراكل من اي تطبيق من تطبيقات الاوفيس يعلمنا واجره عند الله .

عجيبه
وين الناس....
أمجد
هاني سند
عادل الشاهري
وديع القباطي

يا جماعة إذا ما فيش طريقة كلموني علشان أقتنع وأدور على شغله ثانية

الأخ / mmacompunet

يا جماعة إذا ما فيش طريقة كلموني علشان أقتنع وأدور على شغله ثانية
أنا مستغرب إن كل العباقرة الموجودين في هذا المنتدى ما أحد منهم رد ليش الاحتكار يا اخوة انا ما تعودنا على هذه الاشياء في هذا المنتدى

لماذا لا تريد ان تبذل مجهود فى البحث .. ؟؟

توجد مشاركات كثيرة بالمنتدى فى هذا الموضوع ... يمكنك استخدام خاصية البحث
اكتب excel
او اكسيل

وستجد الكثير من المشاركات المفيده

عموما .. اليك محتوى اكواد احدى المشاركات السابقة بالمنتدى

سوف أعرض لك مثال معمول ال forms كيفية نقل البيانات من ORACLE إلى Excel
استعلام
DECLARE
 OUTFILE   TEXT_IO.FILE_TYPE;
BEGIN
 OUTFILE := TEXT_IO.FOPEN('C:\TEST.CSV','W');
FOR R IN (SELECT 
	   EMP_NO,
				EMP_A_NAME,
				EMP_ID
				FROM 
				EMP "أنت تحدد الجدول الذي تريده"
				
LOOP
TEXT_IO.PUT_LINE(OUTFILE,R.EMP_NO||';'||R.EMP_A_NAME||';'||R.EMP_ID);
END LOOP;	 
TEXT_IO.FCLOSE(OUTFILE);
END;



طبعا يمكنك عمل العكس ولكن أولا عليك حفظ الملف بامتداد .csv (حيث يكون الفاصل بين حقل وآخر فاصلة منقوطه) ومن ثم تنفيذ الكود التالي :
كود
DECLARE
LINEBUF			VARCHAR2(1000);
OUT_FILE			 TEXT_IO.FILE_TYPE;
V_COLOUMN_1	  NUMBER(9); --طبعا بحسب عدد الحقول في جدولك ونوعها
V_COLOUMN_2		NUMBER(3);
V_COLOUMN_3	   NUMBER(3);
V_COLOUMN_4	 VARCHAR2(3);
BEGIN 
 
begin
 OUT_file := TEXT_IO.FOpen('C:\TEST.CSV','R');
 Exception when Others then
	  Message('Error in Reading from file C:\TEST.CSV');
	  RETURN;
end;
					  
--********** 
LOOP

BEGIN	 
TEXT_IO.GET_LINE(OUT_FILE,LINEBUF);
EXCEPTION WHEN NO_DATA_FOUND THEN
EXIT;	   
END;	 
LINEBUF := LTRIM(LINEBUF);
V_COLOUMN_1	:= SUBSTR(LINEBUF,1,9);
V_COLOUMN_2	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,1)+1,								   INSTR(LINEBUF,';',1,2)-INSTR(LINEBUF,';',1,1)-1 );
V_COLOUMN_3	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,2)+1,								   INSTR(LINEBUF,';',1,3)-INSTR(LINEBUF,';',1,2)-1 );
V_COLOUMN_4	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,3)+1);							   
--********************** 
INSERT INTO TEST(COLOUMN_1,COLOUMN_2,COLOUMN_3,COLOUMN_4)
VALUES(V_COLOUMN_1,V_COLOUMN_2,V_COLOUMN_3,V_COLOUMN_4);
--**********************															
END LOOP; 
COMMIT;
TEXT_IO.FClose(out_file); 

SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
EXCEPTION WHEN OTHERS THEN
MESSAGE(SQLERRM);
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
TEXT_IO.FClose(out_file);
END;

مع تمنياتي بالتوفيق

شكرا اخي امجد فعلا انا لم استخدم خاصية البحث ولكني دخلت في _ قسم اوراكل العام _ منتدى البرامج المساعدة ووجدت العديد من المشاركات حول نفس الموضوع ولاحظت أن برنامج التود يقوم بالمطلوب بكل جدارة ولكن للأسف ان جميع الروابط لم تعمل وأيضا البرنامج يحتاج الى كراك وهو غير متوفر فمن كان لديه نسخة حديثة من البرنامج مع الكراك الرجاء ارسالها الى ايميلي
[email protected]
أو وضع روابط في المنتدى لتعم الفائدة للجميع وأرجوا ان يتأكد من الروابط
بالنسبة للكود الذي وضعته يا اخ امجد أعتقد انه ليس المطلوب فهو يقوم بالتحويل من اوراكل الى اكسل بينما أريد انا التحويل من اكسل الى اوراكل
وشكرا لك يا اخي العزيز كما اشكر جميع من يهتم ويرد على اسئلة واستفسارات الأخوة الاعضاء
ودمتم على خير

ولكن للأسف ان جميع الروابط لم تعمل

http://www.4shared.com/dir/151942/40923550/sharing.html

Toad V9.1.0.8, 3 أجزاء

برنامج Toad الاصدار 7.6 كامل و بالكود, برنامج Toad الاصدار 7.6 كامل و بالكود

Toad For Oracle V9, اخر اصدار

شرح لكيفية الاتصال ببرنامج Toad, صوت و صورة

اذا وجد اى رابط لايعمل .. اتمنى ان تسجل ملاحظاتك فى نفس الموضوع .. حتى يمكن معالجة الامر بمعرفة صاحب المشاركة
-------------------------------------------------

بالنسبة للكود الذي وضعته ..أعتقد انه ليس المطلوب فهو يقوم بالتحويل من اوراكل الى اكسل بينما أريد انا التحويل من اكسل الى اوراكل

المثال السابق الذى وضعته هو مقتبس من مشاركة سابقة بالمنتدى ويحتوى جزئين
الجزء الاول يشرح النقل من اوراكل الى اكسيل
الجزء الثانى يشرح النقل من اكسيل الى اوراكل

الكود مره اخرى

طبعا يمكنك عمل العكس ولكن أولا عليك حفظ الملف بامتداد .csv (حيث يكون الفاصل بين حقل وآخر فاصلة منقوطه) ومن ثم تنفيذ الكود التالي :
كود

DECLARE
LINEBUF			VARCHAR2(1000);
OUT_FILE			 TEXT_IO.FILE_TYPE;
V_COLOUMN_1	  NUMBER(9); --طبعا بحسب عدد الحقول في جدولك ونوعها
V_COLOUMN_2		NUMBER(3);
V_COLOUMN_3	   NUMBER(3);
V_COLOUMN_4	 VARCHAR2(3);
BEGIN 
 
begin
 OUT_file := TEXT_IO.FOpen('C:\TEST.CSV','R');
 Exception when Others then
	  Message('Error in Reading from file C:\TEST.CSV');
	  RETURN;
end;
					  
--********** 
LOOP

BEGIN	 
TEXT_IO.GET_LINE(OUT_FILE,LINEBUF);
EXCEPTION WHEN NO_DATA_FOUND THEN
EXIT;	   
END;	 
LINEBUF := LTRIM(LINEBUF);
V_COLOUMN_1	:= SUBSTR(LINEBUF,1,9);
V_COLOUMN_2	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,1)+1,								   INSTR(LINEBUF,';',1,2)-INSTR(LINEBUF,';',1,1)-1 );
V_COLOUMN_3	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,2)+1,								   INSTR(LINEBUF,';',1,3)-INSTR(LINEBUF,';',1,2)-1 );
V_COLOUMN_4	:= SUBSTR(LINEBUF,INSTR(LINEBUF,';',1,3)+1);							   
--********************** 
INSERT INTO TEST(COLOUMN_1,COLOUMN_2,COLOUMN_3,COLOUMN_4)
VALUES(V_COLOUMN_1,V_COLOUMN_2,V_COLOUMN_3,V_COLOUMN_4);
--**********************															
END LOOP; 
COMMIT;
TEXT_IO.FClose(out_file); 

SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
EXCEPTION WHEN OTHERS THEN
MESSAGE(SQLERRM);
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
TEXT_IO.FClose(out_file);
END;

السلام عليكم ورحمه الله وبركاته
فيه طريقه سهله جدا للاستيراد او التصدير من والي اوركل
باستخدام الباكج Utl_file
دي الانسب والاسرع والاحسن انا جربتها علي قاعده بيانات مكونه من عده جداول فيه جدول فيهم فيه اكتر من مليون سجل وصراحه كانت utl_file مجديه قوي
بس شرحها يطول بس ان شاء الله حشرحها هنا بس في اقرب وقت
والله المستعان

فيه طريقه سهله جدا للاستيراد او التصدير من والي اوركل
باستخدام الباكج Utl_file
بس شرحها يطول بس ان شاء الله حشرحها هنا بس في اقرب وقت
والله المستعان

اخواني رجاً
ان كنتو عاوزين تجيبو حاجه جيبوها على طول
وبلاش وعود