SlideServe
Menu
Préférences
© SlideServe · v2026

ASP Web Development: Writing Data to Databases

harmon avatar
15 diapositives · 260 Views · Oct 09, 2014

Learn to write server-side code in ASP to store data in databases, manage permissions, create recordsets, and implement modular code using include files.

ASP Web Development: Writing Data to Databases - slide 1
01 / 15ASP Web Development: Writing Data to Databases
1 / 17

Télécharger la présentation

ASP Web Development: Writing Data to Databases
Une image / un lien ci-dessous est fourni (tel quel) pour télécharger la présentation

Politique de téléchargement : le contenu du site vous est fourni TEL QUEL pour votre information et votre usage personnel ; il ne peut être vendu, concédé sous licence ni partagé sur d’autres sites sans l’accord de son auteur.Le contenu vous est fourni TEL QUEL, pour votre information et votre usage personnel uniquement. Téléchargez la présentation en cliquant sur ce lien. Lors du téléchargement, si vous ne parvenez pas à télécharger une présentation, l’éditeur a peut-être supprimé le fichier de son serveur.Pendant le téléchargement, si vous ne parvenez pas à obtenir une présentation, le fichier a peut-être été supprimé par l’éditeur.

F I N

Plus de contenu associé

Transcription de la présentation
  1. 24 – Web applications:Writing data to Databasesusing ASP

  2. Admin • Module Feedback Questionnairein general feedback should be: • specific & detailed enough to take action • timely enough to take action • Most effective feedback: • informal comments from students during/after tutorials/lectures

  3. Session Aims & Objectives • Aims • To introduce the fundamental ideas involved in using server-side code to write data to databases • Objectives,by end of this week’s sessions, you should be able to: • create an ASP web page that allows the user to store data in database

  4. Database Permissions 1 • In order for ASP to write to a database • Need to give write access to Internet Guest Account for database file (People.mdb) • Right-click on file in Windows Explorer(the following screens are for Windows 2000)

  5. Database Permissions 2 • Click Security tab • Click Add button

  6. Database Permissions 3 • Select Internet Guest Account IUSR_ … ClickAddbuttonClickOKbutton

  7. Database Permissions 4 • Select InternetGuest Account • Ensure writeaccess is on

  8. Writing data to a database • create recordset • open recordset • dynamic cursor, pessimistic locking • to add a record • use to AddNew method rs.AddNew • to delete a record • use the Delete method rs.Delete • to change existing data • assign a new value to fields rs.Fields("Surname").Value = "Fred"

  9. Example: Person Edit (html) <html> <head> <title>Person's Details</title> </head> <body> <p><center><b><font size=+2>Person's Details</font></b></center> <% ' ASP code will go here (next slide). %> <form name="frmPerson" action="PersonEdit.asp" method=post> Surname: <input name="txtSurname" type="text"value="<%=Surname%>"><br> <input name="btnPrev" type="submit" value="Previous"> <input name="btnSave" type="submit" value="Save"> <input name="btnNext" type="submit" value="Next"> </form> </body> </html> PersonEdit.asp

  10. Example: Person Edit (ASP) <% Const cs = "…" Dim rs Dim Surname Set rs = CreateObject("ADODB.Recordset") rs.Open "Person", cs, 3, 3 If Session("curID") <> "" Then rs.Find "[ID] = " & Session("curID") If Request.Form("btnPrev") <> "" Then rs.MovePrevious ElseIf Request.Form("btnNext") <> "" Then rs.MoveNext ElseIf Request.Form("btnSave") <> "" Then rs.Fields("Surname") = Request.Form("txtSurname") rs.Update End If End If Session("curID") = rs.Fields("ID").Value Surname = rs.Fields("Surname").Value rs.Close Set rs = Nothing %>

  11. Include files • web pages • mix HTML, VB Script, and SQL • can become messy • use include files to • modularise (break up) code

  12. Example: People.asp <html> <head> <title>Personal Address Book</title> </head> <body> <p><center><b><font size=+2>Personal Address Book</font></b></center> <% Const cs = " … … " Dim rs Set rs = CreateObject("ADODB.Recordset") rs.Open "Person", cs Do Until rs.EOF Response.Write rs.Fields("Surname").Value Response.Write "<br>" rs.MoveNext Loop rs.Close Set rs = Nothing %> </body> </html>

  13. Example: People2.asp People2.asp <html> <head><title>Personal Address Book</title></head> <body> <p><center><b><font size=+2> Personal Address Book</font> </b></center> <!-- #include file ="People.inc" --> </body> </html> People.inc <% Const cs = " … … " Dim rs Set rs = CreateObject("ADODB.Recordset") rs.Open "Person", cs Do Until rs.EOF Response.Write rs.Fields("Surname").Value Response.Write "<br>" rs.MoveNext Loop rs.Close Set rs = Nothing %>

  14. Example: Procedures People3.asp People.inc <html> <head> <title>Personal Address Book</title> <!-- #include file ="People.inc" --> </head> <body> <p><center><b><font size=+2> Personal Address Book </font></b></center> <% ShowPeople %> </body> </html> <% Const cs = " … … " Sub ShowPeople() Dim rs Set rs = CreateObject("ADODB.Recordset") rs.Open "Person", cs Do Until rs.EOF Response.Write rs.Fields("Surname").Value Response.Write "<br>" rs.MoveNext Loop rs.Close Set rs = Nothing End Sub %>

  15. Example: Parameters People4.asp People.inc <html> <head> <title>Personal Address Book</title> <!-- #include file ="People2.inc" --> </head> <body> <p><center><b><font size=+2> Personal Address Book </font></b></center> <form name=frmPerson action=People4.asp method=post> <input name=btnOrder value=Order type=submit> <input name=btnNormal value=Normal type=submit> </form> <% if Request.Form("btnOrder") <> "" Then ShowPeople "SELECT * FROM Person ORDER BY Surname ASC" Else ShowPeople "Person" End If %> </body> </html> <% Const cs = “… …" Sub ShowPeople(strQuery) Dim rs Set rs = CreateObject("ADODB.Recordset") rs.Open strQuery, cs Do Until rs.EOF Response.Write rs.Fields("Surname").Value Response.Write "<br>" rs.MoveNext Loop rs.Close Set rs = Nothing End Sub %> People4.asp