Announcement
Collapse
No announcement yet.
ASP und ACCESS
Collapse
X
-
Hallo,
das könnte in der ASP so aussehen:
<pre>
Dim sConnStr, sSQL
Dim aConn, aRS, aPC
sConnStr = "Provider=.... (Verbindungsstring zur ACCESS-Datenbank)"
IF IsEmpty(Request.Form("TSpalte1")) THEN
' keine Daten -> Formular anzeigen
ELSE
' Daten -> in Datenbank einfügen
Set aConn = Server.CreateObject("ADODB.Connection")
aConn.Open sConnStr
sSQL = "INSERT INTO Ergebnisse (Spalte1, Spalte2, Spalte3) VALUES ('" & _
Request.Form("TSpalte1") & "', '" & Request.Form("SSpalte2") & "', CURRENT_TIMESTAMP)"
aConn.Execute sSQL
Response.Redirect "AddOK.asp"
END IF
</pre>
Comment