
05/11/2006, 21:20
|
 | | | Fecha de Ingreso: septiembre-2006 Ubicación: Lima, Perú
Mensajes: 118
Antigüedad: 18 años, 7 meses Puntos: 0 | |
Error por query largo Hola foreros aki un errorcito q no se como resolver!! .. como veran mi command text esta muy largo y bueno necesito hacer el salto para la siguiente linea para continuar con el comando pero ... lo hice con el tipico _& pero me da error me dice que hay error cerca de Telefono .. pueden ver el codigo siguiente para revisar no se q esta mal a ver si me dan una ayudadita :$ con este salto de linea
Public Sub Modificar_Estudiante(oEstudianteTO As EstudianteTO)
On Error GoTo MiError
EstudianteDAO
Set cm = New ADODB.Command
With cm
.ActiveConnection = cn
.CommandType = adCmdText
.CommandText = "UPDATE Estudiante set Id_Colegio='" & oEstudianteTO.GetEstudiante_Id_Colegio & "', Nombre='" & oEstudianteTO.GetEstudiante_Nombre & "', Sexo='" & oEstudianteTO.GetEstudiante_Sexo & "', Grado='" & oEstudianteTO.GetEstudiante_Grado & "', Seccion='" & oEstudianteTO.GetEstudiante_Seccion & "', Edad='" & oEstudianteTO.GetEstudiante_Edad & "', Direccion='" & oEstudianteTO.GetEstudiante_Direccion & "', Id_Distrito = '" & oEstudianteTO.GetEstudiante_Id_Distrito & "', E_mail = '" & oEstudianteTO.GetEstudiante_E_mail & "' " & _
(siguiente linea)
" Telefono = '" & oEstudianteTO.GetEstudiante_Telefono & "', ReferenciaTelf = '" & oEstudianteTO.GetEstudiante_ReferenciaTelf & "', TipoTelf = '" & oEstudianteTO.GetEstudiante_TipoTelf & "', Id_medio = '" & oEstudianteTO.GetEstudiante_Id_Medio & "', Ocupacion = '" & oEstudianteTO.GetEstudiante_Ocupacion & "', Institucion = '" & oEstudianteTO.GetEstudiante_Institucion & "', Estado = '" & oEstudianteTO.GetEstudiante_Estado & "' WHERE Id_Estudiante='" & oEstudianteTO.GetEstudiante_Id_Estudiante & "'""
.Execute
End With
Exit Sub
MiError:
MsgBox Err.Description, vbCritical, "Error"
End Sub
*donde dice siguiente linea es la linea siguiente del commandtext .. esta bien hacerlo d esa forma? o toi mal?
gracias |