Matlab读取Access数据库保存到Excel

disp('-------game start--------');
tic;
t1=clock; 
%-------------------------------------------------------
ODBC_Name='drilingdata';     %电脑中ODBC连接的名称
conn=database(ODBC_Name,'','');      %连接数据库
ping(conn);        %测试连接状态是否能联通
whereClaus='select * from a01';          %查询语句，所有数据
curs=exec(conn,whereClaus);       %建立连接，执行查询
result=fetch(curs);         %返回查询游标
close(curs);
close(conn);
%Clear variables 
clear curs conn


ResultCell=result.Data;     %获取到了所有返回的值
xlswrite('E:\drilingdata.xlsx',ResultCell)       %结果保存到excle中


%---------game over-----------------------------------------------
disp(['程序总运行时间：',num2str(etime(clock,t1)),'写入数据量==10000',]);  
disp('-------game over--------');
%---------game over-----------------------------------------------