View Full Version : مبتدی: انتقال اطلاعات combo box وب سایت در combo box وی بی ؟
maxtools
پنج شنبه 21 آذر 1392, 19:51 عصر
سلام
دوستان چطور یک combo box توی وب رو تمامی ایتم هاشو به combo box درون وی بی منتقل کنیم ؟
محسن واژدی
پنج شنبه 21 آذر 1392, 20:42 عصر
سلام علیکم
کد زیر بررسی کنید:
Private Sub Command1_Click()
Dim vCI
Combo1.Clear
For Each vCI In WebBrowser1.Document.getElementById("CB_NAME").Options
Combo1.AddItem vCI.Text
Next 'vCI
End Sub
موفق باشید
maxtools
پنج شنبه 21 آذر 1392, 21:15 عصر
آقای واژدی ممنون از پاسخ دهی اما
یه مشکلی هست خطا میده کد رو
http://upload7.ir/images/84581861377701325286.jpg
اطلاعات یک کمبو باکس سایتی رو استخراج کنه به کمبو باکس وی بی و با انتخاب کمبو باکس وی بی مثلا با کلیک بر روی سومین ایتم کمبو باکس در وی بی سومین کمبو باکس سایت انتخاب بشه ؟
محسن واژدی
پنج شنبه 21 آذر 1392, 21:19 عصر
...
یه مشکلی هست خطا میده کد رو
http://upload7.ir/images/84581861377701325286.jpg
اطلاعات یک کمبو باکس سایتی رو استخراج کنه به کمبو باکس وی بی و با انتخاب کمبو باکس وی بی مثلا با کلیک بر روی سومین ایتم کمبو باکس در وی بی سومین کمبو باکس سایت انتخاب بشه ؟
طبیعیه پیش از استفاده بایستی جایگزینی هایی در کد انجام می دادین،
ابتدا نام "CB_NAME" را با نام ComboBox موجود در Web-Browser جایگزین کنید، همچنین فضای متد "Opt ions" را حذف کنید: "Options"
موفق باشید
maxtools
پنج شنبه 21 آذر 1392, 21:28 عصر
داداش دستت درد نکنه کار کرد اما فقط value رو استخراج می کنه من لیبل کمبو باکس ها رو می خوام ؟
محسن واژدی
پنج شنبه 21 آذر 1392, 21:36 عصر
داداش دستت درد نکنه کار کرد اما فقط value رو استخراج می کنه من لیبل کمبو باکس ها رو می خوام ؟
بله، اصلاح شد
maxtools
پنج شنبه 21 آذر 1392, 21:50 عصر
بشه لیبل ها استخراج بشه . با انتخاب کمبو باکس در وی بی ---- کمبو باکس در وب سایت هم انتخاب بشه ؟
کد قبل لیبل رو استخراج نمی کرد !
http://8pic.ir/images/65973222354381990092.jpg
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.