منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مساعدة فى مشروعى لو سمحتو جزاكم الله خيرا
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته
اخوانى الافاضل اريد تعديل بسيط على مشروعى

رابط المشروع
http://www.gulfup.com/?iHOpxS

اريد عمل ضغط تلقائى كل 5 ثوانى مثلا على زر فى موقع
كما توضح الصورة والموقع موجود فى المشروع ارجو الافادة
من الخبراء وجزاكم الله خيرا


اضف Timer1
واجعل Interval =5000

ثم DoubleClick على Timer1
واكتب Button1.PerformClick()
اشكرك اخى على الاهتمام
ولكن حضرتك لم يصلك مقصدى
الزر ليس Button فى المشروع
ولكنه زر بالموقع نفسه وحاولت
كثيرا دون جدوى
تحتاج معرفة بالتعامل مع النصوص باستخدام Regularexpression و HtmlAgilityPack
الاخ الشاكي له شروح بهذا الخصوص
ف واقع الأمر أنا لا أفهم في برمجة الويب كثيرا لكن المفروض طالما الباتون موجود ف الفورم .........إذن الباتون هذا له Handle
و اعتقد أنك عليك أن تتعامل مع Handle ف تلك الحالة و من ثم ترسل له أمر Click كل فترة زمنية ثابته

الكود التالي سيمكنك به ان ترسل DoubleClick الي الفورم
فقط تأكد من أن الدالة الخاصة بإرسال الأمر الي الماوس صحيحة

كود :
    <DllImport("user32.dll")> _
        Private Shared Sub mouse_event(dwFlags As UInt32, dx As UInt32, dy As UInt32, dwData As UInt32, dwExtraInfo As IntPtr)
        End Sub

        Private Const MouseEventLeftDown As UInt32 = &H2
        Private Const MouseEventLeftUp As UInt32 = &H4

        Public Shared Sub SendDoubleClick()
            mouse_event(MouseEventLeftDown, 0, 0, 0, New System.IntPtr())
            mouse_event(MouseEventLeftUp, 0, 0, 0, New System.IntPtr())
            mouse_event(MouseEventLeftDown, 0, 0, 0, New System.IntPtr())
            mouse_event(MouseEventLeftUp, 0, 0, 0, New System.IntPtr())
        End Sub