<%@LANGUAGE="VBSCRIPT"%> <% Dim rec_ore Dim rec_ore_numRows Set rec_ore = Server.CreateObject("ADODB.Recordset") rec_ore.ActiveConnection = MM_connOre_STRING rec_ore.Source = "SELECT * FROM ore" rec_ore.CursorType = 0 rec_ore.CursorLocation = 2 rec_ore.LockType = 1 rec_ore.Open() rec_ore_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rec_ore_numRows = rec_ore_numRows + Repeat1__numRows %> Documento senza titolo <% While ((Repeat1__numRows <> 0) AND (NOT rec_ore.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rec_ore.MoveNext() Wend %>
Ufficio
Giorni
Apertura
Chiusura
<%=(rec_ore.Fields.Item("ufficio").Value)%>
<%=(rec_ore.Fields.Item("giorni").Value)%>
<%=(rec_ore.Fields.Item("inizio").Value)%>
<%=(rec_ore.Fields.Item("fine").Value)%>
 
Indietro
<% rec_ore.Close() Set rec_ore = Nothing %>