从access导入数据到sqlserver

发布时间：2020-12-12 16:02:18 所属栏目：MsSql教程来源：网络整理

导读：执行： select * into 巡查记录1? from OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0','Data Source=E:/导入导出/black_hd_catayou_20071128.mdb;Persist Security Info=false;Jet OLEDB:Database Password=;' )...black_client 因为安全机制，sqlserver默认情

执行：
select * into 巡查记录1? from OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0','Data Source=E:/导入导出/black_hd_catayou_20071128.mdb;Persist Security Info=false;Jet OLEDB:Database Password=;' )...black_client
因为安全机制，sqlserver默认情况下关闭了组件 'Ad Hoc Distributed Queries' 的 STATEMENT'OpenRowset/OpenDatasource' 的访问

正确方法：

procedure?TFrmMain.suiButton4Click(Sender:?TObject);

var

??sql: string ;

begin

?? if ?assFile? = ? '' ?then?Exit;

??sql?: ' select?*?into?巡查记录?from?OPENDATASOURCE?( Microsoft.Jet.OLEDB.4.0 ,? +

?????????? ''' Data?Source= assfile ;Persist?Security?Info=false;Jet?OLEDB:Database?Password=; ?)...black_client ?;

??ADOQuery1.Close;

??ADOQuery1.SQL.Clear;

?? // 打开权限

??ADOQuery1.SQL.Add( exec?sp_configure? show?advanced?options );

??ADOQuery1.SQL.Add( reconfigure Ad?Hoc?Distributed?Queries );

??ADOQuery1.ExecSQL;

?? 执行sql语句 ??ADOQuery1.clsoe;

??ADOQuery1.SQL.Clear;

??ADOQuery1.SQL.Add(sql);

??ADOQuery1.ExecSQL;

??? 关闭权限 ??ADOQuery1.Close;

??ADOQuery1.SQL.Clear;

??ADOQuery1.SQL.Add( );

??ADOQuery1.ExecSQL;

end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!