[ASP] Next event

[Verwijderd]

Ik zit met onderstaand probleem.
Ik heb een access database met een tabel ploeg. In deze tabel staan 4 kollommen. Team thuis, thuis uit, uitslag datum. De kolom datum is van de opmaak dd/mm/jjjj
Nu zoek ik een asp script dat de eerstvolgende datum zoekt in die tabel en dan die rij uitleest.

dit heb ik:

code:

<%

Dim cnnSimple ' ADO connection
Dim rstSimple ' ADO recordset
Dim strDBPath ' path to our Access database (*.mdb) file


strDBPath = Server.MapPath("poging.mdb")
cnnSimple.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";"


Set rstSimple = cnnSimple.Execute("SELECT * FROM ploeg WHERE Datum<Date()")
Set rstSimple_kom = cnnSimple.Execute("SELECT * FROM ploeg WHERE Datum>Date()")

%>

<h1>&nbsp;</h1>
<h1>Wedstrijden vorig weekend</h1>
<table border="1">
<%
If Not rstSimple.EOF Then
%>

<tr>
<td width="80" height="43">Reeks</td>
<td width="80" height="43">Team Thuis</td>
<td width="80" height="43">Team Uit</td>
<td width="82">Datum</td>
<td width="112">Uitslag</td>
</tr>

<tr>
<td width="80" height="43"><%= rstSimple.Fields("Reeks").Value %></td>
<td width="80"><%= rstSimple.Fields("Team Thuis").Value %></td>
<td width="82"><%= rstSimple.Fields("Team Uit").Value %></td>
<td width="112"><%= rstSimple.Fields("Datum").Value %></td>
<td width="90"><%= rstSimple.Fields("Uitslag").Value %></td>
</tr>

<%
rstSimple.MoveNext
End If
'Loop
%>
</table>

<h1>&nbsp;</h1>
<table border="1">
<%
If Not rstSimple_kom.EOF Then
%>
<tr>
<td width="80" height="43">Reeks</td>
<td width="80" height="43">Team Thuis</td>
<td width="80" height="43">Team Uit</td>
<td width="82">Datum</td>
</tr>
<tr>
<td width="80" height="43"><%= rstSimple.Fields("Reeks").Value %></td>
<td width="80" height="43"><%= rstSimple_kom.Fields("Team Thuis").Value %></td>
<td width="82"><%= rstSimple_kom.Fields("Team Uit").Value %></td>
<td width="112"><%= rstSimple_kom.Fields("Datum").Value %></td>
</tr>
<%

rstSimple_kom.MoveNext
End If
'Loop
%>
</table>
<%


rstSimple.Close
Set rstSimple = Nothing
cnnSimple.Close
Set cnnSimple = Nothing


%>

Alleen werkt het gewoon niet. Het pikt nogal random een datum uit

[RobIII]

Waarom doe je niet gewoon een "order by datum"?
Kijk eens naar de Find(next) methods van een recordset (zo even uit de blote bol) of het .Filter property. Daarmee kun je je recordset filteren.

[ Voor 60% gewijzigd door RobIII op 31-08-2006 13:24 ]

[P_de_B]

Waarom doe je niet gewoon een "order by datum", in combinatie met TOP?

[whoami]

Nu zoek ik een asp script dat de eerstvolgende datum zoekt in die tabel en dan die rij uitleest.

Script requests laten we niet toe, en het is ook niet de bedoeling dat je het schrijven van een stuk code hier aan anderen overlaat.
Verder moet je mbhv de gegeven tips toch wel wat verder geraken