%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim Recordset1 Dim Recordset1_numRows ndata=cstr(date) Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_cndb_STRING Recordset1.Source = "SELECT top 1 * FROM conferenze order by ordine " Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %>
Menu principale:
Prossima Conferenza:
I Nostri Sponsor:
| <%=(Recordset1.Fields.Item("data").Value)%> | |||
| <%=(Recordset1.Fields.Item("titolo").Value)%> | |||
| <%=(Recordset1.Fields.Item("descr").Value)%> | |||
| Note: <%=(Recordset1.Fields.Item("no_te").Value)%> | |||