<% 'inizia codice che deve essere interpretatto
inpAzione = Request.QueryString("azione")
inpPassword = Request.QueryString("pwd")
'controllo la password
If inpPassword <> "ium" Then
Response.Write "
"
Response.Write "
password errata
"
Response.Write ""
Response.Write Chr(10) & Chr(13)
Response.Write " "
Response.Write ""
Response.End
Else
'verifico quale azione è stata scelta e richiamo la
'funzione corrispondente
Select Case InpAzione
Case "upd" 'modifica dati
Call creaFormUpd()
Case "del" 'cancella dati
Call creaFormDel()
End Select
End If
%>