%
Dim browserdetect,getOS,browser
Set browserdetect = Server.CreateObject("MSWC.BrowserType")
browser=browserdetect.Browser
getOS = Request.ServerVariables("HTTP_USER_AGENT")
%>
adidas soccer - Tips from the Stars
<%
if Instr(getOS, "Mac") then
if Instr(browser, "IE") then
%>
Your browser does not support frames
<% else %>
<%
End If
Else
%>
<%End If%>