| MMKit Forums » » Asp » » Syntax error in INSERT INTO statement. | | | | Autore | Topic: Syntax error in INSERT INTO statement. |
|---|
alessandra73
Membro Junior

Con noi da: 16-07-2006
Posts: 77
Da:
 | Inviato il: 28-04-2008 14:39
Ciao a tutti
un errore inspiegabile
Microsoft JET Database Engine error '80040e14'
Syntax error in INSERT INTO statement.
non capisco il perchè, stranamente appare dopo che ho inserito al form d'inserimento un upload di file
e la cosa ancora più strana è che il file lo carica nella cartella public ma i dati no!
Qualcuno perfavore sa dire il perchè? Grazie
ciao Alessandra
----------------- Alessandra
|
Ganasa
Moderatore

Con noi da: 12-07-2001
Posts: 2149
Da: Malonno - ValleCamonica
 | Inviato il: 29-04-2008 03:03
Evidentemente c'è un errore nella query di INSERT, potresti postarla o, comunque, postare il pezzo di codice interessato?
----------------- ::: Michele Mariotti :::
Esistono 10 tipi di persone al mondo... chi conosce il binario e chi no!
|
alessandra73
Membro Junior

Con noi da: 16-07-2006
Posts: 77
Da:
 | Inviato il: 30-04-2008 16:07
ti ringrazio, ho fatto anche controllare i permessi di scrittura e lettura ma niente non sono quelli
riporto il codice d'inserimento, non ci riesco proprio ad arrivare, oltrettutto inserisce l'immagine nella cartella /public ma nessun dato
<%
' *** Insert Record: (Modified for File Upload) set variables
'If (CStr(UploadFormRequest("MM_insert")) = "form1") Then
If (CStr(UploadFormRequest("MM_insert")) <> "") Then
MM_editConnection = MM_cnnNegozio_STRING
MM_editTable = "Prodotti"
MM_editRedirectUrl = "inserimento.asp"
MM_fieldsStr = "select|value|textfield2|value|textfield3|value|textfield|value|file|value|textfield4|value|textfield5|value|textfield6|value|textfield7|value|textfield8|value"
MM_columnsStr = "IDCategoria1|none,none,NULL|NomeProdotto1|',none,''|DescrizioneProdotto1|',none,''|PrezzoProdotto1|none,none,NULL|Foto1|',none,''|Foto2|',none,''|Foto3|',none,''|Quantita|',none,''|colori|',none,''|taglia|',none,''"
' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")
' set the form values
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(MM_i+1) = CStr(UploadFormRequest(MM_fields(MM_i)))
Next
' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And UploadQueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And UploadQueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & UploadQueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & UploadQueryString
End If
End If
End If
%>
<%
' *** Insert Record: (Modified for File Upload) construct a sql insert statement and execute it
Dim MM_tableValues
Dim MM_dbValues
If (CStr(UploadFormRequest("MM_insert")) <> "") Then
' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_formVal = MM_fields(MM_i+1)
MM_typeArray = Split(MM_columns(MM_i+1),",")
MM_delim = MM_typeArray(0)
If (MM_delim = "none") Then MM_delim = ""
MM_altVal = MM_typeArray(1)
If (MM_altVal = "none") Then MM_altVal = ""
MM_emptyVal = MM_typeArray(2)
If (MM_emptyVal = "none") Then MM_emptyVal = ""
If (MM_formVal = "") Then
MM_formVal = MM_emptyVal
Else
If (MM_altVal <> "") Then
MM_formVal = MM_altVal
ElseIf (MM_delim = "'") Then ' escape quotes
MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'"
Else
MM_formVal = MM_delim + MM_formVal + MM_delim
End If
End If
If (MM_i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End If
MM_tableValues = MM_tableValues & MM_columns(MM_i)
MM_dbValues = MM_dbValues & MM_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")
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
%>
ciao, Alessandra
----------------- Alessandra
|
alessandra73
Membro Junior

Con noi da: 16-07-2006
Posts: 77
Da:
 | Inviato il: 01-05-2008 08:33
Risolto
il codice era giusto!!!!!
In pratica dipendeva dal campo prezzo che essendo in db valuta, lasciandolo vuoto in fase d'inserimento lo prendeva come spazio bianco ossia carattere.
Non vi dico quanti gg. ci sono stata sopra per capire provare e riprovare.
Ciao
----------------- Alessandra
|  | | | | - Visualizza la versione da stampa - Segnala questo thread al moderatore - Aggiungi questo thread alla tua lista preferiti [Visualizza] - Non voglio più ricevere nessuna mail riguardo questo thread
|
|
|