shahinr3r3
پنج شنبه 19 بهمن 1391, 09:08 صبح
ببخشید یه سوال دارم می خوام یه برنامه VB بنویسم که مثلا هر وقت وارد سایت سنجش (www.sanjesh.org (http://www.sanjesh.org/)) میشیم و یه ثبت نام انجام میدیم وقتی ثبت نام کاملا تمام شد اون صفحه رو ذخیره کنه در واقع منظورم اینه که مثلا اگه 10 نفر پشت سیستم نشستن و توی سایت ثبت نام کردند اون 10 صفحه آخر که مثلا تاییدیه اون کاربر ها هستش رو خود بخود ذخیره کنه.من یه تاپیک قبلا تو VB6 باز کردم متاسفانه کسی درست جوابم رو نداد. من خودم یه برنامه تو ویژوال استو دیو 2010 با VB که کدش به شکل زیر هستش:
Public
ClassForm1
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
EndSub
PrivateSub WebBrowser1_DocumentCompleted(ByVal sender AsObject, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEv entArgs) Handles WebBrowser1.DocumentCompleted
If (WebBrowser1.ReadyState = WebBrowserReadyState.Complete) And (WebBrowser1.Url.ToString() = "http://www.sanjesh.org/") Then TextBox2.Text = WebBrowser1.Url.ToString()
EndSub
این کد در واقع میاد از تکست باکس 1 آدرس یه سایت رو میگیره و با کمک WebBrowser1 اون رو نشون میده بعد یه شرط داره که مثلا اگه تکست باکس 1 مقدارش برابر با سایت سنجش بود و صفحه کاملا لود شده باشه اونوقت آدرس سایت رو تو تکست باکس 2 نشون بده حالا مشکل من اینجاست می خوام به جای این قسمت دوم که میاد آدرس سایت رو تو تکست باکس 2 نشون میده بیاد کل اون صفحه رو بطور خودکار تو یه مسیری ذخیره کنه
ممنون میشم اگه کمکم کنید که این برنامه رو بنویسم برام مهمه که یاد بگیرم :قلب:
ببخشید که توضیحاتم طولانی شد.
Public
ClassForm1
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
EndSub
PrivateSub WebBrowser1_DocumentCompleted(ByVal sender AsObject, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEv entArgs) Handles WebBrowser1.DocumentCompleted
If (WebBrowser1.ReadyState = WebBrowserReadyState.Complete) And (WebBrowser1.Url.ToString() = "http://www.sanjesh.org/") Then TextBox2.Text = WebBrowser1.Url.ToString()
EndSub
این کد در واقع میاد از تکست باکس 1 آدرس یه سایت رو میگیره و با کمک WebBrowser1 اون رو نشون میده بعد یه شرط داره که مثلا اگه تکست باکس 1 مقدارش برابر با سایت سنجش بود و صفحه کاملا لود شده باشه اونوقت آدرس سایت رو تو تکست باکس 2 نشون بده حالا مشکل من اینجاست می خوام به جای این قسمت دوم که میاد آدرس سایت رو تو تکست باکس 2 نشون میده بیاد کل اون صفحه رو بطور خودکار تو یه مسیری ذخیره کنه
ممنون میشم اگه کمکم کنید که این برنامه رو بنویسم برام مهمه که یاد بگیرم :قلب:
ببخشید که توضیحاتم طولانی شد.