• User Newbie

    [asp] Tabella su tre colonne

    Salve a tutti.
    Sto cercando di intabellare i risultati di una query su tre colonne.
    L'output mi da:
    Impossibile visualizzare la pagina
    Tipo di errore: Errore di compilazione di Microsoft VBScript (0x800A0400)
    Prevista istruzione
    wend

    Dove sbaglio?

    <%
    Set con = Server.CreateObject( "ADODB.Connection" )
    strDB= Server.MapPath(dirDB & "prova.mdb")
    con.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & strDB
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.ActiveConnection = Con
    rs.Open "Select * FROM tab_test order by testname"
    set objtestname=rs("testname")
    %>

    <table width="100%" border="0" cellspacing="0" cellpadding="0">
    <%
    Dim j
    j = 2

    if rs.EOF = false then
    while not rs.EOF

    if j = 2 then %>
    <tr>
    <td><%=objtestname%></td>
    <%
    j = j - 1
    else if j = 1 then %>
    <td><%=objtestname%></td>

    <%
    j = j - 1
    else %>
    <td><%=objtestname%></td>
    </tr>

    <%
    j = 2
    end if

    rs.MoveNext

    wend
    end if
    %>
    </table>


  • User Newbie

    risolto ... elseif...