19 replies to this topic

[the walrus]

hola a todos, estoy haciendo un proyecto donde utilizo componentes ADO y una planilla excel como base de datos.

cuando intento escribir una consulta a un query me aparece este error "instruccion sql  no valida se esperaba un delete ,insert procedure, select o update"

la consulta que ejecuto es la siguiente : 

•  "SELECT * FROM " & Hoja1$

[enecumene]

¿Tiene la clausula HDR=Yes en tu connectionString?, las consultas deben ser de ésta forma:

sql

SELECT [Campo1], [Campo2] FROM [Hoja1$] WHERE [Campo1] > 0

Saludos.

[the walrus]

¿Tiene la clausula HDR=Yes en tu connectionString?, las consultas deben ser de ésta forma:

sql

SELECT [Campo1], [Campo2] FROM [Hoja1$] WHERE [Campo1] > 0

Saludos.

hola,  como hago para añiadirla me podrías dar un ejemplo gracias saludos 

[enecumene]

HDR=Yes indica que la primera línea de la hoja son los nombres de la columna, sólo agregalo en tu connectionString de ADO ";HDR=yes;"

[the walrus]

HDR=Yes indica que la primera línea de la hoja son los nombres de la columna, sólo agregalo en tu connectionString de ADO ";HDR=yes;"

añadí la clausula pero ahora me dice que "corchetes no validos  'Hoja1$' "

[enecumene]

El error es obvio, quítale los corchetes.

[the walrus]

El error es obvio, quítale los corchetes.

lo hice pero me aparce un nuevo error no se pudo encontrar el archivo ISAM instalable

[enecumene]

Eso es problema de tu cadena de conección, que aún no lo has colocado, si utilizas el motor de datos Microsoft Jet 4.0, asgúrate de colocar en tu cadena de conección la clausula ";Extended Properties=Excel 8.0;".

 

Saludos.

[the walrus]

Eso es problema de tu cadena de conección, que aún no lo has colocado, si utilizas el motor de datos Microsoft Jet 4.0, asgúrate de colocar en tu cadena de conección la clausula ";Extended Properties=Excel 8.0;".

 

Saludos.

ahora me aparece error se sintaxis en la clausula from

[Delphius]

The Walrus, coméntanos como tienes definida tu cadena de conexión, o bien, en su defecto si usas un componente de acceso a base de datos, las propiedades y su configuración.

Y sería útil que nos des un vistazo más completo de como tienes la consulta.

 

No basta con decir ADO, ADO es la suite. Efectivamente para conectarse a Excel vas a usar ADO, pero en cuanto al componente utilizado y su configuración tanto en la conexión como también para definir la consulta en el ADoQuery no sabemos nada. Se más descriptivo. Sin ver lo que estás haciendo, va a ser difícil apreciar donde están los errores.

 

Saludos,

[the walrus]

The Walrus, coméntanos como tienes definida tu cadena de conexión, o bien, en su defecto si usas un componente de acceso a base de datos, las propiedades y su configuración.

Y sería útil que nos des un vistazo más completo de como tienes la consulta.

 

No basta con decir ADO, ADO es la suite. Efectivamente para conectarse a Excel vas a usar ADO, pero en cuanto al componente utilizado y su configuración tanto en la conexión como también para definir la consulta en el ADoQuery no sabemos nada. Se más descriptivo. Sin ver lo que estás haciendo, va a ser difícil apreciar donde están los errores.

 

Saludos,

hola delphius, mi cadena de conexion es esta

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\archivos\base_de_datos.xls;Extended Properties=Excel 8.0;Persist Security Info=False;HDR=yes;Excel 8.0;

y en el adoquery tengo esta consulta 

 

SELECT * FROM   Hoja1$

[enecumene]

Excel 8.0 está dos veces, elimina la última.

 

Saludos.

[the walrus]

Excel 8.0 está dos veces, elimina la última.

 

Saludos.

si; ya lo saque pero el error sigue no se pudo encontrar el archivo ISAM instalable

[egostar]

si; ya lo saque pero el error sigue no se pudo encontrar el archivo ISAM instalable

 

Tengo un programa donde abro un archivo de excel y selecciono el libro que deseo ver. La cadena de conexión la tengo de ésta forma:

delphi

procedure TForm1.ADOConnection1BeforeConnect(Sender: TObject);
begin
   ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
                                      'Data Source='+Archivo+
                                      ';Extended Properties=Excel 8.0;'+
                                      'Persist Security Info=False';
end;

Adjunto una imagen del pequeño programa.

 

Saludos

Attached Files

•  excel_ADO.png   148.31KB   1 downloads

[the walrus]

Tengo un programa donde abro un archivo de excel y selecciono el libro que deseo ver. La cadena de conexión la tengo de ésta forma:

delphi

procedure TForm1.ADOConnection1BeforeConnect(Sender: TObject);
begin
   ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
                                      'Data Source='+Archivo+
                                      ';Extended Properties=Excel 8.0;'+
                                      'Persist Security Info=False';
end;

Adjunto una imagen del pequeño programa.

 

Saludos

hola egostar, mi intención es mostrar una hoja por formulario  y en uno mostrar las tres hojas en un formulario agrupados por fecha 

saludos

[egostar]

hola egostar, mi intención es mostrar una hoja por formulario  y en uno mostrar las tres hojas en un formulario agrupados por fecha 
saludos

 
Bueno, en ese caso primero lograr la conexión, y una vez salvado ese escaño hacer el query dependerá que las tres hojas tengan los mismos campos y los mismos tipos, y si se tiene eso, haces un query con la clausula UNION.
 
 

sql

SELECT 
   HOJA1.FECHA,
   HOJA1.CAMPO2,
   HOJA1.CAMPO3
 FROM HOJA1
 
UNION
 
SELECT
   HOJA2.FECHA,
   HOJA2.CAMPO2,
   HOJA2.CAMPO3
FROM HOJA2
 
UNION
 
SELECT
   HOJA3.FECHA,
   HOJA3.CAMPO2,
   HOJA3.CAMPO3
FROM HOJA3
 
ORDER BY 1

 
Saludos

[the walrus]

 
Bueno, en ese caso primero lograr la conexión, y una vez salvado ese escaño hacer el query dependerá que las tres hojas tengan los mismos campos y los mismos tipos, y si se tiene eso, haces un query con la clausula UNION.
 
 

sql

SELECT 
   HOJA1.FECHA,
   HOJA1.CAMPO2,
   HOJA1.CAMPO3
 FROM HOJA1
 
UNION
 
SELECT
   HOJA2.FECHA,
   HOJA2.CAMPO2,
   HOJA2.CAMPO3
FROM HOJA2
 
UNION
 
SELECT
   HOJA3.FECHA,
   HOJA3.CAMPO2,
   HOJA3.CAMPO3
FROM HOJA3
 
ORDER BY 1

 
Saludos

 

intento llamar un formular desde un mainmenu1 pero me da error mi codigo:

datamodule.adoquery.active := true;

datamodule.adoquery.Refresh;

tFrom1.create(self).showmodal;

[egostar]

intento llamar un formular desde un mainmenu1 pero me da error mi codigo:

datamodule.adoquery.active := true;

datamodule.adoquery.Refresh;

tFrom1.create(self).showmodal;

 

Hola the warlus

 

Pues me parece que estamos ayudandote con los ojos cerrados, algo está mal con la conexión o con el excel, ¿nos puedes proporcionar una copia de tu excel para poder examinar cual sería el problema?

 

Saludos

[the walrus]

Hola the warlus

 

Pues me parece que estamos ayudandote con los ojos cerrados, algo está mal con la conexión o con el excel, ¿nos puedes proporcionar una copia de tu excel para poder examinar cual sería el problema?

 

Saludos

mmm me parece que no me dará el resultado que busco, me podrían dar una ayuda importando una plantilla excel desde un botón gracias saludos 

[the walrus]

 
Bueno, en ese caso primero lograr la conexión, y una vez salvado ese escaño hacer el query dependerá que las tres hojas tengan los mismos campos y los mismos tipos, y si se tiene eso, haces un query con la clausula UNION.
 
 

sql

SELECT 
   HOJA1.FECHA,
   HOJA1.CAMPO2,
   HOJA1.CAMPO3
 FROM HOJA1
 
UNION
 
SELECT
   HOJA2.FECHA,
   HOJA2.CAMPO2,
   HOJA2.CAMPO3
FROM HOJA2
 
UNION
 
SELECT
   HOJA3.FECHA,
   HOJA3.CAMPO2,
   HOJA3.CAMPO3
FROM HOJA3
 
ORDER BY 1

 
Saludos

 

hola, añadi la consulta al query pero no funciona no aparcen los campos seleccionados