Problemas Con Insert Into

[ivangar]

Hola amigos, alguien me puede ayudar para saber porque me aparece este error??

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis en la instrucción INSERT INTO.
/mail.asp, line 116

:::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::::::::::::::::::::::::::: ::::::
Y ESTE ES MI CODIGO, PERO NO SÉ DONDE ESTE EL ERROR!!!

<%
' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If (CStr(Request("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 AQUI ESTA LA LINEA 116 DONDE OCURRE EL ERROR
MM_editCmd.ActiveConnection.Close

If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If

End If
%>


saludos!!!

Iván

[Myakire]

ocupas postear el resultado de las concatenaciones:

MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"
response.write MM_editQuery
response.end

[ivangar]

mm no entiendo Myakire, me puedes ayudar??, el problema es que ni siquiera se guardan los datos en la tabla de acces y quisiera saber porque??

saludos

[Myakire]

Agrega las dos lineas que te indiqué y postea el resultado

MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"
response.write MM_editQuery
response.end

[ivangar]

ya las agregué pero aún así sigue sin enviar los datos a la tabla en access, además de que la pagina cuando le doy clic en enviar no me aparece nada



Saludos

[univercity]

mmmm, esta muy entretenido tu srcipts pero no veo donde estas recuperando los datos de tu Form...





dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("./bdwine/tuBD.mdb"))


Sql = "SELECT * FROM tutabla "
rst.Open Sql,cnn,3,3

Rst.AddNew
Rst("campo1") = request.form("dato1")
Rst("campo2") = request.form("dato2")
Rst.Update

' Creo que es mas simple... prueba.

Slds.

[El_Metallick]

por lo que veo al principio tienes las variables MM_tableValues y MM_dbValues pero no les asignas ningun valor... prueba dandole el valor del request en el eventyual caso como comenta nuestro amigo university arriba o ponle los valores correspondienentes... prueba con esto y nos avisas saludos

[AlZuwaga]

Iniciado por Myakire

Agrega las dos lineas que te indiqué y postea el resultado

MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"
response.write MM_editQuery
response.end

Hasta que no hagas lo que Myakire comenta y cito acá arriba, ivangar, nada podemos hacer por dos motivos:

1- Los scripts generados por macomedia son perfectos (bah!... no "perfectos", pero andan bien... al menos nunca podrían dar un Error de sintaxis en la instrucción INSERT INTO)

2- Me suena a que es un error de "palabra reservada" en un nombre de campo o tabla... pero como no sabemos como se llama la tabla (MM_editTable) ni los campos (MM_tableValues)... bueno... está como un poquito jodido ¿no te parece?

Dale, se buenito y hacé lo que Myakire te está pidiendo que hagas desde ayer :)