MySQL - error en consulta mysql y visual foxpro

   
Vista:

error en consulta mysql y visual foxpro

Publicado por jorge daniel (6 intervenciones) el 25/06/2013 19:45:56
hola buenas tardes tengo un problema con visual foxpro
tengo una consulta que cuando la coloco en un programa para administrar mi base de datos anda perfecto queda algo asi en ese programa

SELECT
clientes.apnom,
comvehiculo.idvendedor,
comvehiculo.idcomvehi,
comvehiculo.fcompra,
comvehiculo.preciobase,
comvehiculo.poriva,
comvehiculo.total,
comvehiculo.fir,
comvehiculo.doccompleta,
comvehiculo.obs,
comvehiculo.idvehiculo,
vehiculos.modelo
FROM
clientes
INNER JOIN comvehiculo ON clientes.id = comvehiculo.idvendedor
INNER JOIN vehiculos ON vehiculos.idvehiculo = comvehiculo.idvehiculo
ORDER BY
clientes.id ASC
LIMIT 0, 1



ahora cuando la coloco en el visual foxpro la coloco asi


?SQLEXEC(cone,"SELECT"+;
"clientes.apnom,"+;
"comvehiculo.idvendedor,"+;
"comvehiculo.idcomvehi,"+;
"comvehiculo.fcompra,"+;
"comvehiculo.preciobase,"+;
"comvehiculo.poriva,"+;
"comvehiculo.total,"+;
"comvehiculo.fir,"+;
"comvehiculo.doccompleta,"+;
"comvehiculo.obs,"+;
"comvehiculo.idvehiculo,"+;
"vehiculos.modelo"+;
"FROM clientes"+;
"INNER JOIN comvehiculo ON clientes.id=comvehiculo.idvendedor"+;
"INNER JOIN vehiculos ON vehiculos.idvehiculo = comvehiculo.idvehiculo"+;
"WHERE idcomvehi=?thisform.text1.value ORDER BY clientes.id ASC LIMIT 1")

es la primera ves que hago una consulta tan larga nose en que le estoy errando y tengo que terminar este programa

hice varios programas ya con la misma base y el mismo programa y andubieron perfecto
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

error en consulta mysql y visual foxpro

Publicado por Saul (5 intervenciones) el 26/06/2013 07:05:16
Hola Jorge Danien:

para nada es larga, mas bien es básica
te dejo dos opciones, siguiente tu ejemplo que tu pones te digo mas o menos los errores

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
miValor = thisform.text1.value
= SQLEXEC(cone,"SELECT"+;
                           "clientes.apnom,"+;
                           "comvehiculo.idvendedor,"+;
                           "comvehiculo.idcomvehi,"+;
                           "comvehiculo.fcompra,"+;
                          "comvehiculo.preciobase,"+;
                          "comvehiculo.poriva,"+;
                          "comvehiculo.total,"+;
                          "comvehiculo.fir,"+;
                          "comvehiculo.doccompleta,"+;
                          "comvehiculo.obs,"+;
                          "comvehiculo.idvehiculo,"+;
                          "vehiculos.modelo"+;
                     "FROM clientes"+;
                     "INNER JOIN comvehiculo ON clientes.id=comvehiculo.idvendedor"+;
                      "INNER JOIN vehiculos ON vehiculos.idvehiculo = comvehiculo.idvehiculo"+;
                      "WHERE idcomvehi = ?miValor ORDER BY clientes.id ASC LIMIT 1","TuConsulta")



a mi en lo particular esta es la que uso y me me gusta mas, porque no pones tantas concatenaciones
en tu string, adema puedes trabajar tu consulta como si estuvieras en el propio mysql.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
miValor = thisform.text1.value
      lcSQLcommand = ""
	TEXT TO lcSQLcommand NOSHOW
                            SELECT a.apnom,
					  b.idvendedor,
					  b.idcomvehi,
				          b.fcompra,
					  b.preciobase,
					  b.poriva,
					  b.total,
					  b.fir,
					  b.doccompleta,
					  b.obs,
					  b.idvehiculo,
					  c.modelo
			FROM  clientes a
				INNER JOIN comvehiculo b ON b.idvendedor = a.id
				INNER JOIN vehiculos c ON c.idvehiculo = b.idvehiculo
                        WHERE idcomvehi = ?miValor
				ORDER BY a.id   LIMIT 1
	ENDTEXT
 
	*-Conecta MySql
	=SQLEXEC(cone,lcSQLcommand,"TuConsulta")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

error en consulta mysql y visual foxpro

Publicado por jorge daniel (6 intervenciones) el 26/06/2013 16:11:13
buenisimo me funciono perfectamente sos un genio
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