قمت بانشاء جدول مستقل في الأوراكل اسمه ( INF ) يحتوي على ثلاثة أعمدة وهي ( رقم الهوية , الاسم , العنوان ) وتركته فارغ البيانات ..
وقمت بانشاء قاعدة بيانات أكسس امتدادها mdb تحتوي على ثلاثة أعمدة أيضاً وهي نفس حقول جدول الأوراكل(INF) وهي ( رقم الهوية , الاسم , العنوان ) وقمت بادراج الكثير من البيانات فيها حسب الأعمدة ..

المطلوب : استيراد البيانات من قاعدة بيانات الأكسس ووضع هذه البيانات في جدول (INF ) المنشأ في الأوراكل عن طريق الفورم طبعا لأنني سأقوم بالبحث عن هذه البيانات المدرجة حسب معايير معينة عن طريق فورم صممته مسبقاً...
سمعت أن الأداة المستخدمة في ذلك هي SQL LOADER ولكن لا أعلم أي شيئ عنها ولا عن الاستيراد وعما اذا كانت هي المطلوبة أو لا ..
هل هناك من يساعدني ...؟؟ وذلك للضرورة القصوى
اللي عنده معلومة يا ريت يساعدني فيها ..
ولو كان عندكم أي مثال على ذلك أكون شاكر لكم لو رفعتوها ..

أخوكم

تم تعديل 4 أكتوبر 200916 سنة بواسطة PrisonBreak

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

بحثت أخي في المنتدى ولم أجد
ألا يوجد من يساعدني هنا ..؟

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

DECLARE
  CONT VARCHAR2(5);
 N NUMBER;
 appid  pls_integer;
 convid pls_integer;
 M     number := 2;
 rowcol     varchar(20);

 EMP_NO   VARCHAR2(100);
 EMP_NAME   VARCHAR2(150);
 TOTAL   VARCHAR2(150);
 SAL  VARCHAR2(150);
 COMM  VARCHAR2(150);
BEGIN appid := dde.app_begin('C:\Program Files\Microsoft Office\OFFICE12\excel D:\EMP.xls',
                        dde.app_mode_minimized);

 convid := dde.initiate('EXCEL','D:\EMP.xls');
 ----------------------------------------------------------------------
ROWCOL:= 'R' ||1 || 'C'||1;
BREAK;
 LOOP
 	EMP_NO:='';
 	EMP_NAME:='';
 	SAL:='';
   rowcol := 'R' || M || 'C'||1;
   dde.Request(convid, rowcol,EMP_NO, dde.cf_text, 99999); 
   ROWCOL := 'R' || M || 'C'||2;
   dde.Request(convid, rowcol,EMP_NAME, dde.cf_text, 99999);
   ROWCOL := 'R' || M || 'C'||6;
   dde.Request(convid, rowcol,SAL, dde.cf_text, 99999);
   ROWCOL := 'R' || M || 'C'||7;
   dde.Request(convid, rowcol, COMM, dde.cf_text, 99999);
   if EMP_NO LIKE '%END%' then
     exit;
   end if;
       M := M + 1;
     
   INSERT INTO TEST VALUES(EMP_NO,EMP_NAME,SAL);
  SYNCHRONIZE;
 END LOOP;
COMMIT;

end;

http://www.araboug.org/ib/index.php?showtopic=36038

لقد إستخدمت اسلوب الإستيراد من الاكسيل لكنه كان بطئ جدا

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

هل يوجد طريقة لتسريع القراءة من الاكسيل ؟

افضل واسرع واجدد طريقة external table

فارق السرعة كبير جدا جدا عن الطرق القديمة لقراءة الاكسل مثل ole2  التى تقراء الملف خلية خلية وطبعا ببطء شديد

 

يمكنك البحث

http://www.oracle-base.com/articles/9i/external-tables-9i.php