Visual Basic - problemas con la insert

Life is soft - evento anual de software empresarial
 
Vista:

problemas con la insert

Publicado por maite (3 intervenciones) el 18/11/2007 16:41:25
ola: he conseguido insertar datos en la base de datos, pero ahora tengo otra duda, haber si me sabe alguien ayudar:

Tengo una sentencia insert muy larga y no me deja escribir mas cosas en la misma linea, como puedo hacer esa sentencia insert en 2 lineas para así poder insertar en la base de datos todos los campos?

Mi sentencia insert es la siguiente:

cnn.Execute "INSERT INTO UNIDAD_DOCUMENTAL Values ('" & IIf(IsNull(TxtId) Or TxtId = "", " ", TxtId) & "', '" & IIf(IsNull(TxtSignatura) Or TxtSignatura = "", " ", TxtSignatura) & "', '" & IIf(IsNull(TxtCodigo) Or TxtCodigo = "", " ", TxtCodigo) & "','" & IIf(IsNull(TxtCreacion) Or TxtCreacion = "", " ", TxtCreacion) & "','" & IIf(IsNull(TxtExtremas) Or TxtExtremas = "", " ", TxtExtremas) & "','" & IIf(IsNull(TxtDigitalizacion) Or TxtDigitalizacion = "", " ", TxtDigitalizacion) & "','" & IIf(IsNull(TxtTitulo) Or TxtTitulo = "", " ", TxtTitulo) & "','" & IIf(IsNull(TxtAtribuido) Or TxtAtribuido = "", " ", TxtAtribuido) & "','" & IIf(IsNull(TxtDescripcion) Or TxtDescripcion = "", " ", TxtDescripcion) & "','" & IIf(IsNull(TxtFondo) Or TxtFondo = "", " ", TxtFondo) & "','" & IIf(IsNull(TxtUnidades) Or TxtUnidades = "", " ", TxtUnidades) & "','" & IIf(IsNull(TxtMaterial) Or TxtMaterial = "", " ", TxtMaterial) & "','" & IIf(IsNull(TxtTono) Or TxtTono = "", " ", TxtTono) & "')"

Aun necesito otros 3, peroo me salta a la siguiente linea y me da error.

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:problemas con la insert

Publicado por ivan (1039 intervenciones) el 19/11/2007 17:26:32
Dim sql As String

sql = "INSERT INTO UNIDAD_DOCUMENTAL Values ('" & IIf(IsNull(TxtId) Or TxtId = "", " ", TxtId) & "', '" & IIf(IsNull(TxtSignatura) Or TxtSignatura = "", " ", TxtSignatura) & "', '" & IIf(IsNull(TxtCodigo) Or TxtCodigo = "", " ", TxtCodigo) & "','" & IIf(IsNull(TxtCreacion) Or TxtCreacion = "", " ", TxtCreacion) & "','" & IIf(IsNull(TxtExtremas) Or TxtExtremas = "", " ", TxtExtremas) & "','" & IIf(IsNull(TxtDigitalizacion) Or TxtDigitalizacion = "", " ", TxtDigitalizacion) & "','" & IIf(IsNull(TxtTitulo) Or TxtTitulo = "", " ", TxtTitulo) & "','" & IIf(IsNull(TxtAtribuido) Or TxtAtribuido = "", " ", TxtAtribuido) & "','" & IIf(IsNull....................................... etc, etc

cnn.Execute sql
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

RE:problemas con la insert

Publicado por HECTOR (1 intervención) el 15/05/2008 20:06:13
HOLA QUE TAL
MIRA PUEDES UTILIZAR EL CAACTER GUION BAJO ( _ )
EJEMPLO:

dim cadena as string

cadena="esto es una prueba de como usar varias lineas en visual basic" & _
"utilizando el caracter guion bajo para ello" & _
"By HECTOR"




saludos
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