我如何计算网站的高度？

Question

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

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

...谢谢

Answer 1

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

如果你认为上述任何一个网站的高度， 您可以查看this并获取高度值（浏览器/文档）并将其发送回服务器。

Answer 2

请尝试以下操作。

Dim docWidth as Integer 
Dim docHeight as Integer

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