delphi 读取excel

FBSAdoConn.Close;
FBSAdoConn.ConnectionString := 'Provider=Microsoft.ACE.OLEDB.12.0;Data Source='+ curFiileName+';Extended Properties= Excel 12.0;Persist Security Info=True';
FBSAdoConn.Connected := True;
qryBS.Connection := FBSAdoConn;
sBsSQL := 'select * from [Sheet1$]';

Guess you like

Origin blog.csdn.net/Listest/article/details/121281072