以前寫的matlab代碼，有部分是從txt導數據到matlab裏，還有合併矩陣

功能有把txt/excel表導數據到matlab裏，還有合併矩陣，還有連mysql數據庫

我從以前的代碼裏找到，不知道這個版本是不是能運行的，但是也差不多就是這樣。matlab中總是要轉換數據的類型，心好累

load 'X:/work/CN_Univ.mat'

t=dhfetch('S_SHARE_TOTAL','CN_Univ.RIC',datestr(date,'yyyy-mm-dd'));
c=dhfetch('S_SHARE_FREESHARES','CN_Univ.RIC',datestr(date,'yyyy-mm-dd'));
dhfetch('S_SHARE_TOTAL','000001.SZ','2015-10-27')
dhfetch('S_SHARE_TOTAL','000001.SZ',datestr(date,'yyyy-mm-dd'))
dhfetch('S_SHARE_TOTAL',CN_Univ.RIC,datestr(date,'yyyy-mm-dd'))
clc
t=dhfetch('S_SHARE_TOTAL',CN_Univ.RIC,datestr(date,'yyyy-mm-dd'))
clc
t=dhfetch('S_SHARE_TOTAL',CN_Univ.RIC,datestr(date,'yyyy-mm-dd'));
c=dhfetch('S_SHARE_FREESHARES',CN_Univ.RIC,datestr(date,'yyyy-mm-dd'));
for i = 1:length(CN_Univ.RIC)
a=CN_Univ.RIC{i,1};
id(i) = str2num(a(1:6));
end
id=id';
txtFileName = 'X:\work\capitalStock.txt';
fid = fopen(txtFileName,'w+');
for ii = 1:size(Temp,1)
for jj = 1:size(Temp,2)
if ii < size(Temp,1)
if jj == 1
fprintf( fid, '%s\t', Temp{ii,jj});

else

fprintf( fid, '%s\n', Temp{ii,jj});
end
elseif ii == size(Temp,1)
if jj == 1
fprintf( fid, '%s\t',Temp{ii,jj});
else
fprintf( fid, '%s\n',Temp{ii,jj});
end
end
end
end
%合併兩個矩陣到一個裏面 c，d分別爲一個矩陣名
Temp(:,1)=id;
Temp(:,2)=t;
Temp(:,3)=c;
Temp{:1}=id
Temp=[id t c]
t=cell2mat(t)

t=int32(t)

t=dhfetch('S_SHARE_TOTAL',CN_Univ.RIC','2015-10-27');
t=dhfetch('S_SHARE_TOTAL',000018.sz','2015-10-27');
t=dhfetch('S_SHARE_TOTAL','000018.sz','2015-10-27');
t=dhfetch('S_SHARE_TOTAL',CN_Univ.RIC','2015-10-27');
t=dhfetch('S_SHARE_TOTAL',CN_Univ.RIC,'2015-10-27');
dhfetch('S_SHARE_TOTAL','000018.sz','2015-10-27')
find(cell2mat(t) == 420991949)
find(strcmp(CN_Univ.RIC,'000018.sz'))
CN_Univ.RIC
clc
test=[ans';t';c']
clc
test=test';
idcell=num2cell(id);
test=[idcell';t';c'];
test=test'
clc
DH
c=dhfetch('S_SHARE_FREESHARES',CN_Univ.RIC,datestr(date,'yyyy-mm-dd'));
txtFileName = 'X:\work\capitalStock.txt';
fid = fopen(txtFileName,'w+');
for ii = 1:size(test,1)
for jj = 1:size(test,2)
if ii < size(test,1)
if jj == 1
fprintf( fid, '%s\t', test{ii,jj});
else
fprintf( fid, '%s\n', test{ii,jj});
end
elseif ii == size(Temp,1)
if jj == 1
fprintf( fid, '%s\t',test{ii,jj});
else
fprintf( fid, '%s\n',test{ii,jj});
end
end
end
end
txtFileName = 'X:\work\capitalStock.txt';
fid = fopen(txtFileName,'w+');
for ii = 1:size(test,1)
for jj = 1:size(test,2)
if ii < size(test,1)
if jj == 1
fprintf( fid, '%lf\t', test{ii,jj});
else
fprintf( fid, '%lf\n', test{ii,jj});
end
elseif ii == size(Temp,1)
if jj == 1
fprintf( fid, '%lf\t',test{ii,jj});
else
fprintf( fid, '%lf\n',test{ii,jj});
end
end
end
end
txtFileName = 'X:\work\capitalStock.txt';
fid = fopen(txtFileName,'w+');
for ii = 1:size(test,1)
for jj = 1:size(test,2)
if ii < size(test,1)
if jj == 1
fprintf( fid, '%f\t', test{ii,jj});
else
fprintf( fid, '%f\n', test{ii,jj});
end
elseif ii == size(Temp,1)
if jj == 1
fprintf( fid, '%f\t',test{ii,jj});
else
fprintf( fid, '%f\n',test{ii,jj});
end
end
end
end
test=[idcell';t';c'];
test=test'
clc
filename='X:\work\Excle.xls';
[status,message]=xlswrite( filename,test,'sheet1')
conn =database('test','jtjz','jtjz123456','com.mysqljdbc.Driver','jdbc:mysql://192.168.0.19:3306/test');