PROBLEMAS CON INSERT en SQL

[PedroJTR]

Saludos Amigos,

Tengo un problema en mis codigos INSERT... Resulta que me dice que tengo menos columnas en la Instruccion INSERT que valores en las clausulas VALUES. Pero esto me aparece cuando trato de insertar decimales.

Me pueden ayudar en esto please??... Es lo unico que me flata para culminar un proyecto importante para mañana!.. Estoy Locoooo!

Aqui les dejo mi codigo:

Código:

'SQL_CERTIFICADO = "Insert Into CERTIFICADO (IDEPOL,NUMCERT,STSCERT,DESCCERT,FECING,CODCLI,CODCLIFACT,CODOFISUSC,CODOFIEMI,CLASERIESGO) " & "Values(" & idepol & "," & certificado & ",'" & Request.Form("STSPOL") & "','" & DESCCERT & "','" & Request.Form("FECEMI") & "','" & codcli & "','" & codclifact & "','" & Request.Form("sucsus") & "','" & Request.Form("sucemi") & "','" & CLASERIESGO & "')"
'INSERT_RS.open SQL_CERTIFICADO,DB
'SQL_CERT_VEH = "Insert Into CERT_VEH (IDEPOL,NUMCERT,CODMODELO,CODMARCA,CODDESTINADO,NUMPLACA,ANOVEH,CANTTONELADA,NUMPUESTOS,TIPOVEH,COLOR,SERIALCARROCERIA,SERIALMOTOR,CLASEVEH,INDFABRIC,CANTKMS,TIPOTRANS,TIPVEH,TIPOVEHTAR) " & "Values(" & idepol & "," & certificado & ",'" & Request.Form("modelo") & "','" & Request.Form("marca") & "','" & Request.Form("uso_vehiculo") & "','" & Request.Form("numero_placa") & "','" & Request.Form("ano_vehiculo") & "','" & Request.Form("toneladas_vehiculo") & "','" & Request.Form("numero_puestos") & "','" & Request.Form("tipo") & "','" & Request.Form("color_vehiculo") & "','" & Request.Form("serial_carroceria") & "','" & Request.Form("serial_motor") & "','" & Request.Form("clase") & "','" & Request.Form("fabricacion") & "','" & Request.Form("kilometros_vehiculo") & "','" & Request.Form("transmision") & "','" & Request.Form("clase") & "','" & Request.Form("tarifa") & "')"
'INSERT_RS.open SQL_CERT_VEH,DB
Dim COSASPRIMA, COSASSUMA, COSASTASA, PERSONASPRIMA, PERSONASSUMA, PERSONASTASA
COSASPRIMA = Request.Form("cosas_prima")
COSASPRIMA = CSng(COSASPRIMA)
COSASSUMA = Request.Form("cosas_suma")
COSASSUMA = CSng(COSASSUMA)
COSASTASA = Request.Form("cosas_tasa")
COSASTASA = CSng(COSASTASA)
PERSONASPRIMA = Request.Form("personas_prima")
PERSONASSUMA = Request.Form("personas_suma")
PERSONASTASA = Request.Form("personas_tasa")
'SQL_COBERT_CERT_cosas = "Insert Into COBERT_CERT (IDECOBERT,IDEPOL,NUMCERT,CODRAMOCERT,CODPLAN,REVPLAN,CODCOBERT,STSCOBERT,SUMAASEGMONEDA,TASA,PRIMAMONEDA,MTOTOTRECAMONEDA,CODMONEDA,SUMAASEG,PRIMA,FECINIVALID,FECFINVALID,INDINCREN,INDPLAZOESPERA,INDSUMADED,PORCDED,MTODEDMIN,BASEDED,PORCDESC,PORCREEMB,PORCMINASEG)" & "Values(" & idcobert_cosas & "," & idepol & "," & certificado & ",'" & Request.Form("codpro") & "','" & Request.Form("CODPLAN") & "','" & Request.Form("REVPLAN") & "','" & COSAS & "','" & Request.Form("STSPOL") & "'," & COSASSUMA & "," & COSASTASA & "," & COSASPRIMA & "," & CERO & ",'" & Request.Form("CODMONEDA") & "'," & COSASSUMA & "," & COSASPRIMA & ",'" & Request.Form("vPolizaDesde") & "','" & fechafin & "','" & Request.Form("INDINCREN") & "','" & Request.Form("INDPLAZOESPERA") & "','" & Request.Form("INDSUMADED") & "',"& CERO &","& CERO &",'" & Request.Form("BASEDED") & "',"& CERO &","& CIEN1 &","& CERO &")"
'INSERT_RS.open SQL_COBERT_CERT_cosas,DB
'SQL_COBERT_CERT_personas = "Insert Into COBERT_CERT (IDECOBERT,IDEPOL,NUMCERT,CODRAMOCERT,CODPLAN,REVPLAN,CODCOBERT,STSCOBERT,SUMAASEGMONEDA,TASA,PRIMAMONEDA,MTOTOTRECAMONEDA,CODMONEDA,SUMAASEG,PRIMA,FECINIVALID,FECFINVALID,INDINCREN,INDPLAZOESPERA,INDSUMADED,PORCDED,MTODEDMIN,BASEDED,PORCDESC,PORCREEMB,PORCMINASEG)" & "Values(" & idcobert_personas & "," & idepol & "," & certificado & ",'" & Request.Form("codpro") & "','" & Request.Form("CODPLAN") & "','" & Request.Form("REVPLAN") & "','" & PERSONAS & "','" & Request.Form("STSPOL") & "'," & PERSONASSUMA & "," & PERSONASTASA & "," & PERSONASPRIMA & "," & CERO & ",'" & Request.Form("CODMONEDA") & "'," & PERSONASSUMA & "," & PERSONASPRIMA & ",'" & Request.Form("vPolizaDesde") & "','" & fechafin & "','" & Request.Form("INDINCREN") & "','" & Request.Form("INDPLAZOESPERA") & "','" & Request.Form("INDSUMADED") & "',"& CERO &","& CERO &",'" & Request.Form("BASEDED") & "',"& CERO &","& CIEN1 &","& CERO &")"
'INSERT_RS.open SQL_COBERT_CERT_personas,DB
'SQL_MOD_COBERT_cosas= "Insert Into MOD_COBERT (IDEPOL,NUMCERT,CODRAMOCERT,IDECOBERT,NUMMOD,ORIGMODCOBERT,STSMODCOBERT,SUMAASEGMONEDA,TASA,PRIMAMONEDA,PRIMAFACTMONEDA,CODMONEDA,FECINIVALID,FECFINVALID,INDINCREN,INDPLAZOESPERA,IDEMOVPRIMAT,IDEMOVPRIMA)" & "Values(" & idepol & "," & certificado & ",'" & Request.Form("codpro") & "'," & modcobert_cosas & "," & CERO & ",'" & Request.Form("ORIGMODCOBERT") & "','" & Request.Form("STSPOL") & "'," & COSASSUMA & "," & COSASTASA & "," & COSASPRIMA & "," & COSASPRIMA & ",'" & Request.Form("CODMONEDA") & "','" & Request.Form("vPolizaDesde") & "','" & Request.Form("vPolizaHasta") & "','" & Request.Form("INDINCREN") & "','" & Request.Form("INDPLAZOESPERA") & "'," & IDEMOVPRIMAT & "," & IDEMOVPRIMA & ")"
'INSERT_RS.open SQL_MOD_COBERT_cosas,DB
SQL_MOD_COBERT_personas= "Insert Into MOD_COBERT (IDEPOL,NUMCERT,CODRAMOCERT,IDECOBERT,NUMMOD,ORIGMODCOBERT,STSMODCOBERT,SUMAASEGMONEDA,TASA,PRIMAMONEDA,PRIMAFACTMONEDA,CODMONEDA,FECINIVALID,FECFINVALID,INDINCREN,INDPLAZOESPERA,IDEMOVPRIMAT,IDEMOVPRIMA)" & "Values(" & idepol & "," & certificado & ",'" & Request.Form("codpro") & "'," & modcobert_personas & "," & CERO & ",'" & Request.Form("ORIGMODCOBERT") & "','" & Request.Form("STSPOL") & "'," & PERSONASSUMA & "," & PERSONASTASA & "," & PERSONASPRIMA & "," & PERSONASPRIMA & ",'" & Request.Form("CODMONEDA") & "','" & Request.Form("vPolizaDesde") & "','" & Request.Form("vPolizaHasta") & "','" & Request.Form("INDINCREN") & "','" & Request.Form("INDPLAZOESPERA") & "'," & IDEMOVPRIMAT & "," & IDEMOVPRIMA & ")"
INSERT_RS.open SQL_MOD_COBERT_personas,DB

[Muzztein]

supongo que si te da problemas con los decimales y te da ese error es por que estas usando comas en vez de puntos.

intenta colocar los decimales con puntos en vez de comas.

si el campo en el que quieres grabar no es para guardar numeros, entonces guardalos como quieras pero utilizando comillas simples, tal cual como si fuera un varchar.

[Adler]

Hola

En el caso que no tuvieras la opción de poder controlar lo que el usuario inserta en el campo, o son operaciones matemáticas, puedes usar Replace para reemplazar la coma por punto

Suerte

[pcarvajal]

Asi te queda mas claro ;)
<%
numero="2,56"
valor=Replace(numero,",",".")
response.write valor
%>
Saludos!

[PedroJTR]

Iniciado por pcarvajal

Asi te queda mas claro ;)
<%
numero="2,56"
valor=Replace(numero,",",".")
response.write valor
%>
Saludos!

Exacto amigo, asi mismo lo hice!...
Buscando y buscando lo logré!... Muchas Gracias, espero que a muchos le sirva siempre aprendemos alo nuevo! ;)

[adiazm]

de todas maneras, prueba a crear un float como campo.


por otra parte, tienes que ver la configuración de moneda que posee el servidor.