۲۴-اسفند-۱۳۸۹, ۱۳:۴۸:۳۰
با سلام : خدمت تمامی برنامه نویس های عزیز ، دوستان من درمورد مطلبم دقیقا
اکثر پست های قبلی رو چک کردم ولی زیاد چیزی دست گیرم نشد .
دوستان من یه برنامه نوشتم که با استفاده از webbrowser یک صفحه لود میشه که
محتویات یک فایل متنی تو جایی که آپلود کردم رو نشون میده . حالا من میخوام اون
محتویات که تو webbrowser هست رو تو یک
textbox نشون بده ممنون میشم اگه راهنمایی کنید.
______________________________________________________________
البته خودم این برنامه رو نوشتم ولی مشکلی که هست اینه که در بار اول
محتویات به درستی نمایش داده میشه ولی اگر فایل متنی در هاست رو که هست ویرایش کنیم . و در برنامه بخوایم دوباره متن جدید رو نمایش بده نمیشه
و دوباره همون متن قبلی رو نمایش میده . من در اینجا گیر کردم .
از دوستان خواهش میکنم اگر غیر از این کدی که من نوشتم ویا راه کاری بلد هستند به بنده کمک کنند . چون خیلی فوری هست . با تشکر (Bvk)
___________________________
من این برنامه رو به دو صورت نوشتم :
کد :
_________________________________________________________
و کد بعدی :من در این برنامه از اینترنت اکسپلورر یک شی اکتیو ایکس میگیرم و اینترنت اکسپلورر رو به صورت مخفیانه اجرا می کنم.
بعد یک صفحه رو بارگذاری می کنم و در نهایت سورس صفحه رو می خونم و با msgbox نمایش می دم
هیچ نیازی هم به کنترل webbrowser نداره.
اکثر پست های قبلی رو چک کردم ولی زیاد چیزی دست گیرم نشد .
دوستان من یه برنامه نوشتم که با استفاده از webbrowser یک صفحه لود میشه که
محتویات یک فایل متنی تو جایی که آپلود کردم رو نشون میده . حالا من میخوام اون
محتویات که تو webbrowser هست رو تو یک
textbox نشون بده ممنون میشم اگه راهنمایی کنید.
______________________________________________________________
البته خودم این برنامه رو نوشتم ولی مشکلی که هست اینه که در بار اول
محتویات به درستی نمایش داده میشه ولی اگر فایل متنی در هاست رو که هست ویرایش کنیم . و در برنامه بخوایم دوباره متن جدید رو نمایش بده نمیشه
و دوباره همون متن قبلی رو نمایش میده . من در اینجا گیر کردم .
از دوستان خواهش میکنم اگر غیر از این کدی که من نوشتم ویا راه کاری بلد هستند به بنده کمک کنند . چون خیلی فوری هست . با تشکر (Bvk)
___________________________
من این برنامه رو به دو صورت نوشتم :
کد :
کد:
Text1.Text = WebBrowser1.Document.body.innertext_________________________________________________________
و کد بعدی :
کد:
Private Sub Form_Load()
Dim IE As Object
Dim data As String
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.Navigate ("http://www.google.com")
Do While IE.Busy
Loop
data = IE.Document.body.innerhtml
MsgBox data
IE.Quit
Set IE = Nothing
End Subبعد یک صفحه رو بارگذاری می کنم و در نهایت سورس صفحه رو می خونم و با msgbox نمایش می دم
هیچ نیازی هم به کنترل webbrowser نداره.