<%@ LANGUAGE="VBScript" %>
<%
'Board Foot Calculator
'Copyright (C) by Randy Wilson, RWebs Consulting, 2000
ROUNDTO = 2 'number of decimal places to display for Board Feet
'URL of page that called this page
RefererURL = Request.ServerVariables("HTTP_REFERER")
'strip off "http://" to get server and page path only
RefererPage = Mid(RefererURL, InStr(RefererURL,"://") + 3)
'get server and page path of this page
ThisPage = Request.ServerVariables("SERVER_NAME") & Request.ServerVariables("URL")
'remember the page that called this one to be able to return to it
If RefererPage <> ThisPage Then
ReturnPage = RefererURL
Else
ReturnPage = Request("ReturnPage")
End If
%>
Eisenbrand Exotic Hardwoods Board Foot Calculator
