Dim width,height width=CreateObject("HtmlFile").ParentWindow.Screen.width height=CreateObject("HtmlFile").ParentWindow.Screen.height WScript.Echo width & "x" & height