ADOString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source= '+ ExtractFiledir(Application.ExeName)+'\data\' + Edit1.Text + 'Jet OLEDB:Database Password=' + '''' + Edit2.Text + '''';
//Edit1.Text := 'ydh.mdb';
//Edit2.Text := '198001';
//Edit1.Text := 'ydh.mdb';
//Edit2.Text := '198001';
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货