DevTrain Startseite Visual Studio 1 Magazin  
  
  
SUCHEN:  
ARTIKEL ONLINE: 525   

Kategorien
.NET
Datenbanken
Web
XML

Allgemein
Camp
Foren
Events
Persönliche Einstellungen
Registrieren
Prämien Shop
Kontakt
Impressum
Über DevTrain

Autoren


   Autor: Bernhard Elbl Artikel Drucken
        
DATAGRID Teil 2 - Update

Wir haben jetzt einen DATAGRID, in dem jedes Recordset verlinkt ist. Über diese Links wird nun die CustomerID des geklickten Recordset´s in die Seite "dataupdate.asp" übergeben. In dieser Seite soll der Datensatz bearbeitet und abgespeichert werden. (UPDATE einer DB)

dataupdate.asp
...
</body>
<%
' ------------- instanziieren der DB-Connection und des Recordsets
 set conn = server.CreateObject("ADODB.Connection")
 set rs = server.CreateObject("ADODB.Recordset")

' ------------- die DB wird nach dem Recordset mit der ID vom Querystring durchsucht
 strSQL = "Select * FROM Customers WHERE CustomerID = " & Request.QueryString("id")
 
' ------------- öffnen der Connection und des Recordsets
 conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" _
 & Server.MapPath("./db/") & "dbcustomer.mdb;"
 rs.Open strSQL,conn


' ------------- Form mit den Detail-Angaben des gewählten Customers
%>
<!-- hier steht die Form -->

<%
' ------------- Recordset wird geschlossen und zerstört
 rs.Close
 set rs = nothing
 
' ------------- Update des Recordsets mit UPDATE
if Request.Form("update") = "Update" then
 conn.Execute "UPDATE Customers SET CompanyName = '" _
 & Request.Form("companyname") _
 & "', ContactName = '" & Request.Form("contactname") _
 & "', City = '" & Request.Form("city") _
 & "' where CustomerID = " & Request.Querystring("id") & ";"
 
' ------------- zerstören der Verbindung zur DB
 set conn = nothing
 
' ------------- datagrid.asp aufrufen über Response.Redirect
 Response.Redirect "datagrid.asp"
end if
%>
</BODY>
</HTML>


Um die Schreibweise für das Update klarzustellen, hier eine einfachere und kürzere Ausführung.
UpdateString = "UPDATE Customers set CompanyName = 'neuerCompanyName', ContactName = 'neuerContactName' WHERE CustomerID = dieCustomerID;"
conn.Execute UpdateString


DevTrain Camp - Schneller zum .NET 3.5 Developer
 
Verwandte Artikel      Verlinkte Dokumente
    Keine verknüpften Dokumente

  Erfasst am: 19.01.2001
  Gültig bis: 28.03.2001
22 Ratings
Bewertung: 39,1%
schlecht    sehr gut  

 
© Copyright 2007 ppedv AG