database check i et loop

fordi din kode (undskyld mit sprog!) er fucked up ... :-(

Sårn her skal den se ud :-)

<%
    Set Conn = Server.CreateObject(\"ADODB.Connection\")
    DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & \"DBQ=\" & \"d:\\home\\cyber4alldk\\www\\esf\\events.mdb\" & \";\"
    Conn.Open DSN
    Set Wall = Server.CreateObject(\"ADODB.RecordSet\")
    Wall.Open \"Select * From Events\", Conn
    If Wall.EOF then
        Response.Write \"Desværre, der er ikke nogen Hyundai til salg lige nu.\"
        Response.End
    end if

    Do While Not Wall.EOF
        If Wall(\"date\") > \"\" then html = html & \" align=\"\"right\"\"><a style=\"\"color: #000000\"\" href=showevent.asp?date=\" & dd & \"-\" & mm & \">\" & dd
        wall.movenext
    loop
   
    wall.close: set wall = nothing
    Conn.close: set Conn = nothing
%>

ok, så se her:
Set Conn = Server.CreateObject(\"ADODB.Connection\")
    DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & \"DBQ=\" & \"d:\\home\\cyber4alldk\\www\\esf\\events.mdb\" & \";\"
    Conn.Open DSN
    Set Wall = Server.CreateObject(\"ADODB.RecordSet\")
    Wall.Open \"Select * From Events\", Conn
    If Wall.EOF then
        Response.Write \"Desværre, der er ikke nogen Hyundai til salg lige nu.\"
        Response.End
    end if

    Do While Not Wall.EOF
        If Wall(\"date\") > \"\" then html = html & \"><a align=\"\"right\"\" style=\"\"color: #000000\"\" href=showevent.asp?date=\" & dd & \"-\" & mm & \">\" & \"un\" 
        wall.movenext
    loop
   
    wall.close: set wall = nothing
    Conn.close: set Conn = nothing

gir:

<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=25-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=25-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=26-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=26-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=27-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=27-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=28-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=28-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=29-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=29-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=30-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=30-3>un</td>
<td><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=31-3>un><a align=\"right\" style=\"color: #000000\" href=showevent.asp?date=31-3>un</td>

Evt. kontakt mig på icq, 25472360 så kan vi snakke om det der.

læs follow up i næste post

svarer mig selv...