<>Reeks conn = Server.CreateObject („ADODB.Connection
“)
conn. Open „PROVIDER=Microsoft.Jet.OLEDB.4.0
; Gegevens
Source=“ & Server.MapPath („guest.mdb“
)
Schemerige rs
vastgestelde rs=Server.CreateObject („ADODB.recordset
“)
sql= " SELECTEER * UIT berichten "
Plaats rs = conn. Voer uit (sql)
%>
Alle Gegevens
Aantal |
Naam |
Emp. # |
E-mail Adres |
---|
<>als niet (rs.EOF of rs.BOF) toen rs.movefirst
sNum = 0
doe tot rs.EOF
%>
<>sNum = sNum +1 Response.Write (sNum) %>
|
<> |
<> |
<> |
<>rs.MoveNext
lijn
rs. Sluit
conn. Sluit
%>