اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تعبئة تلقائية من ملف اكسل الى موقع


إذهب إلى أفضل إجابة Solved by أ / محمد صالح,

الردود الموصى بها

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

مطلوب مني إدخال بيانات بطاقة شخصية على موقع رسمي للنازحين في تركيا( البيانات موجودة لدي في ملف اكسل قمت بإعداداها من قبل) المشكله أن العدد كبير جدا لكي أدخلها يدويا 7000 بطاقة شخصية هل يمكن تعبئتها من ملف اكسل الى الموقع لم أجد حل حتى الآن.. Screenshot_20220712-234944_Chrome.jpg.282bae1631862a132b60c546ca5e6127.jpg

رابط هذا التعليق
شارك

هل الموقع يفتح بصورة طبيعية في متصفح انترنت اكسبلورر؟

إذا كانت الإجابة بنعم فمن السهل إنجاز المهمة بالكود

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

  • Like 2
رابط هذا التعليق
شارك

  • أفضل إجابة

الكود لا يضر الموقع ولا يظهر عندهم 

الكود يقوم بما يقوم به المستخدم ولكن بصورة آلية 

تحتاج قبل البدء معرفة ID حقل اسم المستخدم وكذلك كلمة المرور وكذلك زر الدخول 

وبعدها ID لكل حقل سيتم تعبئته من الشيت وكل زر سيتم الضغط عليه 

لمعرفة ID لعنصر نضغط بزر الفارة الأيمن على العنصر في المتصفح ونختار inspect element 

وبعدها نستخدم كود انشاء نسخة من كائن متصفح انترنت اكسبلورر بمثل هذا الكود 

Dim IE As Object, site as String
Set IE = CreateObject("InternetExplorer.Application")
    site = "https://www.example.com/"
    With IE
        .Visible = True
        .navigate site
    Do Until Not IE.Busy And IE.readyState = 4
        DoEvents
    Loop
    End With

    IE.Document.getElementById("username").Value = range("aa1").value
    IE.Document.getElementById("password").Value = range("ab1").value

    IE.Document.getElementById("login_go").Click
    Do Until Not IE.Busy And IE.readyState = 4
        DoEvents
    Loop

وهكذا في كتابة قيم الحقول من الشيت نستعمل حلقة تكرارية مثل for - next

وهكذا الضغط على اي زر لحفظ البيانات مثلا

بالتوفيق 

  • Like 5
رابط هذا التعليق
شارك

شكرا لك استاذي الفاضل لا اعلم كيف استطيع شكرك اختصار عمل خمس اشهر في كود واحد

نظريا فهمت الطريقة لكن عمليا لم استطع تطبيقها هل يمكن لحضرتك استاذي أن أرسل اليك فئة وليكن عشر بطاقات وان تعلمني الطريقة وتصورها لي وكل الشكر لصبرك علي 

رابط هذا التعليق
شارك

لقد عرضت لك الحل كاملا

نظرا لسرية البيانات وخصوصا بيانات الدخول (اسم المستخدم وكلمة المرور) على موقع رسمي كهذا

 

  • Like 1
رابط هذا التعليق
شارك

لا اعلم سأحاول تطبيقه ان شاء الله في حال عدم نجاحي ...لطفا منك وجعله في ميزان حسناتك سأتواصل معك 

الثقة موجودة بالله ثم بحضرتك استاذي انت غني عن التعريف أتابع ما تكتب باستمرار 

ان شاء الله سأقوم بتطبيق ما كتبت أستاذي الكريم وأرجو منك في حال واجهت مشكلة أن تلبيني 

رابط هذا التعليق
شارك

  • 5 months later...

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

لان انا تقريبا موضوعى قريب من هذا الموضع وهيوفر على كتير وقت

نفس النظام (اسم المستخدم وكلمة المرور) على موقع رسمي ولكن تصدير تأشيرات 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information