|
--创建存储过程
create proc sp_operate_access
@cmdsql varchar(8000),
@accessfilename nvarchar(1000)
as
begin???
??? declare @out int,@err int,@obj int,@constr nvarchar(1000),@src nvarchar(255),@desc nvarchar(255)
???
??? select @constr='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+@accessfilename??
???
??? exec @err=sp_oacreate 'adodb.connection',@obj out
??? if @err=0
??? begin
??????? exec @err=sp_oamethod @obj,'open',null,@constr
??????? if @err=0
??????? begin
??????????? exec @err=sp_oamethod @obj,'execute',@out out,@cmdsql
??????????? if @err=0
??????????? begin
??????????????? EXEC sp_OAMethod @obj,'Quit'
??????????????? exec sp_oadestroy @obj
??????????????? return
??????????? end
??????????? else
??????????????? exec sp_oageterrorinfo 0,@src out,@desc out
??????? end
??????? else
??????????? exec sp_oageterrorinfo 0,@desc out
??? end
??? else
??????? exec sp_oageterrorinfo 0,@desc out
??? exec sp_oadestroy @obj
???
??? select cast(@err as varbinary(4)) as 错误号,@desc as 错误描述,@src as 错误源
end
go
?
?
----------------------用法-------------------------------
--创建表tc
exec sp_operate_access 'create table tc(id int)','c:/db1.mdb'
go
--在tc表插入数据
exec sp_operate_access 'insert into tc(id) values(1)','c:/db1.mdb'
go
--删除tc表的数据
exec sp_operate_access 'delete from tc where id=1','c:/db1.mdb'
go
--删除TC表
exec sp_operate_access 'drop table tc','c:/db1.mdb'
go
--删除存储过程
drop proc sp_operate_access
*/
?
本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/navy887/archive/2009/10/29/4743498.aspx
（编辑：李大同）
【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!
|
