Visual Basic - Ayuda con Inser To

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda con Inser To

Publicado por Riel (1 intervención) el 26/05/2009 18:57:09
Que tal.
Les pido ayuda para ver si me pueden ayudar con esta sentencia SQL que me da error .les comento que los valores como "tmpcampo1" son valores que los almaceno en una variable y una vez que lleno las 5 variables con los 5 campos es cuando mando a ejecutar la sentencia SQL,los campos no estan vacios, ademnas son campos de un flexgrid es decir , el valor del .texmatrix lo asigno a la variabe y a de ahi el comando SQL o si me pueden decir como poner los valores desde los campos del flexgrid.Saludos

SQUERY = "INSERT INTO tabla(campo1,campo2,campo3,campo4,campo5)
Values(tmpcampo1,tmpcampo2,tmpcampo3,tmpcampo4,tmpcampo5)"
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:Ayuda con Inser To

Publicado por Pedro Najib (19 intervenciones) el 29/05/2009 21:32:42
pues estos son algunos ejemplos de como lo hago yo
de menor complejidad a mayor....

cadsql3 = "INSERT INTO [" & rutadestino & "]." & nomtabDes & " ( " & cadsql1 & " ) SELECT " & cadsql2 & " FROM " & n1 & " IN '" & ruta & "'[dBASE IV;]"

o

baser.Execute ("INSERT INTO Estadistica ( CveIns, NomIns, CveEsc, NomEsc, CveCar, NomCar, Clave, Nombre, Mun, NomMun, CicloAntEgreH, CicloAntEgreM, CicloAntEgre, CicloAntTitH, CicloAntTitM, CicloAntTit, AlumHom, AlumMuj, AlumTot, Alum1ro, Alum2do, Alum3ro, Alum4to, Alum5to, Alum6to, AlumTot2, DocTC, Doc34, Doc12, DocxHor, DocTot, Escuelas, NodeCarrxEsc, AlumnosxEsc ) SELECT sI9119A.CVEINS, sI9119A.NOMINS, sI9119A.CVEESC, sI9119A.NOMESC, sI9119A.CVECAR, sI9119A.NOMBRECAR, sI9119A.CVECAR, sI9119A.NOMBRECAR, '', '', sI9119A.S56, sI9119A.S57, sI9119A.S58, sI9119A.S59, sI9119A.S60, sI9119A.S61, sI9119A.S225, sI9119A.S226, sI9119A.S227, sI9119A.S228, sI9119A.S229, sI9119A.S230, sI9119A.S231, sI9119A.S232, sI9119A.S233, sI9119A.S234, 0 AS Expr1, 0 AS Expr2, 0 AS Expr3, 0 AS Expr4, 0 AS Expr5, 0 AS Expr6, 0 AS Expr7, 0 AS Expr8 FROM sI9119A")

o

baser.Execute ("INSERT INTO Estadistica ( CveIns, NomIns, CveEsc, NomEsc, Mun, NomMun, Clave, Nombre, NodeCarrxEsc, AlumnosxEsc, DocTC, Doc34, Doc12, DocxHor, DocTot, Escuelas, CicloAntEgreH, CicloAntEgreM, CicloAntEgre, CicloAntTitH, CicloAntTitM, CicloAntTit, AlumHom, AlumMuj, AlumTot, Alum1ro, Alum2do, Alum3ro, Alum4to, Alum5to, Alum6to, AlumTot2, CveCar, NomCar ) " & _
"SELECT sI9119f.CVEINS, sI9119f.NOMINS, sI9119f.CVEESC, sI9119f.NOMESC, sI9119f.MUNICIPIO, sI9119f.NOMMUN, sI9119f.CVEESC, sI9119f.NOMESC, sI9119f.S3, sI9119f.S4, sI9119f.S149, sI9119f.S160, sI9119f.S171, sI9119f.S182, sI9119f.S193, 1 AS Expr1, Si9119Asuma.S56, Si9119Asuma.S57, Si9119Asuma.S58, Si9119Asuma.S59, Si9119Asuma.S60, Si9119Asuma.S61, Si9119Asuma.S225, Si9119Asuma.S226, Si9119Asuma.S227, Si9119Asuma.S228, Si9119Asuma.S229, Si9119Asuma.S230, Si9119Asuma.S231, Si9119Asuma.S232, Si9119Asuma.S233, Si9119Asuma.S234, '---' AS Expr18, '---' AS Expr19 " & _
"FROM Si9119Asuma INNER JOIN sI9119f ON (Si9119Asuma.CVEESC=sI9119f.CVEESC) AND (Si9119Asuma.CVEINS=sI9119f.CVEINS)")

-o-

baser.Execute ("INSERT INTO Estadistica ( CveIns, NomIns, CveEsc, NomEsc, CveCar, NomCar, Clave, Nombre, AlumHom, AlumMuj, AlumTot, Alum1ro, Alum2do, Alum3ro, Alum4to, Alum5to, Alum6to, AlumTot2, CicloAntEgreH, CicloAntEgreM, CicloAntEgre, CicloAntTitH, CicloAntTitM, CicloAntTit, NodeCarrxEsc, AlumnosxEsc, DocTC, Doc34, Doc12, DocxHor, DocTot, Escuelas ) " & _
"SELECT 'Z' AS CveIns, TotalEstatal.NomIns, TotalEstatal.CveEsc, TotalEstatal.NomEsc, TotalEstatal.CveCar, TotalEstatal.NomCar, TotalEstatal.Clave, TotalEstatal.Nombre, TotalEstatal.AlumHom, TotalEstatal.AlumMuj, TotalEstatal.AlumTot, TotalEstatal.Alum1ro, TotalEstatal.Alum2do, TotalEstatal.Alum3ro, TotalEstatal.Alum4to, TotalEstatal.Alum5to, TotalEstatal.Alum6to, TotalEstatal.AlumTot2, TotalEstatal.CicloAntEgreH, TotalEstatal.CicloAntEgreM, TotalEstatal.CicloAntEgre, TotalEstatal.CicloAntTitH, TotalEstatal.CicloAntTitM, TotalEstatal.CicloAntTit, TotalEstatal.NodeCarrxEsc, TotalEstatal.AlumnosxEsc, TotalEstatal.DocTC, TotalEstatal.Doc34, TotalEstatal.Doc12, TotalEstatal.DocxHor, TotalEstatal.DocTot, TotalEstatal.Escuelas " & _
"From TotalEstatal")

NOTA:
Ahora que si quieres mandame tu base y los campos que quieres usar como parametros y te hago tu cadena sql

Estamos en contac...
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:Ayuda con Inser To

Publicado por Riel (30 intervenciones) el 01/06/2009 15:44:15
Muchas gracias amigo, me sirvio mucho.Saludos a todos.
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