راهنمایی در باره WebBrowser [بایگانی]

swith1996

شنبه 04 خرداد 1392, 11:27 صبح

سلام خدمت اساتید گرامی
تابعی یا کدی میخواهم که وقتی لود صفحه تمام شد کاری که میگم انجام دهد
ممنون از راهنمایی هاتون

swith1996

شنبه 04 خرداد 1392, 11:43 صبح

سلام خدمت اساتید گرامی
تابعی یا کدی میخواهم که وقتی لود صفحه تمام شد کاری که میگم انجام دهد
ممنون از راهنمایی هاتون
لطفا کمک کنید
خیلی لازم دارم
ممنون

vbhamed

شنبه 04 خرداد 1392, 14:10 عصر

سلام

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

'Write your code here
MsgBox "Compelete"

End Sub

swith1996

شنبه 04 خرداد 1392, 15:14 عصر

سلام

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

'Write your code here
MsgBox "Compelete"

End Sub

ممنون از شما
ولی در برنامه من می خواد چند صفحه لود بشه و هر کدام یک کاری جدا انجام بدهد
لطفا راهنمایی کنید
ممنون

swith1996

دوشنبه 06 خرداد 1392, 10:22 صبح

سلام
اگر لطف كنيد تو همون تاپيك بحث رو ادامه بدين
اما اينكه در هر بار كار متفاوتي بايد انجام بشه مشكلي نيست، يك متغير تعريف كنيد كه تعداد اجراي روال رو ذخيره كنه و با توجه به اون كارهاي متفاوتي انجام بدين
لطفا یک نمونه کد می گذارید
بعد کد(تابع) مقدار دادن تکس باکس سایت هم بگید
ممنو از لطف و راهنما یی هاتون
شب خوش
لطفا نمونه کد را قرار دهید

m.4.r.m

دوشنبه 06 خرداد 1392, 13:57 عصر

ببین دوست خوبم چند صفحه با هم لود بشه میشه یه عمل جدا گانه یعنی هر عمل در اولیت و به صورت صف قرار اجرا بشن دیگه درسته ؟ اول صفحه اول بعد صفحه دوم و .... نه اگه قرار باشه همه صفحه ها باهم اجرا بشن اول باید نوع اجرا هاشونو مدیریت کنی به صورت موازی یا تکت تک حالا بسته به هر حالت باید کنترل روی اونها هم انجام بگیره . شما اول مشخص کن در چه حالت باید صفحه ها لود بشن

swith1996

دوشنبه 06 خرداد 1392, 16:36 عصر

ببین دوست خوبم چند صفحه با هم لود بشه میشه یه عمل جدا گانه یعنی هر عمل در اولیت و به صورت صف قرار اجرا بشن دیگه درسته ؟ اول صفحه اول بعد صفحه دوم و .... نه اگه قرار باشه همه صفحه ها باهم اجرا بشن اول باید نوع اجرا هاشونو مدیریت کنی به صورت موازی یا تکت تک حالا بسته به هر حالت باید کنترل روی اونها هم انجام بگیره . شما اول مشخص کن در چه حالت باید صفحه ها لود بشن
1- چند عمل به ترتیب روی یک صفحه انجام می شود
2- اگر در صفحه ای جکس استفاده شود چگونه بفهمم که رفته سرور و برگشته؟

vbhamed

سه شنبه 07 خرداد 1392, 07:29 صبح

سلام
اين يك نمونه، ضمنا من با چند تا سايت Ajax امتحان كردم خودش تشخيص ميده
Option Explicit
Dim counter&

Private Sub Form_Load()

'WebBrowser1.Navigate "آدرس اول"
WebBrowser1.Navigate "http://flexdemo.sabadkharid.net/#product/55/%DA%A9%D8%A7%D8%B1%D8%AA-%D8%AD%D8%A7%D9%81%D8%B8%D9%87-SD-Card-ADATA-16GB/"

End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

counter = counter + 1
Select Case counter
Case 1
'دستورات مرتبه اول
WebBrowser1.Navigate "آدرس دوم"
Case 2
'دستورات مرتبه دوم
WebBrowser1.Navigate "آدرس سوم"
Case 3
'دستورات مرتبه سوم
WebBrowser1.Navigate "آدرس چهارم"
'.
'.
'.
End Select

End Sub