Wie kommst Du darauf, dass der Fehler gerade in dem automatisch
generierten DW-Standardcode ist?

So ist das nur Raterei...
1. Komplette Fehlermeldungen angeben
2. Kompletten Code posten (der Inhalt der Variablen wird
h�chstwahrscheinlich den Fehler verursachen)
3. Am besten zus�tzlich noch auf einer Testsite ablegen, damit das
nachvollzogen werden kann

Gruss Karl

> -----Original Message-----
> From: Tony D�tschler [mailto:[EMAIL PROTECTED]] 
> Sent: Tuesday, June 11, 2002 5:05 PM
> To: ASP Diskussionsliste fuer Anfaenger
> Subject: [aspdebeginners] dreamweaver bull...
> 
> 
> hallo leute
> 
> mein i.e. findet, dass dieser code einen fehler hat. was 
> meint ihr dazu?
> 
> If (CStr(Request("MM_insert")) <> "") Then
> 
>   ' create the sql insert statement
>   MM_tableValues = ""
>   MM_dbValues = ""
>   For i = LBound(MM_fields) To UBound(MM_fields) Step 2
>     FormVal = MM_fields(i+1)
>     MM_typeArray = Split(MM_columns(i+1),",")
>     Delim = MM_typeArray(0)
>     If (Delim = "none") Then Delim = ""
>     AltVal = MM_typeArray(1)
>     If (AltVal = "none") Then AltVal = ""
>     EmptyVal = MM_typeArray(2)
>     If (EmptyVal = "none") Then EmptyVal = ""
>     If (FormVal = "") Then
>       FormVal = EmptyVal
>     Else
>       If (AltVal <> "") Then
>         FormVal = AltVal
>       ElseIf (Delim = "'") Then  ' escape quotes
>         FormVal = "'" & Replace(FormVal,"'","''") & "'"
>       Else
>         FormVal = Delim + FormVal + Delim
>       End If
>     End If
>     If (i <> LBound(MM_fields)) Then
>       MM_tableValues = MM_tableValues & ","
>       MM_dbValues = MM_dbValues & ","
>     End if
>     MM_tableValues = MM_tableValues & MM_columns(i)
>     MM_dbValues = MM_dbValues & FormVal
>   Next
>   MM_editQuery = "insert into " & MM_editTable & " (" & 
> MM_tableValues & ") values (" & MM_dbValues & ")"
> 
>   If (Not MM_abortEdit) Then
>     ' execute the insert
>     Set MM_editCmd = 
> Server.CreateObject("ADODB.Command")<--HIER SOLLTE DER FEHLER? SEIN--
>     MM_editCmd.ActiveConnection = MM_editConnection
>     MM_editCmd.CommandText = MM_editQuery
>     MM_editCmd.Execute
>     MM_editCmd.ActiveConnection.Close
> 
>     If (MM_editRedirectUrl <> "") Then
>       Response.Redirect(MM_editRedirectUrl)
>     End If
>   End If
> 
> End If
> 
> 
> dank euch f�r eure hilfe!!!!!!!!!! (komm einfach nicht drauf)
> 
> bless
> tony
> 
> 
> | 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/anme>
lden/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