|
|
|
|
|
|
|
ASP = Active Server Pages |
|
Een scripting omgeving met de bedoeling HTML
paginas te genereren. |
|
Programmeerplatform voor interactieve websites |
|
Laat toe een database te benaderen dmv van een
site. |
|
|
|
|
|
|
|
|
Vergelijkbaar met HTML file. |
|
Bevat Tekst, HTML-tags en Scriptinginstructies |
|
Scripting wordt uitgevoerd op de Server door IIS
(of PWS) |
|
Heeft de extensie .asp |
|
|
|
|
|
|
|
HTML : Wanneer een browser een .html pagina
opvraagt zal de server die pagina naar de client sturen. Zonder meer. |
|
ASP : Wanneer een browser een .asp pagina vraagt
zal de server de scriptinginstructies in de pagina uitvoeren, hierdoor
wordt HTML dynamisch gegenereerd en naar de client gestuurd. |
|
|
|
|
|
|
ASP
maakt mogelijk om dynamische websites te maken door via
scriptinginstructies uitgevoerd op de webserver, HTML te genereren. |
|
|
|
|
Hierdoor kan men browser-onafhankelijk werken. |
|
De scripting wordt uitgevoerd op server en
resulteert in standaard HTML. |
|
Deze HTML is zowel met Netscape als Explorer
compatible. |
|
|
|
|
|
|
|
Windows Platform |
|
IIS vanaf versie 3.0 op NT 4.0 (Service Pack,
Option Pack) |
|
IIS 5.0 standaard in Windows 2000 |
|
NotePad/Frontpage om te editeren |
|
PWS (Personal Webserver) in Windows 98 ->
niet performant, als test geschikt |
|
|
|
|
|
|
Een .asp pagina die bij het opvragen de tijd en
datum toont. |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
FOTO :<br> |
|
<img border="0"
src="foto<%=Request.QueryString("Fotonr")%>.jpg"> |
|
|
|
|
http://127.0.0.1/aspsite/voorbeeld15_p2.asp?FotoNr=1 |
|
|
|
|
|
|
|
|
|
|
|
|
Get |
|
- waarden zichtbaar/aanpasbaar in URL |
|
- Request.QueryString(“Varnaam”) |
|
|
|
Post |
|
- waarden niet zichtbaar in URL |
|
- Request.Form(“Varnaam”) |
|
|
|
|
|
|
|
Een website is database-driven |
|
-> de inhoud wordt gestuurd door elementen
uit een database |
|
-> informatie die getoond wordt is afkomstig
uit een database |
|
->data die ingegeven wordt via de site wordt
in een database opgeslagen. |
|
|
|
|
|
|
|
|
|
|
|
ASP |
|
ADO Data objecten |
|
Connectie met database |
|
MS Access |
|
SQL Server 7 |
|
SQL Opdrachten |
|
|
|
|
ActiveX Data Objects |
|
Objecten die een database aanspreken |
|
Geïnstalleerd bij IIS |
|
|
|
Connection |
|
Recordset |
|
Command |
|
|
|
|
Hoe weet de server waar de database zich bevindt
? |
|
|
|
|
DRIVER
={Microsoft Access Driver (*.mdb)};
DBQ = C:\waar\dedatabase.mdb“ |
|
|
|
Met Server.Mappath
DRIVER ={Microsoft
Access Driver (*.mdb)};
DBQ = “ &
Server.MapPath("dedatabase.mdb") |
|
|
|
|
|
|
SELECT = query |
|
DELETE |
|
INSERT |
|
UPDATE |
|
|
|
|
SELECT * FROM TabelNaam |
|
SELECT VeldNaam FROM TabelNaam |
|
SELECT VeldNaam FROM TabelNaam where VeldNaam =
Waarde |
|
SELECT count(*) FROM TabelNaam |
|
SELECT * FROM TabelNaam ORDER BY VeldNaam |
|
|
|
|
|
|
|
|
|
|
|
|
Database is MS-Access Database |
|
.mdb |
|
Data betreffende een autohandelaar |
|
|
|
|
|
|
|
|
|
3 Tables |
|
Autos |
|
Merken |
|
Visitors |
|
|
|
|
|
|
|
|
|
|
Set oCn =
CreateObject("ADODB.Connection") |
|
|
|
oCn.ConnectionString = “ConnectieString” |
|
|
|
oCn.Open |
|
|
|
|
Set oRs =
CreateObject("ADODB.Recordset") |
|
|
|
Set oRs.ActiveConnection = oCn |
|
|
|
oRs.Open (“SQLOpdracht”) |
|
|
|
|
|
|
MaxPrijs = 300000 |
|
Bouwjaar = 1997 |
|
|
|
SqlString = "SELECT autoid FROM autos WHERE
(prijs_bef < " & MaxPrijs & ") and (bouwjaar >
" & bouwjaar & ")" |
|
|
|
oRs.Open (SqlString) |
|
|
|
|
Do while not oRs.eof |
|
|
|
Response.Write oRs.Fields(“Veldnaam") |
|
|
|
oRs.MoveNext |
|
|
|
Loop |
|
|
|
|
|
|
oRs.MoveFirst |
|
oRs.MoveNext |
|
oRs.MoveLast |
|
oRs.MovePrev |
|
X = oRs.Fields(“Veldnaam") |
|
Response.write oRs.Fields(“Veldnaam") |
|
<%= oRs.Fields(“Veldnaam")%> |
|
|
|
|
|
|
|
|
<table border="1"
width="25%"> |
|
|
|
<%Do
while not oRs.eof%> |
|
|
|
<tr> |
|
<td
width="10%"><%=oRs.fields("MerkId")%></td> |
|
<td
width="90%"><%=oRs.fields("MerkNaam")%></td> |
|
</tr> |
|
|
|
<%oRs.MoveNext%> |
|
<%Loop%> |
|
|
|
</table> |
|
|
|
|
Set oCm.ActiveConnection = oCn |
|
|
|
oCm.CommandText = (“SQLOpdracht") |
|
|
|
oCm.Execute |
|
|
|
|
Set oCm =
CreateObject("ADODB.Command") |
|
|
|
Set oCm.ActiveConnection = oCn |
|
|
|
oCm.CommandText = ("DELETE FROM autos where
autoid = '13'") |
|
|
|
oCm.Execute |
|
|
|
|
oRs.Locktype = 2 |
|
|
|
SqlString = "SELECT * FROM autos WHERE
autoid ='13'" |
|
|
|
oRs.Open (SqlString) |
|
|
|
oRs.Fields("bouwjaar") =
"1999" |
|
|
|
oRs.Update |
|
|
|
|
|
|
oRs.Open (SqlString) |
|
|
|
oRs.AddNew |
|
|
|
oRs.Fields("autoid") = "13" |
|
oRs.Fields("bouwjaar") =
"1950" |
|
|
|
oRs.Update |
|
|
|
|
De autohandelaar in detail |
|
|
|
|
|
Notes