Visual Basic - Alguien que me ayude

Life is soft - evento anual de software empresarial
 
Vista:

Alguien que me ayude

Publicado por joss (1 intervención) el 12/09/2002 01:42:03
Hola, soy nuevo en programacion, estoy realizando una aplicacion pero en mi codigo no encuentro cual es mi error alguien que le de una mirada a mis lineas para ayudarme a encontrar mi error gracias...
_______________________________________________________
Private Sub CmdGuardar_Click()
______________________________________________________
Dim Codigo As Integer
Dim nombre As String
Dim direccion As String
Dim telefono As String
Dim ciudad As String
Dim fax As String
Dim fecha_nacimiento As Variant
Dim fecha_ingreso As Variant
Dim codigo_ingreso As Integer
Dim stock As Integer

Set cnconexion = New ADODB.Connection
Set cmdcommand = New ADODB.Command
Inicia
cnconexion.Open CadenaConexion
cmdcommand.cmdtext = "INSERT INTO Catalogo_Clientes(codigo, nombre, direccion, telefono, ciudad, fax, fecha_nacimiento, fecha_ingreso, codigo_ingreso, stock)"
cmdcommand.cmdtext=cmdcommand.cmdtext & " values " ('" & Codigo & "'," & nombre & "'," & direccion & "'," & telefono & "'," & ciudad & "'," & fax & "'," & fecha_nacimiento & "'," & fecha_ingreso & "'," & codigo_ingreso & "'," & stock & " )"
cmdcommand.CommandType = adCmdText
Set cmdcommand.ActiveConnection = cnconexion
Set rsrecordset = cmdcommand.Execute

cnconexion.Close
--------------------------------------------------------------------------------------------------
me marca el sig. error:
end of statement, en la linea donde esta el "values".

Gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Alguien que me ayude

Publicado por Luis Fdo Melo (49 intervenciones) el 12/09/2002 05:47:58
Hola
Es dificil saber cual es el error cuando no has especificado con que base de datos estas trabajando, ese detalle es mas importante que cualquier otra cosa...

Voy a suponer que estas trabajando con Access, en tal caso los campos fecha debes manejarlos de la siguiente manera

1. NO los definas como variant, definalos como date
2. el formato en que se añade debe ser mm/dd/yyyy hh:nn:ss
3. NO se usa comillas simples para agruparlo, sino #

ejemplo:

........, "#" & cdate(fecha_nacimiento,"mm/dd/yyyy") & "#," .........

Recomendacion, crea un variable para almacenar la consulta ...

ejecuta la consulta almacenada por ejemplo en la variable sql, de la siguiente manera

cnconexion.Execute sql,registrosafectados


Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar