پیدا کردن یک لینک خاص در سورس صفحه

[idenshz]

با سلام به دوستان عزیز خسته نباشید

دوستان من سورس این صفحه رو توی ویبی در اوردم

http://shoorgashti.iranblog.com/

و حالا میخوام
برنامه بیاد وارد این خط توی سورس بشه

کد:

کد:

<DIV style="TEXT-ALIGN: left"><A onclick="window.open('http://commenting.iranblog.com/services/commenting/commenting.aspx?BlogID=75234&PostID=576097',null,'width=600, height=550, scrollbars=yes, resizable=yes');" href="javascirpt:void(0)" style="text-decoration:none"><span dir="rtl">(نظر بدهید.)</span></A>      </DIV>

و لینک بینشو پیدا کنه و توی یه تکس به من نشون بده

کد:

کد:

http://commenting.iranblog.com/services/commenting/commenting.aspx?BlogID=75234&PostID=576097

این میشه لینک بینش

در ضمن ممکنه هزار تا ا این جور لینک ها توی صفحه باشه من با اولیش کار دارم

منتظر راهنمایی شما دوستان عزیز هستم

[far_222000]

خب شما توی سورس صفحه دنبال عبارت window.open بگرد و مثلاً 150 کاراکتر بعدش رو سلکت کن(طول لینک 150 کاراکتر فرض شده)
دستوری هم که بهش احتیاج داری می شه instr

[babyy]

شما تشریفتون رو ببرید سایت برنامه نویس

[idenshz]

خب شما توی سورس صفحه دنبال عبارت window.open بگرد و مثلاً 150 کاراکتر بعدش رو سلکت کن(طول لینک 150 کاراکتر فرض شده)
دستوری هم که بهش احتیاج داری می شه instr

میشه یه مثال بزنید ؟

[mamad_Datcom]

دوستان من سورس این صفحه رو توی ویبی در اوردم

میشه نحوه به دست آوردن سورس یک سایت تو VB رو به ما هم بگید.

Thanks

[saeedvir]

میشه نحوه به دست آوردن سورس یک سایت تو VB رو به ما هم بگید.

:
چند روش وجود داره :

1- استفاده از کنترل webbrowser

کد:

Text1.Text = WebBrowser1.Document.body.innerHTML

(خاصیت MultiLine تکست باکس را برابر true قرار دهید)

2- با استفاده از کنترل Inet1.

کد:

On Error Resume Next
Text1 = Inet1.OpenURL(Form1.Text1.Text)