如何计算网站的高度？

Question

我想拍一个网站的快照，所以我必须计算一个网站的高度。我想用这个值：

Dim MyBrowser As New WebBrowser 
MyBrowser.Size = New Size(1027, ???) 

谢谢...

Answer 1

请尝试以下操作。

Dim docWidth as Integer 
Dim docHeight as Integer 

docHeight = WebBrowser1.Document.Body.ScrollRectangle.Height 
docWidth = WebBrowser1.Document.Body.ScrollRectangle.Width 

Answer 2

当你说一个网站的高度.. 您的意思是一个浏览器窗口或整个文档的高度？

通过网站的高度，如果您的意思是以上任何一种， 您可以查看this并获取高度值（浏览器/文档）并将其发送回服务器。