الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال في كود استيراد البيانات من جدول إكسل

مغلق
بدأه mohammed hammed في 5 يونيو 2007 · 3 رد · 596 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

سؤال في كود استيراد البيانات من جدول إكسل

وتبديلها بالبيانات الموجودة في الجدول الموجد في قاعدة البيانات

كتبت هذا الأمر لكن يوجد فيه خطأ ولم أستطيع معرفة الخطأ :

كودDoCmd.TransferSpreadsheet acImport, 8, "import", (txt), False, "A2:BE208"

DoCmd.RunSQL "INSERT INTO 1427 ( minis, step,num_school, city_place, name_school, town_code, apart _accessory, educ_area, year_promotion, lesson _1, stu_1, stu_sa_1, stu_sa_2, lesson_2, stu_2, lesson_3, stu_3, stu_sa_3, lesson_4, stu_4, stu_sa_4, lesson_5, stu_5, stu_sa_5"

, lesson_6, stu_6, stu_sa_6, lesson_7, stu_7, stu_sa_7, lesson_8, stu_8, stu_sa_8, lesson_9, stu_9, stu_sa_9, total_stu, stu_sa, mendicant, mendicant _sa, total_lesson, teachers, teacher_sa, compl_out, administraters, administraters_sa, servitors, workers, architecture_lessee, architecture_gov, account_total, total_roomes, a37, a3, a4, educ_type, a36) SELECT import.F1, import.F2, import.F3, import.F4, import.F5, import.F6, import.F7, import.F8, import.F9, import.F10, import.F11, import.F12, import.F13, import.F14, import.F15, import.F16, import.F17, import.F18, import.F19, import.F20,import.F21,import.F22,import.F23,import.F24,import.F25,import.F26,imp

ort.F27,import.F28,import.F29,import.F30,import.F31,import.F32,import.F33,import

.F34,import.F35,import.F36,import.F37,import.F38,import.F39,import.F40,import.F4

1,import.F42,import.F43,import.F44,import.F45,import.F46,import.F47,import.F48,i

mport.F49,import.F50,import.F51,import.F52,import.F53,import.F54,import.F55,impo

rt.F56,import.F57 FROM import;"

هذا الأمر أتعبني مو راضي يتنفذ ما أدري الخطأ فيين

الله يبارك فييييييكم دلوني على تصحيحه .........

حاولت لكن لم أصل لحل بحثت ولم أجد

وظيفة الأمر هي : يقوم بإستيراد جدول من نوع إكسل ( الجدول مكون من 57 حقل )

جربت الأمر على جدول حقوله 6 بيتنفذ بدون مشاكل

لكن 57 حقل (يظهر خطأ بالأقواس )

الله يعطيكم الصحة والعافية

اللهم لا سهل إلا ما جعلته سهلا وأنت تجعل الحزن إذا شئت سهلا

#2

هذه ملفات مرفقة

ملف للأكسس يوجد به الكود

وملف للإكسل

coooom.zip

1428.zip

اللهم لا سهل إلا ما جعلته سهلا وأنت تجعل الحزن إذا شئت سهلا

#3

عفوا إخواني

القاعدة كانت بالأكسس 2007

قمت بتحويلها إلى 2002

تفضلو ...:

coooom.zip

1428.zip

اللهم لا سهل إلا ما جعلته سهلا وأنت تجعل الحزن إذا شئت سهلا

#4

أخوي القحم الله يعطيك العافية

استوردت النموذج OpenExleFile والجدول Name AutoCorrect Save Failures والجدول SpareSheet

لكن واجهتني مشكلة هي أن : زر أمر فتح الملف لا يعمل .

لكن طلب وليس أمراً

إذا مافي كلفة عليك أخوي القحم .....

س / ما هي الخطوات التي أجريتها على هذا المثال ؟

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

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

.................أخوك Kaled 2007 ..

اللهم لا سهل إلا ما جعلته سهلا وأنت تجعل الحزن إذا شئت سهلا

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…