De opgehaalde gegevens in de webpagina plaatsen
<%
On Error Resume Next ‘ASP kent geen foutafhandeling zoals Visual Basic
‘Je moet twee dingen bepalen:
‘Werd er een artikel aangevraagd, en
‘zijn er gegevens beschikbaar?
‘De laatste is het belangrijkst.
‘Als er geen gegevens zijn, hoef je niets op de pagina te plaatsen.
If blnGegevens = True Then
If lngArtNr > (-1) Then ‘werd er een artikel gevraagd.
‘Artikel plaatsen.
‘Omdat dit een codeblok is, gebruik je de
‘opdracht Response.Write() om gegevens in html op te zetten.
‘Zoals je zult zien, is het plaatsen van html op deze manier een nauwkeurige bezigheid.
‘Bovendien zul je problemen gaan krijgen met aanhalingstekens,
‘die moet je vervangen door “Chr(34)” en door ASP-code laten toevoegen.
Response.Write(“<h2>” & adoRst.Fields(“ATitel”) & “</h2>”) ‘De titel
Response.Write(“<p>” & adoRst.Fields(“AAuteur”) & “</p>”) ‘De auteur
Response.Write(“<p>” & adoRst.Fields(“ACategorie”) & “</p>”) ‘De categorie
Response.Write(“<hr><p>” & adoRst.Fields(“AArtikel”) & “</p><hr>”) ‘Het artikel
Response.Write(“<p>” & adoRst.Fields(“ADatum”) & “</p>”) ‘De datum
Else ‘werd er geen artikel gevraagd.
‘Index plaatsen.
Response.Write(“<table>”)
Response.Write(“<tr><td>Titel</td><td>Auteur</td><td>Datum</td></tr>”)
adoRst.MoveFirst
Do While adoRst.EOF = False
Response.Write(“<tr><td><a title=” & Chr(34) & “Lees dit artikel” & Chr(34) & “ href=” & Chr(34) & “artikelen.asp?nr=” & adoRst.Fields(“AIndex”) & Chr(34) & “>” & adoRst.Fields(“ATitel”) & “</a></td><td>” & adoRst.Fields(“AAuteur”) & “</td><td>” & adoRst.Fields(“ADatum”) & “</td></tr>”)
Loop
Response.Write(“</table>”)
End If
End If
%>
Nu ben je in staat om gegevens op te halen uit een database, en deze te presenteren in een webpagina. Het plaatsen van gegevens vanuit een webpagina, evenals het online onderhoud van de database, volgen in een ander artikel. Neem bij vragen contact op.