<% Dim o, IS_PDA, IS_WAP, IS_HDML Set o = Server.CreateObject("cyScape.browserObj") IS_PDA = o("PDA") IS_WAP = o("WAP") IS_HDML = o("HDML") set o = nothing If IS_PDA or IS_WAP or IS_HDML Then Response.Redirect "/wireless/" End If %>