PDA

View Full Version : سوال: دریافت قسمتی از اطلاعات یک سایت!!!



karem2074
چهارشنبه 13 فروردین 1393, 02:30 صبح
با سلام
دوستان من میخوام قسمتی از اطلاعات یک سایت رو در label1 نمایش دهم.فرضا سایت چک کردن اپراتور آیفون رو در نظر گرفتم.
آدرس سایت www.iphoneimei.info (http://www.iphoneimei.info)

اگر بخوام شماره سریال رو در textbox1 وارد کنم و با زدن دکمه Check به سایت وصل بشه و اطلاعات رو دریافت کنم کد های زیر رو نیاز دارم.

Dim serialnumber as String = Textbox1.text
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser1.Visible = False
WebBrowser1.Navigate("http://iphoneimei.info/?imei=" & serialnumber)
EndSub



MsgBox(WebBrowser1.Document.GetElementById("سورس سایت").InnerText)
'مقدار مورد نظر ما نیست
'صبر میکنیم تا صفحه آپدیت شود
Dim checking As Boolean = True
While checking
Application.DoEvents()
If InStr(WebBrowser1.Document.GetElementById("سورس سایت").InnerText) > 0 Then
label1.Text = (WebBrowser1.Document.GetElementById("سورس سایت").InnerText)
checking = False
End If
End While




این کد من هستش.اما ارور میده.قسمتی از اطلاعات رو که میخوام دریافت کنم اینه:

http://p30up.ir/images/ziene35i6m1xuabyba1y.png

خواهشا کمک کنید.

karem2074
پنج شنبه 14 فروردین 1393, 00:01 صبح
کسی نبود کمک کنه؟؟؟

shahryari
پنج شنبه 14 فروردین 1393, 14:50 عصر
این که خیلی راحته حد اقل 10 تا از این برنامه ها ساختم
کافیه ایدی کنترل مورد نظر رو بدست بیاری و در سورست استفاده کنی
تازه اونم لازم نیست
واکشی اطلاعات در این سایت به روش GET است و در یو آر ال میتونی مقدار بدی
مثال:
http://iphoneimei.info/?imei=شماره سریال

karem2074
پنج شنبه 14 فروردین 1393, 20:53 عصر
این که خیلی راحته حد اقل 10 تا از این برنامه ها ساختم
کافیه ایدی کنترل مورد نظر رو بدست بیاری و در سورست استفاده کنی
تازه اونم لازم نیست
واکشی اطلاعات در این سایت به روش GET است و در یو آر ال میتونی مقدار بدی
مثال:
http://iphoneimei.info/?imei=شماره سریال

دستت دردنکنه اما خودم اینو کلا در دست دارم.سورسو یک نگاه بکن میبینی.من میخوام وقتی تو Textbox شماره سریال رو که زدم به سایت وصل میشه.اطلاعات رو دریافت میکنه.کلا به سایت وصل میشه مشکل ندارم.اما میخوام اطلاعات این شماره سریال رو که نمایش میده تو یه Textbox دیگه واسم چاپ کنه.مثلا مینویسه:
IMEI: 012155007........
Activated: Yes
Find My iPhone: Off
Telephone Technical Support: Expired
Repairs & Service Coverage: Expired


و ...
میخوام

shahryari
جمعه 15 فروردین 1393, 10:13 صبح
خب باید اول یک شماره سریال معتبر وارد کنی
بعد آیدی المانهای ایجاد شده رو بگیری
که در فایر فاکس بسیار راحته
کافیه روی المان مورد نظر راست کلیک و گزینه : Inspect Element
رو بزنی تا به قسمت سورس اچ تی ام الش بری و آیدی شو مشاهده کنی
اگر متوجه نشدی یک شماره سریال معتبر در پیام خصوصی بده تا کدشو بهت بدم