Newsgroup: it.comp.lang.visual-basic
Titolo: Forse [OT] html e vbscript client side

Innanzi tutto mi scusa se sono OT, ma visto che non ho trovato nesun NG che
tratta il vbs, e nell'NG di asp non sono ammesse domande su script client
side, mi rivolgo a voi, visto che il linguaggio e' simile :)
e' del tempo che cerco di fare uno sript che gestidce gli eventi del mouse
come il Jscript, cioe' sto' cercando di creare un menu' ad albero tipo
gestione risorse che mi si apra via via che l'utente clicca sul nodo scelto.
sono arrivato a fare una cosa del genere :
<HTML>
<script language="VBSCRIPT">
function ApriHome()
set HTMLObj=Document.all.tags   ("DIV")(1)
tabellainserita= "<table width='108' border='1' cellspacing='0'
cellpadding='0' bordercolor='#FFFFFF'>" & _
     "<tr bgcolor='c10000'><td height='27'><font face='Courier New, Courier,
mono' size='-1' color='ffffff'>Link 1</font>" & _
     "</td></tr></table>"
HTMLObj.innerHTML=tabellainserita
End Function
Function ChiudiHome()
set HTMLObj=Document.all.tags ("DIV") (0)
HTMLObj.innerHTML=""
End Function
</script>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FF0000">
<table border="0" cellspacing="0" cellpadding="0" width="108">
  <tr>
    <td width="108"> <img src="../Immagini/menu/home.gif" width="70"
height="19" border="0"><a href="#" onclick="ChiudiHome()"><img
src="../Immagini/menu/chiudi.gif" width="19" height="19" border="0"></a><a
href="#" onclick="ApriHome()"><img src="../Immagini/menu/freccia%20apri.gif"
width="19" height="19" border="0"></a></td>
  </tr>
</table>
<DIV name="HTMLObj"></DIV>
</body>
</html>
e devo dire che funziona, il problema pero' e' che devo sagrificare un tag
html per far andare la funzione e comunque lo posso usare solo pr un link,
cioe' se volessi farlo anche dopo con un'altro menu dovrei usare un'altro
tag differente da DIV.
sicuramente mi direte, usa i custom tag che IE supporta dal 4.0 in poi e sei
apposto :) ed e' quello che ho pensato anche io , ed infatti avevo scritto
questo :
<HTML XMLNS:MY>
<STYLE>
@media all {
   MY\:HOME  { }
}
</STYLE>
<script language="VBSCRIPT">
function ApriHome()
set HTMLObj=Document.all.tags   ("MY:HOME")(1)
tabellainserita= "<table width='108' border='1' cellspacing='0'
cellpadding='0' bordercolor='#FFFFFF'>" & _
     "<tr bgcolor='c10000'><td height='27'><font face='Courier New, Courier,
mono' size='-1' color='ffffff'>Link 1</font>" & _
     "</td></tr></table>"
HTMLObj.innerHTML=tabellainserita
End Function
Function ChiudiHome()
set HTMLObj=Document.all.tags ("MY:HOME") (0)
HTMLObj.innerHTML=""
End Function
</script>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FF0000">
<table border="0" cellspacing="0" cellpadding="0" width="108">
  <tr>
    <td width="108"> <img src="../Immagini/menu/home.gif" width="70"
height="19" border="0"><a href="#" onclick="ChiudiHome()"><img
src="../Immagini/menu/chiudi.gif" width="19" height="19" border="0"></a><a
href="#" onclick="ApriHome()"><img src="../Immagini/menu/freccia%20apri.gif"
width="19" height="19" border="0"></a></td>
  </tr>
</table>
<MY:HOME name="HTMLObj"></MY:HOME>
</body>
</html>
con il problema che pero' non funziona, cioe' e' come se non mi riconoscesse
il tag :((((((
Se qualcuno di voi a gia' fatto cose del genere oppure ha una idea io sono
qui che la aspetto :)
Grazie
Spai Kid.
PS la pagina e' su 
www.spaikid.com/test.html
 :)

 qui che la aspetto :)
uhmm se ti può servire c'è questo esempio, fornito di codice sorgente
JavaScript:
http://www.ivanpeters.com
Ciao
Faber