DBISAM Latest - D2009

I am pulling the last of my hair out. The query below works so that is not the issue. I am importing a text file to a table. No issue there. I want to
have the flexibility for the end user to specify the file name and path. Something to do with quotes, I am missing something. Any help appreciated,
cheers, Sean

  FileNameToUse := datamodule1.tblSetupLocations.FieldByName('MOImportPath').AsString;

  //Filenametouse := AnsiQuotedStr(FilenametoUse,'"'); // doesn't work
  //Filenametouse := QuotedStr(FilenametoUse);           // doesn't work
  //Filenametouse :='"C:\AMI\testdata\sdm.sdf"';          //This works
  Filenametouse :='[C:\AMI\testdata\sdm.sdf]';            //This works

  qryImport.close;
  qryImport.SQL.clear;
  qryImport.SQL.Add('IMPORT TABLE TempWeather from ');
  qryImport.SQL.Add(FilenametoUse);
  
qryImport.SQL.Add('Columns(Date,MeanWindSpdLS,MaxWindSpdLS,MeanWindDirLS,MeanWindSpdHS,MaxWindSpdHS,MaxWindDirHS,MeanSeaLeve
l1,MeanSeaLevel2,MeanSeaLevel3,');
  
qryImport.SQL.Add('MeanSeaTemp1,MeanSeaTemp2,MeanDewPoint,MeanWindChill,MaxWindChill,MeanWBGT,MaxWBGT,MeanWetBulb,MaxAirTemp
,MeanAirTemp,MinAirTemp,');
  qryImport.SQL.Add('MeanRelHum,MeanBarPress,TotalRain,CumFDD,AddFDD,Spare,DirFreq1,DirFreq2,DirFreq3)');
  showmessage(qryImport.sql.text);
  qryImport.ExecSQL;
  qryImport.Close;

Sean


My initial thought was D2009 = Unicode so you have a problem there. How are you obtaining FilenametoUse, what is it defined as, string or ansistring, in the versions that don't work?

What I'd suggest to help find out the problem is to build qryImport.SQL and then qryImport.SQL.SaveToFile(....), examine the text in the file, try running DBSys and see if you can spot the problem there.

Roy Lambert [Team Elevate]

Sean,

<< I am pulling the last of my hair out. The query below works so that is
not the issue. I am importing a text file to a table. No issue there. I want
to have the flexibility for the end user to specify the file name and path.
Something to do
with quotes, I am missing something. >>

You need double-quotes or brackets around any file names with periods or
other types of special characters, so it is usually best to just always
enclose them with double-quotes.

Thanks,

--
Tim Young
Elevate Software
www.elevatesoft.com

Tim

>You need double-quotes or brackets around any file names with periods or
>other types of special characters, so it is usually best to just always
>enclose them with double-quotes.

This

Filenametouse := AnsiQuotedStr(FilenametoUse,'"');

puts double quotes round the filename so I don't think that can be the problem.

Roy Lambert [Team Elevate]

Roy,

<< puts double quotes round the filename so I don't think that can be the
problem. >>

Yes, but he also said that this:

Filenametouse :='"C:\AMI\testdata\sdm.sdf"';          //This works

works, which is also double-quotes.  So, I believed the one that I could see
the formatting for.  I suspect that the issue with AnsiQuotedStr is
something not readily apparent, but logical once realized.

--
Tim Young
Elevate Software
www.elevatesoft.com

Tim

<< puts double quotes round the filename so I don't think that can be the
>problem. >>
>
>Yes, but he also said that this:
>
>Filenametouse :='"C:\AMI\testdata\sdm.sdf"'; //This works
>
>works, which is also double-quotes. So, I believed the one that I could see
>the formatting for. I suspect that the issue with AnsiQuotedStr is
>something not readily apparent, but logical once realized.

You could well be right. Since I'd never used AnsiQuotedStr I tested it and the output looked fine to me which is why I suggested capturing the built up sql and having a shuftie.

Roy Lambert

Have tried several other combinations to no avail. Very strange behaviour. I would hate to have to hard wire the file names for these. Any other
ideas please send along. Always appreciate the great support, cheers, Sean


"Tim Young [Elevate Software]" wrote:

Roy,

<< puts double quotes round the filename so I don't think that can be the
problem. >>

Yes, but he also said that this:

Filenametouse :='"C:\AMI\testdata\sdm.sdf"';          //This works

works, which is also double-quotes.  So, I believed the one that I could see
the formatting for.  I suspect that the issue with AnsiQuotedStr is
something not readily apparent, but logical once realized.

--
Tim Young
Elevate Software
www.elevatesoft.com

This works below... SQL dump to text file...if likes double-quotes as expected - now how do I create just the double-quotes?

IMPORT TABLE TempWeather from
"C:\AMI\testdata\sdm.sdf"
Columns(Date,MeanWindSpdLS,MaxWindSpdLS,MeanWindDirLS,MeanWindSpdHS,MaxWindSpdHS,MaxWindDirHS,MeanSeaLevel1,MeanSeaLevel2,M
eanSeaLevel3,
MeanSeaTemp1,MeanSeaTemp2,MeanDewPoint,MeanWindChill,MaxWindChill,MeanWBGT,MaxWBGT,MeanWetBulb,MaxAirTemp,MeanAirTemp,MinAi
rTemp,
MeanRelHum,MeanBarPress,TotalRain,CumFDD,AddFDD,Spare,DirFreq1,DirFreq2,DirFreq3)











Sean wrote:

Have tried several other combinations to no avail. Very strange behaviour. I would hate to have to hard wire the file names for these. Any other
ideas please send along. Always appreciate the great support, cheers, Sean


"Tim Young [Elevate Software]" wrote:

Roy,

<< puts double quotes round the filename so I don't think that can be the
problem. >>

Yes, but he also said that this:

Filenametouse :='"C:\AMI\testdata\sdm.sdf"';          //This works

works, which is also double-quotes.  So, I believed the one that I could see
the formatting for.  I suspect that the issue with AnsiQuotedStr is
something not readily apparent, but logical once realized.

--
Tim Young
Elevate Software
www.elevatesoft.com

Sean


Try

cost dq ='"';

 qryImport.SQL.Add(dq+FilenametoUse+dq);

If that doesn't work then you have some really weird problem.

Roy Lambert

Bizarre concept to fool a poor system but for some reason your suggestion works. Thanks, I will try and work out why and advise. Maybe just the
allignment of the planets or something similary logical. Thanks for all the great help, as always, Sean

Roy Lambert wrote:

Sean


Try

cost dq ='"';

 qryImport.SQL.Add(dq+FilenametoUse+dq);

If that doesn't work then you have some really weird problem.

Roy Lambert