Вот более полный код
Код:
Adoconnection2.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+opendialog1.FileName+';Extended Properties=excel 8.0;';
ADOQ2.Close;
ADOQ2.SQL.Clear;
if combobox1.Text = 'nnn' then
begin
ADOq2.SQL.Add('select * from [Data$]');
end;
if combobox1.Text = 'ic' then
begin
testZ:=changefileEXT(extractFileName(opendialog1.Filename),'')+'$';
ADOq2.SQL.Add('select * from ['''+testZ+'''] ');
end;
ADOQ2.Active:=true;
...........................................................
if Adoq2.Fields[2].AsString <> '' then
begin
KBC:=length(Adoq2.Fields[2].AsString);
KBEs:= Adoq2.Fields[2].AsString;
if kbc < 7 then
begin
KBi:=7-kbc;
for S:=1 to KBI do
begin
KBEs:='0'+KBEs;
end;
end;
в таблице данне (ячейки текстовые)
113212
123
С344
23455555
С3222
11001
Ю12333
Но почему запрос возвращает только циферные значения, когда на тыкается на данные где присутствует другой символ тогда возвращает значение '' типо пусто ... ПОмогите кто чем может.