How to upload data from text file into Form ?

[said_online]

السلام عليكم ورحمة الله وبركاته،،
كيف يمكن عمل upload data من text file فى form معينة ؟؟ فمثلا اذا ما كان لدينا form لبيانات الموظف (Emp table ) ولدى text file او excel sheet به emp data واريد ان اقوم بعمل Insert فى ال form لكل ال data من ال Excel sheet مباشرة .. فكيف يمكن عمل ذلك ؟؟

[Afayez]

السلام عليكم
توجد built in package فى الفورم تسمى DDE
تتعامل مع EXCEL SHEET
ارسال البيانات اليه ومنه
ويوجد بالهلب مجموعه من الامثله عليها يمكنك الاطلاع عليها لعمل import/export
من والى excel واذا صادفت مشكله معها فلا تتردد بالسؤال فانا دائما فى خدمتك

[said_online]

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

[Ora_Consultant]

u must use sql loader which enable u to select specified file to upload it to ur table.

[said_online]

السلام عليكم ورحمة الله وبركاته،،
اشكركم كثيرا على اهتمامكم .. ولكنى للاسف لم استطع الوصول فعليا لحل لسؤالى رغم اتباعى لتوجيهاتكم وبحثى فى ال help ..فارجو شرح الموضوع بشكل اقوى و إرفاق مثال مبسط لو أمكن.

[Amgad]

السلام عليكم ورحمة الله ,,
هذا مثال مبسط لقراءة البيانات من ملف txt
ثم كتابتها داخل الجدول
باستخدام مفتاح فى form باستخدام button

declare 
  in_file   text_io.file_type;
  fn  varchar2(80) := 'c:\FILENAME.txt';
  linebuf    varchar2(300);

begin in_file := text_io.fopen(fn ,'r');
   loop
       text_io.get_line(in_file,linebuf);
       text_io.put(linebuf);

       insert into TABLENAME values ( '2005' ,  
                                       substr(linebuf,20,01),
                                       substr(linebuf,22,04),
                                       substr(linebuf,27,02),
                                       substr(linebuf,30,02) ) ; 
       commit;
       text_io.new_line;
  end loop;

  exception 
   when no_data_found then
      text_io.put_line('closing the file ....');
      text_io.fclose(in_file);
      MESSAGE(' end file ');
 end;

[Amgad]

السلام عليكم ورحمة الله ،،
لقد اعددت form لنقل بيانات ادارات جديده لجدول dept فى scott
من خلال text file = DEPT_DATA

55 Department55   Loc55  
66 Department66   Loc66     
77 Department77   Loc77

هذه الاوامر داخل button

declare 
  in_file   text_io.file_type;
  fn  varchar2(80) := 'd:\oraclenet\dept_data.txt';
  linebuf    varchar2(300);
begin previous_block;
last_record;
 	
  in_file := text_io.fopen(fn ,'r');
  loop
    text_io.get_line(in_file,linebuf);
    text_io.put(linebuf);
 
    if nvl(substr(linebuf,1,3),0) = 0  then MESSAGE(' End of data file');
    	                                       MESSAGE(' End of data file'); 
    	                                       exit; 
    	else
      create_record;
      :deptno :=  substr(linebuf,1,3);
      :dname  :=  substr(linebuf,4,14);
      :loc    :=  substr(linebuf,18,13);
     end if;
    text_io.new_line;
  end loop;

end;

load_dept_data.fmb

[Amgad]

السلام عليكم ,,
ملف بيانات به 3 اكواد للادارات الجديده لتشغيل الform السابق

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

dept_data.TXT

[sam_t]

السلام عليكم
أخوتي الأعزاء ... إليكم الطريقة الإحترافية للقراءة من ملف
لم تعد هناك صعوبة في قراءة البيانات من ملف بعد صدور النسخة 9i
يمكنك بكل بساطة اتباع المثال التالية لعمل ذلك على بياناتك الحقيقية

1. قم بإنشاء مجلد على السيرفر لتقوم قاعدة البيانات التعامل معه وذلك بالتعليمة التالية:

Create directory blah as 'E:\';

حيث قمت بتسمة المسار e:\
بالاسم
blah

2. قم ببناء جدول بالتعليمة التالية له نفس الحقول التي يجب أن تتم قراءتها من الملف المخزن على المجلد الذي قمنا بتسميته سابقا

والتعليمة هي:

create table external_emp (
EMPNO NUMBER(4),
ENAME VARCHAR2(10),
JOB VARCHAR2(9),
MGR NUMBER(4),
HIREDATE DATE,
SAL NUMBER(7,2),
COMM NUMBER(7,2),
DEPTNO NUMBER(2))
Organization external
(type oracle_loader
default directory BLAH
access parameters (records delimited by newline
fields terminated by ',')
location ('EMP.txt'))
reject limit 1000
/

3. ضع الملف الذي تريد القراءة منه بالمجلد الذي تتعامل معه قاعدة البيانات والذي قمنا بتعريفه في الخطوة الثانية وهو هنا على الـ
e:\
وهو نفسه المستخدم في التعليمة السابقة التي في الخطوة الثانية في السطر التالي:
default directory BLAH

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

أخيراً ضع البيانات التالية --للتجريب -- في الملف المطلوب وسمه
emp.txt
في المجلد e:\

7369,SMITH,CLERK,7902,17-DEC-80,800,20
7499,ALLEN,SALESMAN,7698,20-FEB-81,1600,300,30
7521,WARD,SALESMAN,7698,22-FEB-81,1250,500,30
7566,JONES,MANAGER,7839,02-APR-81,2975,,20
7654,MARTIN,SALESMAN,7698,28-SEP-81,1250,1400,30
7698,BLAKE,MANAGER,7839,01-MAY-81,2850,,30
7782,CLARK,MANAGER,7839,09-JUN-81,2450,,10
7788,SCOTT,ANALYST,7566,19-APR-87,3000,,20
7839,KING,PRESIDENT,,17-NOV-81,5000,,10
7844,TURNER,SALESMAN,7698,08-SEP-81,1500,0,30
7876,ADAMS,CLERK,7788,23-MAY-87,1100,,20

يمكنك بعدها عمل
select empno from ...

قثط للقراءة من الملف وبهذه البساطة مع ملاحطة أنه ربما قد لاتعمل
select * from
بحسب الإصدار ربما
ولذلك يجب كتابة كافة الحقول صراحة لعمل استعلام لجميع الحقول

لن أطلب شكر من أحد لأن مشاركتي هذه لوجه الله.

والسلام.

[said_online]

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

[sam_t]

على الرحب والسعة

[ahmedbb]

الاخ sam_t
اشكرك على الكود بس مش فاهم بعض الكلمات به ارجو توضيحها لو امكن
ما المقصود ب '
لانى حاولت انشا الجدول فاعترض عليها الكمبيوتر
شكرا