%@ Language=VBScript %> <% ' Set up your variables Dim sURL, sPath ' Get the domain name typed in the brows ' er. sURL = Request.ServerVariables("HTTP_HOST") ' Get the rest of the path after the dom ' ain name. sPath = Request.ServerVariables("PATH_INFO") ' Based on the domain name, redirect the ' user ' to the correct directory and attach th ' e rest ' of the path. Select Case sURL Case "www.pdascreenprotectors.com", "pdascreenprotectors.com" ' Ignore...this is the current site. Case "www.portal4pdas.com", "portal4pdas.com" ' redirect To the "domain2" directory Response.Redirect "P4P" Case "www.portal4pdas.com/p4p", "portal4pdas.com/p4p" ' redirect to the "P4P" directory ' Response.Redirect "P4P" End Select %>
| ||||||||||||||||||
| |
||||||||||||||||||
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
|||||||||
|
|
Prevent Scratches on the Screen of your Personal
Digital
Assistant
Optically Clear / No 'Haziness' or 'Washed-out' Appearance Super-Tough / Scratch-Resistant / Very Long Lasting Smooth / Won't Interfere with Stylus Operation No Messy Adhesives / No Bubbles Sized for PDA Make and Model Quick and Easy to Install Quantity Discounts Affordable |
|
|
This Windows
CE Web Community Webring site is owned by PDASPc
|