Ciao ho una funzione che mi "dovrebbe" intercettare se il browser è abilitato a codice Javascript in modo da visualizzare o meno un codice che permette all'utente una personalizzazione della pagina attraverso la modifica del foglio di stile

<code>
<%
Private Function IsJSReady()
dim bc
Set bc = Server.CreateObject("MSWC.BrowserType")
IsJSReady = bc.javascript
if Lcase(IsJSReady) = "unknown" then _
IsJSReady = Null
Set bc = Nothing
End Function
%>
</code>

Ora provando con i vari browser mi capita una cosa abbastanza strana:

<code>
<%
dim a
a = IsJSReady
if a then
Response.Write "browser supports client-side Javascript" & a
elseif not a then
Response.Write "browser doesn't support client-side Javascript" & a
elseif IsNull( a ) then
Response.Write "browser's client-side Javascript support is unknown" & a
end if
%>
</code>

IE 6.0 mi dice "browser supports client-side JavascriptVero"
e correttamente esegue il javascript

FireFox e Netscape mi restituiscono False ma eseguono comunque lo script

Amaya, l'unico sincero ;-) di restituisce false e realmente non esegue il codice.

Qualche idea?

Cetalfio