Visual Basic para Aplicaciones - Uso de dos variables con consultas like

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Uso de dos variables con consultas like

Publicado por Negro (1 intervención) el 20/06/2023 17:21:48
Necesito hacer una resta de saldos, pero no me funciona el codigo.

en sql se veria asi:
1
2
select Fuente10CM - (select sum(Monto) from RastreoSatelital_Cabecera where ID_Llamado=@1)
   from Llamado where ID=@1


pero al pasar al visual basic no me funciona.

1
txtSaldoF10CM.Text = TraerValor("Select Fuente10CM - (select sum(Monto) from RastreoSatelital_Cabecera where ID_Llamado like'%" & Me.txtID.Text & "%' From Llamado where ID like'%" & Me.txtID.Text & "%'")
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
Imágen de perfil de Antoni Masana
Val: 1.134
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Uso de dos variables con consultas like

Publicado por Antoni Masana (498 intervenciones) el 02/07/2023 01:08:27
veo diferencias en los WHERE

CÓDIGO SQL

1
2
3
4
5
select Fuente10CM - (select sum(Monto)
                     from RastreoSatelital_Cabecera
                     where ID_Llamado=@1)
from Llamado
where ID=@1

CÓDIGO BASIC

1
2
3
4
5
txtSaldoF10CM.Text = TraerValor("Select Fuente10CM - (select sum(Monto)" & _
                                                     "from RastreoSatelital_Cabecera " & _
                                                     "where ID_Llamado like'%" & Me.txtID.Text & "%' " & _
                                "From Llamado " & _
                                "where ID like'%" & Me.txtID.Text & "%'")

primer consejo en la función TraerValor pon un MSgBox para ver el parámetro que recibe o mejor grabalo en un fichero y compruebas la sintaxis.

Veo un posible error en el WHERE:

1
2
3
where ID_Llamado like'%" & Me.txtID.Text & "%'"   ' --- En el código
where ID_Llamado like'%Texto%'                    ' --- Resultado final con posible error
where ID_Llamado like '%Texto%'                   ' --- Resultado final SI error


Y veo un certero error: El paréntesis antes del SELECT ¿Donde se cierra?

1
2
where ID_Llamado like'%" & Me.txtID.Text & "%'"    ' --- En el código CON error
where ID_Llamado like'%" & Me.txtID.Text & "%')"   ' --- En el código SIN error

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