string connection MS Access

[bpd2000]

After changes to
elseif cExt $ "mdb,accdb,bds"
cRDBMS := "MSACCESS"

? cExt it shows as as bds but error comes at
line no. 108 of adofuncs.prg i.e. if '<?>' $ cConnStr .and. nDB > 0
You may test after change of extension of .mdb file in the example give in this thread by Mr. Rao

[cnavarro]

Also change in function FW_RDBMSName( oCn )

Code: Select all  Expand view  RUN

.../...

      if ".mdb" $ c .or. ".accdb"  .or. "bds" $ c

.../...

 

[bpd2000]

Also change in function FW_RDBMSName( oCn )

Code: Select all  Expand view  RUN

.../...
      if ".mdb" $ c .or. ".accdb"  .or. "bds" $ c
.../... 

Thank you for sparing your time
Success after minor change in you suggested code

Code: Select all  Expand view  RUN

.../...
      if ".mdb" $ c .or. ".accdb" $ c .or. ".bds" $ c
.../... 

[cnavarro]

So it is

[nageswaragunupudi]

Dear All,
I am unable to get connection using
oCn := FW_OpenAdoConnection( cmdb + "," + pwd )
when file extension of Access file is changed from .mdb to .bds
I need help how to connect

Code: Select all  Expand view  RUN

  oCn   := FW_OpenAdoConnection( { "MSACCESS", <filenamewithfullpath>, , , <password> }, .t.  or .f.)