Dunque prima del suicidio....
Ho provato questa soluzione che ovviamente mi da un errore Javascript che manca oggetto.
con assegna() dovrebbe in teoria ricavare il valore attuale dalla OPTION, qualche suggerimento riguardo l'errore che restituisce il browser (Previsto Oggetto) ?.write " <select id=""nPagina"" onChange=""Assegna();refreshUtenti();"">"
For X = 1 To iNbPages
.Write " <option value=""" & X & """"
If X = CInt(myPage) Then .Write " selected"
.Write ">" & X & "</option>" & vbCRLF
Next
.write " </select>" & vbCrLf
.Write "<script type=""text/javascript"" language=""javascript"">" & vbCrLf
.Write "function Assegna()" & vbCrLf
.Write "{" & vbCrLf
.Write "document.getElementById('nPagina').selectedIndex; " & vbCrLf
.Write "}" & vbCrLf
.Write "</script> " & vbCrLf