Im glad it worked out for you. If you wanted to make it a little more dynamic. Say the manager page name changed to mypage.asp your call to Right(wpage, 8) would not work appropriately.
<%
Dim wpage, mypage
function whatPage(urlString)
x=split(myPage,"/")
currPage=x(uBound(x))
whatPage=currPage
end function
mypage = request.ServerVariables("HTTP_REFERER")
if mypage <>"" then
mypage= whatPage(request.ServerVariables("HTTP_REFERER"))
end if
If mypage = "Managers.asp" Then
Response.write "This is the Managers page"
Else
Response.write "This is the Workers page"
End If
%>
It may seem like a bit of over kill but from a scalabilty point of view this will work out better in the long run.
Earl
|