Wie meinst ihr das ??
Auskommentieren von set rs nicht vergessen!
H��� was soll ich machen?
Also er updatet zwar die DB, aber er erzeugt au�erdem noch einen weitern
Benutzer mit den gleichen Variblen.
Was ist da falsch ??
Ich hoffe ihr k�nnt mir helfen.
Hier der aktuelle "ganze" Quellcode:
<%
on error resume next
Vorname = Request.Form("Vorname")
Nachname = Request.Form("Nachname")
email = Request.Form("email")
url = Request.Form("url")
wohnort = Request.Form("wohnort")
nickname = Request.Form("nickname")
passwort = Request.Form("passwort")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DSN=DM90_user;"
strSQL = "UPDATE User "
strSQL = strSQL & "SET Vorname='" & Vorname
strSQL = strSQL & "', Nachname='" & Nachname
strSQL = strSQL & "', email='" & email
strSQL = strSQL & "', url='" & url
strSQL = strSQL & "', wohnort='" & wohnort
strSQL = strSQL & "', Nickname='" & Nickname
SQLStmt = SQLstmt & "Passwort='" & Passwort & "'"
Conn.Execute (strSQL)
If err.number>0 then
response.write SQLstmt
response.write "VBScript Errors Occured:" & "<P>"
response.write "Error Number=" & err.number & "<P>"
response.write "Error Descr.=" & err.description & "<P>"
response.write "Help Context=" & err.helpcontext & "<P>"
response.write "Help Path=" & err.helppath & "<P>"
response.write "Native Error=" & err.nativeerror & "<P>"
response.write "Source=" & err.source & "<P>"
response.write "SQLState=" & err.sqlstate & "<P>"
else
response.write "Deine Daten wurden �berarbeitet!" & "<P>"
response.Redirect"../login.asp"
end if
IF conn.errors.count> 0 then
response.write "Database Errors Occured" & "<P>"
for counter= 0 to conn.errors.count
response.write "Error #" & conn.errors(counter).number & "<P>"
response.write "Error desc. -> " & conn.errors(counter).description &
"<P>"
next
else
response.Redirect"../login.asp"
end if
set rstemp=nothing
Conn.Close
set conntemp=nothing
----- Original Message -----
From: "Oliver Pusnik" <[EMAIL PROTECTED]>
To: "ASP Diskussionsliste fuer Anfaenger" <[EMAIL PROTECTED]>
Sent: Tuesday, October 23, 2001 5:33 AM
Subject: [aspdebeginners] RE: Error #-2147217900
> und dass Komma hinter var Passwot weglassen in Zeile
>
> SQLStmt = SQLstmt & "Passwort='" & Passwort & "'"
>
> olli
> ----- Original Message -----
> From: "Ralf-Michael Wolf" <[EMAIL PROTECTED]>
> To: "ASP Diskussionsliste fuer Anfaenger" <[EMAIL PROTECTED]>
> Sent: Tuesday, October 23, 2001 12:34 AM
> Subject: [aspdebeginners] RE: Error #-2147217900
>
>
> �nder das mal so ab und mail das was du dann auf dem schirm hast...
>
> Set Conn = Server.CreateObject("ADODB.Connection")
> conn.open "DSN=DM90_user;"
> SQLstmt = "UPDATE User FIELDS
> SQLStmt = SQLstmt & "Vorname='" & Vorname & "',"
> SQLStmt = SQLstmt & "Nachname='" & Nachname & "',"
> SQLStmt = SQLstmt & "email='" & email & "',"
> SQLStmt = SQLstmt & "url='" & url & "',"
> SQLStmt = SQLstmt & "wohnort='" & wohnort & "',"
> SQLStmt = SQLstmt & "Nickname='" & Nickname & "',"
> SQLStmt = SQLstmt & "Passwort='" & Passwort & "',"
> Response.write(SQLStmt)
> 'Set RS = Conn.Execute(SQLStmt)
>
> Auskommentieren von set rs nicht vergessen!
>
> Gru�
> ralf
>
>
> -----Original Message-----
> From: Fichte [mailto:[EMAIL PROTECTED]]
> Sent: Montag, 22. Oktober 2001 21:27
> To: ASP Diskussionsliste fuer Anfaenger
> Subject: [aspdebeginners] Error #-2147217900
>
>
> Ich erhalte immer noch folgende Fehlermeldung:
> Error #-2147217900
>
> Error desc. -> [Microsoft][ODBC Microsoft Access Driver] Syntaxfehler in
> UPDATE-Anweisung.
>
>
> Die Sache mit "response.write SQLstmt" hat irgentwie nicht funktioniert.
> Ich denke mal, der Fehler mu� im folgend Script Teil sein.
>
> Schaut ihn euch mal an !! Bitte
>
>
> cu Fichte
>
>
> Hier der Quellcode:
>
> Set Conn = Server.CreateObject("ADODB.Connection")
> conn.open "DSN=DM90_user;"
> SQLstmt = "UPDATE User FIELDS
> SQLStmt = SQLstmt & "Vorname='" & Vorname & "',"
> SQLStmt = SQLstmt & "Nachname='" & Nachname & "',"
> SQLStmt = SQLstmt & "email='" & email & "',"
> SQLStmt = SQLstmt & "url='" & url & "',"
> SQLStmt = SQLstmt & "wohnort='" & wohnort & "',"
> SQLStmt = SQLstmt & "Nickname='" & Nickname & "',"
> SQLStmt = SQLstmt & "Passwort='" & Passwort & "',"
> Set RS = Conn.Execute(SQLStmt)
>
>
> | 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
>
>
>
> | 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
