exceltodb_fcn.m

来自「函数ExceltoDB_Fcn实现的功能是从excel表格读取数据到数据库DB中」· M 代码 · 共 62 行

M
62
字号
%函数ExceltoDB_Fcn实现的功能是从excel表格读取数据到数据库DB中。

function ExceltoDB_Fcn(yearNo)
params;
path='D:\liu\project\database\Excel\';
path=[path,int2str(yearNo+1995),'Orig.xls'];
ExcelData=open(path);
[m,n]=size(ExcelData.data);
conn=database(ORIGDBNAME,'','');
TABLENAME=[int2str(yearNo+1995)];
for j=1:m
    j
    FIELDNAMES=['a' int2str(j+1)];
    for i=1:n
        if(data(j,i)~=-1)
        whereClause=['where ID = ' int2str(i)];        
           update(conn,TABLENAME,{FIELDNAMES},ExcelData.data(j,i),whereClause);
        end
    end
end
close(conn)

%{以下相同%}
function ExceltoDB_Fcn(yearNo)
params;
path='D:\liu\project\database\Excel\';
path=[path,int2str(yearNo+1995),'Orig.xls'];
ExcelData=open(path);
[m,n]=size(ExcelData.data);
conn=database(ORIGDBNAME,'','');
TABLENAME=[int2str(yearNo+1995)];
for j=1:m
    j
    FIELDNAMES=['a' int2str(j+1)];
    for i=1:n
        if(data(j,i)~=-1)
        whereClause=['where ID = ' int2str(i)];        
           update(conn,TABLENAME,{FIELDNAMES},ExcelData.data(j,i),whereClause);
        end
    end
end
close(conn)
%{以下相同%}
function ExceltoDB_Fcn(yearNo)
params;
path='D:\liu\project\database\Excel\';
path=[path,int2str(yearNo+1995),'Orig.xls'];
ExcelData=open(path);
[m,n]=size(ExcelData.data);
conn=database(ORIGDBNAME,'','');
TABLENAME=[int2str(yearNo+1995)];
for j=1:m
    j
    FIELDNAMES=['a' int2str(j+1)];
    for i=1:n
        if(data(j,i)~=-1)
        whereClause=['where ID = ' int2str(i)];        
           update(conn,TABLENAME,{FIELDNAMES},ExcelData.data(j,i),whereClause);
        end
    end
end
close(conn)

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?