Dim nick
Dim type
Dim deposit
while (!rst.EOF) {
Session("Autenticato") = "OK";
nick= rst("nick");
type= rst("type");
deposit=rst("deposit");
Session("nick")=nick;
Session("type")=type;
Session("deposit")=deposit;
Response.write nick
rst.MoveNext( );
}
rst.Close();
con.Close();
rst = null;
con = null;