Buongiorno,
sto creando una pagina di elenco articoli recuperandoli da database access
La pagina funziona ma in questo modo mi mette gli articoli uno sotto l'altro. io vorrei metterli uno di fianco all' altro 3 alla volta. Vedo altri siti che lo fanno. Posto qui perchè credo sia un problema di come caricare i record e non di ccs.
Questi sono i codici che uso
codice:
<%
Dim sqlquery
sqlquery = "select  *  FROM [Catalogo, Articoli]  WHERE IDLinea = " & idlineadicatalogo & " AND InVendita=true"

Dim RecordsetArticoli
Set RecordsetArticoli = DatabaseWebStore.Execute(sqlquery)
%>
    <%iPageSize = 5 'NUMERO RECORD PER PAGINA
                
                
                Set RecordsetArticoli = Server.CreateObject("ADODB.Recordset")
            
                RecordsetArticoli.PageSize = iPageSize
                RecordsetArticoli.CacheSize = iPageSize
                RecordsetArticoli.Open sqlquery, DatabaseWebStore, adOpenStatic, adLockReadOnly, adCmdText
                
                recCount = RecordsetArticoli.RecordCount
                iPageCount = RecordsetArticoli.PageCount
                

                If iPageCurrent > iPageCount Then iPageCurrent = iPageCount
                If iPageCurrent < 1 Then iPageCurrent = 1    
                    
                If iPageCount = 0 Then
                Else
                    RecordsetArticoli.AbsolutePage = iPageCurrent
                    iRecordsShown = 0
                    
                    
                    
                    
                End If
                %>

<%If RecordsetArticoli.EOF Then%>
<%Else%>
codice:
<%Do While iRecordsShown < iPageSize And Not RecordsetArticoli.EOF
            ID = RecordsetArticoli("ID")
                    Codice = RecordsetArticoli("Codice")
                    Denominazione = RecordsetArticoli("Denominazione")
                    Informazioni = RecordsetArticoli("Informazioni")
                    Informazioni1= RecordsetArticoli("Informazioni1")
                    Informazioni3= RecordsetArticoli("Informazioni3")
                    InformazioniComplete = RecordsetArticoli("InformazioniComplete")
                    InformazioniEstese = RecordsetArticoli("InformazioniEstese")
                    Confezione = RecordsetArticoli("Confezione")
                    Prezzo = RecordsetArticoli("Prezzo")
                    RiferimentoDiIcona = RecordsetArticoli("RiferimentoDiIcona")
                    RiferimentoDiFoto = RecordsetArticoli("RiferimentoDiFoto")
%>
Grazie