%@LANGUAGE="VBSCRIPT"%> <% Dim classi Dim classi_numRows Set classi = Server.CreateObject("ADODB.Recordset") classi.ActiveConnection = MM_connessione_STRING classi.Source = "SELECT DISTINCT(CLASSE) FROM INSEGNANTI" classi.CursorType = 0 classi.CursorLocation = 2 classi.LockType = 1 classi.Open() classi_numRows = 0 %>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||