منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] التعامل مع المواقع في الفيجوال بيسك - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] التعامل مع المواقع في الفيجوال بيسك (/showthread.php?tid=30047)

التعامل مع المواقع في الفيجوال بيسك - baha12 - 26-06-19

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

وشكرا لكم  Heart

RE: التعامل مع المواقع في الفيجوال بيسك - dasktop - 26-06-19

تفضل اخي


اولا

اضف اداة web browser

اضف 4 ادوات textbox

واضف زر واحد

وفي داخل الزر اضف هاذا الكود


Try

           WebBrowser1.Document.GetElementById("f26b8213d9b71c").InnerText = TextBox1.Text
           WebBrowser1.Document.GetElementById("f309d31bc5f46bc").InnerText = TextBox2.Text
           WebBrowser1.Document.GetElementById("fcd6e75f912504").InnerText = TextBox3.Text
           WebBrowser1.Document.GetElementById("f2629689022dae").InnerText = TextBox4.Text
           WebBrowser1.Document.GetElementById("sign up").InvokeMember("click")
       Catch ex As Exception

       End Try


واضغط على الفروم واضف الكود التالي


       WebBrowser1.Hide()
       WebBrowser1.ScriptErrorsSuppressed = True
       WebBrowser1.Navigate("https://www.instagram.com/")


والشرح بسيط لطريقة تسجيل في اي موقع عن طريق برنامج

اذهب الى الموقع مثلا اذهب الى موقع الاستقرام

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

سيضهر لك كود فيه id  انسخ الاسم اللذي بين "" بعد الاي دي

ونضعه هنا

   WebBrowser1.Document.GetElementById("ElementID").SetAttribute("InnerText", TextBox1.Text)


ومع الزر نكرر نفس الطريقة فقط


وهنا المشروع كاملا

https://www.upload.ee/download/10141206/3fb2fee06c4b1599ff0f/instgram.zip


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