Vesuche mal die datums mit # datum #

Gruss

Roman Pittroff
Consulting
Bangkok, Thailand 

-----Original Message-----
From: Roland Stirnimann [mailto:[EMAIL PROTECTED]] 
Sent: Saturday, October 20, 2001 2:14 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] Insert Problem


Hallo 
Ich habe ein Problem bei einem Insert Statement. Folgende Werte sollen
in die Access DB geschrieben werden: 
Kursbezeichnung: Motorradkurs 
Treffpunkt: Rottal Gel�nde 
Material: Motorrad und gute Kleider 
Bemerkungen: Bei jedem Wetter 
Startzeit: 07:10 
Endzeit: 17:30 
Startdatum: 02.04.2002 
Enddatum: 09.04.2002 
Kurstyp: 2 (Feld der DB, welches in einer Beziehung steht) 
Kursstatus: 2 (Feld der DB, welches in einer Beziehung steht) 
Diese Werte sind unten im SQL Statement als Variablen enthalten. 
Und so sieht die Fehlermeldung aus: 
Microsoft OLE DB Provider for ODBC Drivers- Fehler '80004005' 
[Microsoft][ODBC Microsoft Access Driver] Operation muss eine
aktualisierbare Abfrage verwenden. 
/admin/speichern.asp, line 40 
Folgender Code verwende ich: 
<% 
Dim
pfad,treiber,bezeichnung,treffpunkt,material,bemerkungen,startzeit,endze
it,startdatum,enddatum,kurstyp,status,sql_eintragen
bezeichnung = Request.Form("bezeichnung") 
treffpunkt = Request.Form("treffpunkt") 
material = Request.Form("material") 
startzeit = Request.Form("startzeit_h") & ":" &
Request.Form("startzeit_min") 
endzeit = Request.Form("endzeit_h") & ":" & Request.Form("endzeit_min") 
startdatum = Request.Form("starttag_mr") & "." &
Request.Form("startmonat_mr") & "." & Request.Form("startjahr_mr") 
enddatum = Request.Form("endtag_mr") & "." & Request.Form("endmonat_mr")
& "." & Request.Form("endjahr_mr") 
kurstyp = Request.Form("kurstyp") 
status = Request.Form("status") 
if Request.Form("bemerkungen")="" then bemerkungen="keine besonderen
Bemerkungen" else bemerkungen=Request.Form("bemerkungen") end if 
Set dbverbindung = Server.CreateObject("ADODB.Connection") 
pfad = Server.MapPath("kurse.mdb") 
treiber = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & pfad 
dbverbindung.Open(treiber) 
sql_eintragen = "INSERT INTO MOTORRADKURSE
(MR_ST_ID,MR_STARTDATUM,MR_ENDDATUM,MR_T_ID,MR_STARTMORGEN,MR_ENDEABEND,
MR_MATERIAL,MR_TREFFPUNKT,MR_BEZEICHNUNG,MR_BEMERKUNGEN) VALUES (" &
STATUS & ",'" & STARTDATUM & "','" & ENDDATUM & "'," & KURSTYP & ",'" &
STARTZEIT & "','" & ENDZEIT & "','" & MATERIAL & "','" & TREFFPUNKT &
"','" & BEZEICHNUNG & "','" & BEMERKUNGEN & "')" 
dbverbindung.Execute(sql_eintragen) 
dbverbindung.Close 
%> 
Ich habe genau das Statement auch mit Access als Abfrage probiert mit
den genau gleichen Werten wie oben. Es hat bestens funkioniert.
Was l�uft hier falsch? Vielen Dank f�r Eure Hilfe. 
Mit freundlichen Gr�ssen 
Roland Stirnimann 
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ |
[aspdebeginners] als [EMAIL PROTECTED] subscribed |
http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie
knnen sich unter folgender URL an- und abmelden: |
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp 


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an