PDA

View Full Version : WebBrowser



hosein320
پنج شنبه 25 مهر 1392, 16:33 عصر
سلام
من میخوام وقتی که وب بروزرم یه صفحه رو بار کرد
اسکرول بره انتهای صفحه
چجوری میشه:متفکر::متفکر:

Hossis
پنج شنبه 25 مهر 1392, 16:58 عصر
باید آخرین تگ اون رو داشته باشید تا بوسیله اسم یا آی دی اون، بتونید برید آخر

ahmad009
پنج شنبه 25 مهر 1392, 17:21 عصر
فک کنم کدش این باشه

WebBrowser1.Document.Window.ScrollTo(0, 0)

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

به جای 0و 0 باید مختصات مورد نظرت رو بدی. حله؟

Hossis
پنج شنبه 25 مهر 1392, 17:52 عصر
کدش اینه:

Dim H As HtmlElement
Dim L As Integer = WB.Document.Body.All.Count - 1
H = WB.Document.Body.All.Item(L)
H.ScrollIntoView(True)

ahmad009
پنج شنبه 25 مهر 1392, 17:58 عصر
کدش اینه:

Dim H As HtmlElement
Dim L As Integer = WB.Document.Body.All.Count - 1
H = WB.Document.Body.All.Item(L)
H.ScrollIntoView(True)
میشه بگید این کد دقیقا چیکار میکنه؟
چطور عمل میکنه؟

Hossis
پنج شنبه 25 مهر 1392, 18:34 عصر
میشه بگید این کد دقیقا چیکار میکنه؟
چطور عمل میکنه؟
در خط اول یک تگ را به صورت المنت تعریف می کنیم
در خط دوم، تعداد تگ های صفحه وب در متغیر L ذخیره می کنیم
در خط سوم آخرین تگ در زیر مجموعه بدنه صفحه وب را به المنت تعریف شده نسبت می دهیم (h= آخرین تگ صفحه وب)
در خط چهارم هم می گوییم که اسکرول کن تا تگ آخر یعنی آخرین تگ رو نشون بده

hosein320
پنج شنبه 25 مهر 1392, 21:14 عصر
سلام
ممنون از راهنماییتون
ولی این خطا بوجود میاد در این خط
H = Web.Document.Body.All.Item(ObjCount)

Cannot convert to 'Class HtmlElement'. Boolean

hosein320
جمعه 26 مهر 1392, 11:43 صبح
دوستان راهنمایی لطفا

aliagamon
جمعه 26 مهر 1392, 13:01 عصر
فکر کنم این جواب بده :

webBrowser1.Document.Window.ScrollTo(0, Integer.MaxValue)

Hossis
جمعه 26 مهر 1392, 13:37 عصر
سلام
ممنون از راهنماییتون
ولی این خطا بوجود میاد در این خط
H = Web.Document.Body.All.Item(ObjCount)
من تست کردم به این صورت انجام نشد ولی اگر به نحوی، آخرین تگ رو داشته باشید می تونید با همین دستور، انجام بدید
کافیه نام تگ آخری باشه

ahmad009
جمعه 03 آبان 1392, 14:38 عصر
فکر کنم این جواب بده :

webBrowser1.Document.Window.ScrollTo(0, Integer.MaxValue)

داداشی اگه توجه کنی میبینی منو همینو گفتم :لبخند:

ahmad009
جمعه 03 آبان 1392, 14:39 عصر
فکر کنم این جواب بده :

webBrowser1.Document.Window.ScrollTo(0, Integer.MaxValue)

داداشی اگه توجه کنی میبینی منو همینو گفتم :لبخند:

aliagamon
جمعه 03 آبان 1392, 15:54 عصر
داداشی اگه توجه کنی میبینی منو همینو گفتم :لبخند:
من پست های قبلو نخواندم .... :لبخند: