بدست آوردن لیست بلاگ های بروزشده میهن بلاگ

[SHD.NET]

سلام . چجوری میشه لیست بلاگ های بروز شده میهن بلاگ رو بدست آورد ؟؟؟ (البته می دونم خودش یه پروژس و سوال کلی پرسیدم، اما خودم هرچی تلاش کردم نشد، برا همینم اینجا مطرح کردم)

اگه راهنمایی کنین ممنون میشم

[امین مستانی]

سلام

یک لیست باکس یک وب بروزر و یک باتون روی فرم قرار دهید :


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim Str As String
Dim Forbidden() As String = {"admin"}
ListBox1.Items.Clear()
WebBrowser1.Navigate("http://www.mihanblog.com/")
Do Until WebBrowser1.ReadyState = WebBrowserReadyState.Complete
Application.DoEvents()
Loop
For Each Url As HtmlElement In WebBrowser1.Document.Links
Str = Url.GetAttribute("href")
If InStr(LCase(Str), ".mihanblog.com") > 0 Then
If Not InStr(LCase(Str), Join(Forbidden, ":")) > 0 Then
ListBox1.Items.Add(Str)
End If
End If
Next
End Sub


موفق باشید

[SHD.NET]

سلام

یک لیست باکس یک وب بروزر و یک باتون روی فرم قرار دهید :


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim Str As String
Dim Forbidden() As String = {"admin"}
ListBox1.Items.Clear()
WebBrowser1.Navigate("http://www.mihanblog.com/")
Do Until WebBrowser1.ReadyState = WebBrowserReadyState.Complete
Application.DoEvents()
Loop
For Each Url As HtmlElement In WebBrowser1.Document.Links
Str = Url.GetAttribute("href")
If InStr(LCase(Str), ".mihanblog.com") > 0 Then
If Not InStr(LCase(Str), Join(Forbidden, ":")) > 0 Then
ListBox1.Items.Add(Str)
End If
End If
Next
End Sub



موفق باشید
آقاق خیلی کارت درسته !!! حرف نداشت !!!

[امین مستانی]

خواهش میکنم

فقط یک نکته یادم رفت بگم
اسم وبلاگ هایی که نمیخوای تو لیست چاپ بشه رو در آرایه Forbidden قرار بده . من اسم وبلاگ admin رو گذاشتم اگه بازم بود خودت قرار بده.

موفق باشید

[SHD.NET]

خواهش میکنم

فقط یک نکته یادم رفت بگم
اسم وبلاگ هایی که نمیخوای تو لیست چاپ بشه رو در آرایه Forbidden قرار بده . من اسم وبلاگ admin رو گذاشتم اگه بازم بود خودت قرار بده.

موفق باشید

متوجه نشدم !! یعنی چی ؟؟:لبخند:

[barnamenevisjavan]

مثلا اگر شما کد بالارو برای رزبلاگ بنویسی چندتا وبلاگ میاره که مربوط به خود سایت هستش و به اسپم مربوط نمیشه مثل لینک های زیر:
rozblog.com/login.php
rozblog.com/register.php
و...
شما این لینک هارو که ثابت هستن توی آرایه قرار بدید تا دیگه توی لیست بروز شده ها نیان تا به مشکل نخورید
-------------------------------
من اسپمر کامل میهن بلاگو دارم ولی زبانش سی شارپه تبدیل هم که میکنم کلی ارور میاره....کسی میتونه کد صفحه ارسال لینک رزبلاگ و بنویسه؟