VaR Getviewportwidth = Function (){ VaR Width = 0; If (( Document . Documentelement )&&( Document . Documentelement. clientwidth) {width = Document . Documentelement. clientwidth ;} Else If (( Document . Body )&&( Document . Body. clientwidth) {width =Document . Body. clientwidth ;} Else If ( Window . Innerwidth ) {Width = Window . Innerwidth ;} Return Width ;}; VaR Getviewportheight = Function (){ VaR Height = 0; If (Window . Innerheight ) {Height = Window . Innerheight -18 ;} Else If (( Document . Documentelement )&&( Document . Documentelement. clientheight) {Height = Document . Documentelement. clientheight ;} Return Height ;}; VaR Getcontentheight =Function (){ If (( Document . Body )&&( Document . Body. offsetheight )){ Return Document . Body. offsetheight ;} Return 0 ;}; VaR Getviewportscrollx = Function (){ VaR Scrollx = 0; If (( Document . Documentelement )&&( Document . Documentelement. scrollleft) {scrollx = Document . Documentelement. scrollleft ;} Else If (( Document . Body )&&( Document . Body. scrollleft) {scrollx = Document . Body. scrollleft ;} Else If ( Window . Pagexoffset ) {Scrollx =Window . Pagexoffset ;} Else If ( Window . Scrollx) {scrollx = Window . Scrollx ;} Return Scrollx ;}; VaR Getviewportscrolly = Function (){ VaR Scrolly = 0; If (( Document . Documentelement )&&(Document . Documentelement. scrolltop) {scrolly = Document . Documentelement. scrolltop ;} Else If (( Document . Body )&&( Document . Body. scrolltop) {scrolly = Document . Body. scrolltop ;} Else If ( Window . Pageyoffset ) {Scrolly =Window . Pageyoffset ;} Else If ( Window . Scrolly) {scrolly = Window . Scrolly ;} Return Scrolly ;};