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...