PDA

View Full Version : حرفه ای: انتقال مقدار فید های یک صفحه وب به برنامه و انتقال به دیتا بیس



hasht.rood
سه شنبه 24 آبان 1390, 16:35 عصر
سلام دوستان عزیز.
میخواستم بدونم چطوری میشه مقادیر داخل فیلد درون یک صفحه وب رو به تکست باکس داخل برنامه فرستاد ؟
مثلا فرض کنید صفحه www.facebook.com بازه و مقدار فید یوزر برابر با : hashtrood و فید پسورد: 6225555 هست. حالا میخوام این مقدار رو به تکست1 و تکست2 در برنامه ارسال کنم.
منتظر راهنماییهای شما سروران گرامی هستم
شاد و خرم باشید

just4froum
سه شنبه 24 آبان 1390, 18:58 عصر
با سلام:


text1.text = WebBrowser1.Document.All("Text ID").Value


مقدار Text ID هم بايد از سورس صفحه پيدا كني


موفق باشيد

hasht.rood
چهارشنبه 25 آبان 1390, 20:17 عصر
با سلام:


text1.text = WebBrowser1.Document.All("Text ID").Value


مقدار Text ID هم بايد از سورس صفحه پيدا كني


موفق باشيد
سلام دوست گرامی. ممنون از راهنماییهاتون.
این کدی که شما گذاشتین در صورتی میشه ازش استفاده کرد که سایت ذکر شده رو داخل برنامه باز کنید. در غیر اینصورت کار نمیکنه. منظور من اینه که برنامه بتونه از داخل فایرفاس یا هر مرورگر دیگه ای این کار رو انجام بده.

hasht.rood
چهارشنبه 25 آبان 1390, 20:20 عصر
سورس برنامه: Option Explicit

Private Sub Command1_Click()
Text1.Text = WebBrowser1.Document.All("Text ID").Value
Text2.Text = WebBrowser1.Document.All("Text ID").Value
End Sub


Private Sub Form_Load()
web.Navigate "http://facebook.com"
End Sub

Private Sub web_StatusTextChange(ByVal Text As String)

End Sub

اینم عکس برنامه: 77965
وقتی روی Command1_Click() کلیک میکنم ارور میده. از دوستان خواهش میکنم راهنمایی بکنن.
ممنون از همتون
شاد و خندون باشید

sajjad_india
پنج شنبه 26 آبان 1390, 11:19 صبح
ارورو رو بگو .

hasht.rood
پنج شنبه 26 آبان 1390, 19:37 عصر
در قسمت اول WebBrowser1 تعریف شده ولی در پایین web.navigate تعریف شده. فکر کنم مشکل همینه ؟
کد کامپایل نمیشه