<%
Function QueryBrowserCapability(Capability)
dim bAns
set oBrowser = Server.CreateObject("MSWC.BrowserType")
Select Case UCase(Capability)
Case "JAVA"
bAns = oBrowser.JavaApplets
response.redirect "nojs.htm"
Case "JAVASCRIPT"
bAns = oBrowser.JavaScript
response.redirect"nojs.htm"
Case Else
bAns = False
End Select
QueryBrowserCapability = bAns
set oBrowser = Nothing
End Function
%>
ANAQMANTA WASI Alquiler De Cabañas En Nono