ADO OLE Database Connection

Queries datasource and insers data into datasource.

Description

This code basis on Tim Myers code (oledb*.m) and uses ADO OLE DB instead of OWC - Office Web Component. When OWC not installed (e.g. MS Office 2000) using ADO OLE DB can be a solution. The syntax is similar to Tim Myers code.

The Code is tested only with MS Access database.

Acknowledgements

The author wishes to acknowledge the following in the creation of this submission:
database connection mfiles
This submission has inspired the following:
adodb_tools

• MATLAB release: MATLAB 7.3 (R2006b)

[Ryan Schaezler]

Works well. I was having problems with OWC even though it was install on one computer. Using the ADODB connection worked without any issues.

[Martijn Koopman]

Very easy to use and extremely fast interface with Microsoft Access *.MDB files.

[Christy Lynch]

This is a fantastically easy interface to use for Access databases. The problem is a memory leak. Releasing the connection and clearing the connection variable does not release the memory used up by the connection. Only restarting Matlab seems to work.

[jairo Ortiz]

 

[hardik nadiyana]

really help ful thanx,
hardik

[Laszlo Sragner]

h=actxserver('ADODB.Connection');
h.Open(connstr);
res=h.Execute(sqlstr);
x=res.GetRows()';
h.Close();
delete(h);

Maybe the leak was due to the 'release' command at the end instead of 'delete'

[deepa deepa]

 

[Jasleen K.]

Thanks a tonne..!!!!
solved my problem.!!

[Leen K.]

want to use variables in the sql queries...
kindly suggest a way.
e.g. sql=['select * from TestTable where firstname=',myname ,'];
5this statement wont replace variable myname

[Guyennon Nicolas]

Thanks a lot !!! Amazing work, even faster than Tim Myers code (oledb*.m)
I'm working with your toolbox to query access 2003 database.
I was looking for table, field and query information. Tooks me 4 days ... hope that could help someone else

%% get table name
sqltablename='SELECT name FROM MSysObjects WHERE Type=1 AND Flags=0 ORDER BY name';
tablename=adodbquery(cn,sqltablename);
%% get query name
sqlqueryname='SELECT name FROM MSysObjects WHERE Type=5 AND Flags=0 ORDER BY name';
queryname=adodbquery(cn,sqlqueryname);

note that in both case you should first change users authorization to read for MSysObjects opening your access database. ("user and group authorization" menu in tools)

the hardest part was to get fields or columns name ...

function field_name=tablefieldname(cn,table_name)
%% find all field name from table
sqlfiledname=['SELECT * FROM ' table_name];
invoke(cn,'BeginTrans');
r = invoke(cn,'Execute',sqlfiledname);
invoke(cn,'CommitTrans');
nbfileds=r.Fields.count;field_name='';
for ff=1:nbfileds
    fld=r.Fields.Item(ff-1);
    field_name=strvcat(field_name,fld.name);
end

bye
Nico

[Vinod Karanth]

Very effective. Thanks heaps.

[Fredrik]

 

[Kevin]

does somebody have an example of running this with Oracle i keep getting an error.
  ??? Invoke Error, Dispatch Exception:
Source: Microsoft OLE DB Provider for ODBC Drivers
Description: [Oracle][ODBC][Ora]ORA-12154: TNS:could
not resolve the connect identifier specified

[Brian]

I'm getting this error on Win7 64 box:

Make sure adotest.mdb is in the current directory
??? Invoke Error, Dispatch Exception:
Source: ADODB.Connection
Description: Provider cannot be found. It may not be properly installed.
Help File: C:\Windows\HELP\ADO270.CHM
Help Context ID: 12ee4f

Error in ==> adodbcn at 29
invoke(cn,'Open', cnstr);

Error in ==> adodb_demo at 30
cn=adodbcn(s);

[Robert Daly]

This is a great tool, I have been using it for a while with out a hitch. Just recently it started to go wrong and gave the error:
"No public field CursorLocation exists for class COM.ADODB_Connection"
I found if I commented out the folowing line from adodb_connect
ado_connection.CursorLocation = 'adUseClient'; % Uses a client-side cursor supplied by a local cursor library
this error went away.
After this it had a problem with the line from adodb_query...
if (ado_recordset.State && ado_recordset.RecordCount>0)

I found if I delete this (and the corresponding end) it works fine for my purposes. I'm not exactly sure what this did (anybody?) and what errors will crop up now that it isn't there.
I wonder if there has been an update to the ADODB set up and now some of the methods and classes have changed since this code was written.