ايران ويج

نسخه‌ی کامل: کلیک روی یک دکمه در وب
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
با سلام خدمت شما دوستان عزیز و گرامی

من یخوام یه برنامه ای بنویسم که یوزر و پس رو بگیره و روی دکمهی ورود در انجمن کلیک کنه

اما توانستم اسم و پسوردرو در وب انتقال بدم امام نتونستم روی دکمهی ورود کلیک کنم؟

آیا باید چه کار کنم؟
[تصویر:  51f66h3j0xuv8x06ouv.jpg]

همان طور که میبینید در تصویر بالا یوزر وپسی که وارد کردید رو انتقال داده با کلیک روی دکمهی اینتر
حالا میخوام کاری کنم که با کلیک روی دکمهی اینتر هم یوزر و پس رو انتقال بده وهم روی دکمهی ورود کلیک کنه ....


در کل هدفم اینه که روی دکمهی ورود کلیک بشه

سورس رو ضمیمه کردم امیدوارم که کمکم کنید

منتظر کمک برنامه نویس های عزیز هستم
سلام دوست عزیز

اینم کد

WebBrowser1.Document.Forms(0).elements("name").Click
مشکل من اینه که نمیتونم نام این دکمهی ورود رو پیدا کنم گرنه اینو بلدم خودم

ممنونم شما خودتون امتحان کنید ببینید میتونید
من که نتونستم آیدی مخصوص دکمهی ورود رو پیدا کنم

2 روزه گیرش کسی نیست کمک کنه
اول کتابخانه Microsoft HTML object library رو اضافه کن
بعد:
کد:
Dim objElement  As HTMLDocument
Dim HTMLR  As HTMLElementCollection
Set objElement = WebBrowser1.Document
For Each HTMLR In objElement.getElementsByTagName("input")
If HTMLR.Type = "submit" Then
    HTMLR.Click
End If
Next
متاسفانه چیزی پیدا نکردم .
سلام idenshz عزيز.
كي ميخواي دست از اسپمر نويسي برداري؟‌ Whistle


اگر ميخواي خيلي راحت بنويسيش‌ كاري نداره !!!! بايد از تابع Api استفاده كني كه موقعيت و محل ماوس رو تغيير ميده !!!‌يعني اول position ماوس رو ببر رو تكست user و با استفاده از دستور sendkeys مقدار رو داخلش بريز !!!!‌ واسه تكست پسورد هم همين كارو بكن و sumbit هم يه تابع api داريم ميتوني محل ماوس رو عوض كني بعد دستور كليك رو بدي!!!!!!!!! LaughLaugh

اين آ‌سون ترين كاره !!!‌Whistle
البته اگر سايت عوض بشه احتمالا محل تكست ها هم عوض ميشه !!!‌
يا ميتوني از روش put يا Get استفاده كني !!!‌كه بازم چون اسكريپت ها فرق ميكنه ممكنه دچار مشكل بشي!!!‌

درباره put و get هم تو سايت سرچ كني ميتوني پيدا كني . و درباره توابع api هم ميتوتي از برنامه api Guide استفاده كني !!

موفق باشيد.