PDA

View Full Version : نمایش قسمتی از صفحه ی سایت



mahdi.a.v
پنج شنبه 24 اسفند 1391, 13:57 عصر
سلام
این تاپیک تکراری نیست ... !!!
چون برنامه های تاپیک هایی در همین رابطه گذاشته بودند فقط برای لینک های مخصوصی که خودشون تعیین میکردن درست بود(فکر کنم درستش همینه) و من میخوام فقط قسمتی از صفحه ی وب لود بشه
این قسمت مثلا :

101427
www.4tala.com

zahedi121
جمعه 25 اسفند 1391, 10:18 صبح
سلام
اینهم عیدی بنده به شما .
موفق باشید.

roya.raha
جمعه 25 اسفند 1391, 15:22 عصر
آفرین :تشویق:
به این میگن یک برنامه کاربردی که الکی شلوغ هم نشده ، آدم می فهمه چی به چی شد . متشکر

mahdi.a.v
چهارشنبه 13 شهریور 1392, 16:51 عصر
سلام

این تاپیک رو اوردم بالا چون آخه الان این کار (یعنی نمایش یه تیکه از متن سایت در textbox) رو برای یه سایت دیگه لازم دارم ...

اگه میشه یکی بیاد این کد ها رو تشریح کنه و بگه اگه مثلا خواستیم برای یه سایت دیگه اینکارو بکنیم چیکار کنیم ...

Public Class Form1

'************************************
'*zahedi121 --- www.barnamenevis.org* (http://www.barnamenevis.org*)
'************************************

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEv entArgs) Handles WebBrowser1.DocumentCompleted
WebBrowser1.Tag = 1
End Sub



Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
WebBrowser1.Tag = 0
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate(" http://www.4tala.com/")

Do Until WebBrowser1.Tag = 1
Button1.Text = "چند لحظه صبر کنید"
Application.DoEvents()
Loop
WebBrowser1.Tag = 0
Button1.Text = "بروزرسانی"
TextBox1.Text = WebBrowser1.Document.GetElementsByTagName("td")(6).InnerText
TextBox2.Text = WebBrowser1.Document.GetElementsByTagName("td")(7).InnerText
TextBox3.Text = WebBrowser1.Document.GetElementsByTagName("td")(8).InnerText
TextBox4.Text = WebBrowser1.Document.GetElementsByTagName("td")(9).InnerText
TextBox5.Text = WebBrowser1.Document.GetElementsByTagName("td")(10).InnerText
TextBox6.Text = WebBrowser1.Document.GetElementsByTagName("td")(11).InnerText

End Sub


End Class


ممنون

damanpak
پنج شنبه 21 شهریور 1392, 03:38 صبح
سلام به همه عزیزان
این کد جالبی بود واسه اطلاعات گرفتن از یک سایت
حال فرض کنید یک سایت هست که یک قسمتش اسم دوتا شهر رو میگیره و مسافت بینشون رو نشون میده
این رو چطوری بیاریم توی فرم ویندوز؟

mahdi.a.v
پنج شنبه 21 شهریور 1392, 14:40 عصر
اگه میشه یکی این کدا رو یه توضیحی بده بتونیم توی سایت های دیگه استفاده کنیم ...

zahedi121
یک شنبه 24 شهریور 1392, 07:12 صبح
سلام
برای اینکار باید یک مقدار با کدهای html آشنا باشید ، چون سایت قبلی آدرسش تغییر کرده بود ، در برنامه آدرس جدید را اعمال کردم که بتونید با دیدن سورس سایت (http://s1.4tala.com) یک مقایسه ای داشته باشید.
تاپیک در این خصوص زیاد هست ، در کل باید ببینید تگ اون قسمت یا نام کلید یا ... چیه بعد در برنامه اون قسمت را لود کنید. یکمی هم برای بار اول سعی و خطا کنید متوجه میشید که که متنی که شما میخواید کجاست . مثلا در مثلا بالا دنبال تگ "td" و بعد هم ایندکس مورد نظر گشتم.
در مورد سوال جناب damanpak هم به همین صورت شما میتونید یک بروزر مخفی بگذارید اول مقادیر را ارسال کنید و دکمه ارسال را بزنید ( از طریق کد نویسی ) بعد هم مقدار بدست اومده را در یک تکس باکس نشان بدید.
ببخشید که دیر به دیر سر میزنم ، به دلیل مشغله کاری کمتر میتونم بیام ولی میام :) اگر خواستید سایت مورد نظرتون را بگذارید سر فرصت براتون نمونه بگذارم.

موفق باشید