• Domingo 22 de Diciembre de 2024, 18:15
« anterior próximo »
Páginas: [1]

Autor Tema:  Update  (Leído 2387 veces)

juravi

  • Miembro activo
  • **
  • Mensajes: 94
    • Ver Perfil
    • http://spaces.msn.com/members/ingjuan
Update
« en: Jueves 23 de Diciembre de 2004, 23:19 »
0
Hola amigos, tengo un problema al momento de actualizar un registro que es demasiado largo y toma mas de una linea de codigo en vb y sentencia sql

Miren por ejemplo.
Citar
Set Prueba = Nothing
Prueba.Open"Update from Tabla Valor = '" & Valor & "',Valor = '" & Valor & "',..   "_&
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..   "_&
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..   "_&
"Where ......",.......
Set Prueba = Nothing
[/color]

La pregunta es si conosen algo ademas de _& para unir lineas ya que esto me da error
si lo pongo asi no me da error

Citar
Set Prueba = Nothing
Prueba.Open"Update from Tabla Valor = '" & Valor & "',Valor = '" & Valor & "',..   "_&
"Where ......",.......
Set Prueba = Nothing
[/color]

Para ver si me pueden hechar la mano.
Saludos y Feliz Navidad :hola:
El Fin justifica los Medios
 _______________________
ﻞυגανι.Corp [The Designer]
<a href=\'mailto]No sé el secreto para llegar al éxito, pero sé que tratar de agradar a todos es lo que te llevará al fracaso... Piénsalo!!![/color]

ebolo

  • Miembro MUY activo
  • ***
  • Mensajes: 188
    • Ver Perfil
Re: Update
« Respuesta #1 en: Viernes 24 de Diciembre de 2004, 16:09 »
0
Hola juravi, prueba a ponerlo de esta forma.
Citar
Set Prueba = Nothing
Prueba.Open"Update from Tabla Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Where ......",.......
Set Prueba = Nothing

Es decir el guión al final después del & y con un espacio entre medias.
Saludos.
Felices Fiestas a todos.

juravi

  • Miembro activo
  • **
  • Mensajes: 94
    • Ver Perfil
    • http://spaces.msn.com/members/ingjuan
Re: Update
« Respuesta #2 en: Domingo 26 de Diciembre de 2004, 17:38 »
0
Que onda ebolo, jjajaja disculpa .. no se en que estaba pensando..
el codigo es asi como lo pusiste

Citar
Set Prueba = Nothing
Prueba.Open"Update from Tabla Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Valor = '" & Valor & "',Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Where ......",.......
Set Prueba = Nothing

Pero asi para varias lineas no me funciona.. Me manda error  solo acepta un solo & _
Osea:

Citar
Set Prueba = Nothing
Prueba.Open"Update from Tabla Valor = '" & Valor & "',Valor = '" & Valor & "',..  " & _
"Where ......",.......
Set Prueba = Nothing

si conoces otra forma me puedes decir....
Que pases Feliz año
El Fin justifica los Medios
 _______________________
ﻞυגανι.Corp [The Designer]
<a href=\'mailto]No sé el secreto para llegar al éxito, pero sé que tratar de agradar a todos es lo que te llevará al fracaso... Piénsalo!!![/color]

DiabloRojo

  • Miembro MUY activo
  • ***
  • Mensajes: 220
    • Ver Perfil
Re: Update
« Respuesta #3 en: Domingo 26 de Diciembre de 2004, 22:55 »
0
Tengo entendido que la consulta de actualización tiene esta forma:

Citar
UPDATE Nombre_tabla SET Nombre_campo=Expresion1, Nombre_campo=expresión2,..., Nombre_campo=expresiónN WHERE Nombre_campo=Condición_de_búsqueda

Sin el FROM y añadiendo un SET. Por cuestiones de legibilidad tal vez podrías almacenar tu consulta a una variable String y luego pasar esta variable al método .Open. Algo así:

Código: Text
  1.  
  2. Dim consultaSQL as String
  3.  
  4. consultaSQL=&#34;UPDATE [I]Nombre_tabla[/I] SET...&#34; ' tan larga como sea tu consulta
  5.  
  6. Set Prueba = Nothing
  7. '
  8. Prueba.Open consultaSQL
  9. '
  10. Set Prueba = Nothing
  11.  
  12.  


Espero que te sirva de algo...


DiabloRojo

juravi

  • Miembro activo
  • **
  • Mensajes: 94
    • Ver Perfil
    • http://spaces.msn.com/members/ingjuan
Re: Update
« Respuesta #4 en: Lunes 27 de Diciembre de 2004, 14:55 »
0
:devil:
Hola y gracias, lo voy a probar. Yo tenia otra solución pero mi jefe dice q es poco ortodoxa.
De nuevo.. Gracias

 :scream:
El Fin justifica los Medios
 _______________________
ﻞυגανι.Corp [The Designer]
<a href=\'mailto]No sé el secreto para llegar al éxito, pero sé que tratar de agradar a todos es lo que te llevará al fracaso... Piénsalo!!![/color]

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Update
« Respuesta #5 en: Lunes 27 de Diciembre de 2004, 18:00 »
0
Hola.

Comentarios hechos aparte, en diseño, el editor de vb limita el número de divisiones de línea que puedes tener a no sé cuanto. Sencillamente no crees tantas divisiones de línea... haz cada línea más larga, aunque sea incomodo y tengas que 'h-escrolear' de seguido.

Chau.

juravi

  • Miembro activo
  • **
  • Mensajes: 94
    • Ver Perfil
    • http://spaces.msn.com/members/ingjuan
Re: Update
« Respuesta #6 en: Martes 28 de Diciembre de 2004, 21:25 »
0
:devil:
Hola, otra vez gracias, pero con el codigo que me dista antes me funciono, es que la tabla tiene mas de 40 campos , pero con eso funciono y mi jefe no dijo nada :P
 :kicking:
Otra vez gracias :scream:
El Fin justifica los Medios
 _______________________
ﻞυגανι.Corp [The Designer]
<a href=\'mailto]No sé el secreto para llegar al éxito, pero sé que tratar de agradar a todos es lo que te llevará al fracaso... Piénsalo!!![/color]
Páginas: [1]
« anterior próximo »