急求复制表结构的通用存储过程!!!! 直接用COPY然后在其它库中执行应该可以 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 看看这个:批量表结构提取和批量建表http://dev.csdn.net/article/72/72614.shtm if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[P_CopyDB]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)drop procedure [dbo].[P_CopyDB]GO/*-- 在 SQLServer 中使用SQLDMO.Transfer 实现数据迁移Transfer对象的重要属性:属性名 类型 描述--------------------------------- ------------------- --------------------CopyAllDefaults Boolean 所有默认值CopyAllObjects Boolean 所有对象CopyAllRules Boolean 所有规则CopyAllStoredProcedures Boolean 所有存储过程CopyAllTables Boolean 所有表CopyAllTriggers Boolean 所有触发器CopyAllUserDefinedDatatypes Boolean 所有用户自定义类型CopyAllViews Boolean 所有视图CopyData Boolean 所有数据DestDatabase String 目标对象数据库DestLogin String 目标数据库登陆用户名DestPassword String 目标数据库登陆密码DestServer String 目标服务器DestUseTrustedConnection Boolean 用户信任连接DropDestObjectsFirst Boolean 是否先删除目标对象IncludeDependencies Boolean 是否包含依靠对象ScriptType Boolean 脚本类型重要方法: 方法名称 功能描述--------------------------- --------------------------AddObject 增加对象AddObjectByName 通过对象名称增加对象 存储过程实现源数据库到目标数据库的对象和数据的复制 要求源数据库和目标数据库在同一服务器 如果是要实现不同服务器之间的复制,则需要增加验证信息--邹建 2005.07(引用请保留此信息)--*//*--调用示例 CREATE DATABASE test EXEC P_CopyDB @Source_DB='northwind',@Des_DB='test' DROP DATABASE test--*/--对象复制CREATE PROCEDURE P_CopyDB @Des_DB sysname, --目标数据库@Obj_Type nvarchar(4000)=N'',--复制的对象类型,可以是下列字符串列表: -- O 所有对象,D 默认值,R 规则,P 存储过程 -- T 表,TR 触发器,DT 用户定义数据类型 -- V 视图,DATA 数据,DEL 删除目标对象@Source_DB sysname=N'', --源数据库@ServerName sysname=N'', --服务器名@UserName sysname=N'', --用户名,不指定则表示使用 Windows 身份登录@pwd sysname=N'' --密码 ASSET NOCOUNT ONDECLARE @srvid int,@Dbid int,@S_dbid int,@D_dbid int,@TransferID int, @err int,@src varchar(255), @desc varchar(255)IF ISNULL(@ServerName,N'')=N'' SET @ServerName=@@SERVERNAMEIF ISNULL(@Source_DB,N'')=N'' SET @Source_DB=DB_NAME()--创建sqldmo对象·EXEC @err=sp_oacreate 'sqldmo.sqlserver',@srvid OUTIF @err<>0 GOTO lb_Err--连接服务器IF ISNULL(@UserName,N'')=N'' --使用 Windows 身份登录BEGIN EXEC @err=sp_oasetproperty @srvid,'loginsecure',-1 IF @err<>0 GOTO lb_Err EXEC @err=sp_oamethod @srvid,'connect',NULL,@servernameENDELSE EXEC @err=sp_oamethod @srvid,'connect',NULL,@servername,@UserName,@pwdIF @err<>0 GOTO lb_Err--获取数据库集EXEC @err=sp_oagetproperty @srvid,'databases',@Dbid OUTIF @err<>0 GOTO lb_Err--选择源数据库 EXEC @err=sp_oamethod @Dbid,'item',@S_dbid OUT,@Source_DBIF @err<>0 GOTO lb_Err--选择目标数据库 EXEC @err=sp_oamethod @Dbid,'item',@D_dbid OUT,@Des_DBIF @err<>0 GOTO lb_Err--设置复制的对象EXEC @err=sp_oacreate 'SQLDMO.Transfer',@TransferID OUTIF @err<>0 GOTO lb_Err--设置目标服务器信息EXEC @err=sp_oasetproperty @TransferID,'DestServer',@ServerNameIF @err<>0 GOTO lb_Err --设置连接用户IF ISNULL(@UserName,N'')=N'' --使用 Windows 身份登录BEGIN EXEC @err=sp_oasetproperty @TransferID,'DestUseTrustedConnection',1 IF @err<>0 GOTO lb_ErrENDELSEBEGIN EXEC @err=sp_oasetproperty @TransferID,'DestLogin',@UserName IF @err<>0 GOTO lb_Err EXEC @err=sp_oasetproperty @TransferID,'DestPassword',@pwd IF @err<>0 GOTO lb_ErrEND --设置复制对象信息EXEC @err=sp_oasetproperty @TransferID,'DestDatabase',@Des_DBIF @err<>0 GOTO lb_ErrDECLARE tb CURSOR FAST_FORWARD LOCALFORSELECT Name FROM( SELECT KeyWord=N',D,', Name=N'CopyAllDefaults' UNION ALL SELECT KeyWord=N',O,', Name=N'CopyAllObjects' UNION ALL SELECT KeyWord=N',R,', Name=N'CopyAllRules' UNION ALL SELECT KeyWord=N',P,', Name=N'CopyAllStoredProcedures' UNION ALL SELECT KeyWord=N',T,', Name=N'CopyAllTables' UNION ALL SELECT KeyWord=N',TR,', Name=N'CopyAllTriggers' UNION ALL SELECT KeyWord=N',DT,', Name=N'CopyAllUserDefinedDatatypes' UNION ALL SELECT KeyWord=N',V,', Name=N'CopyAllViews' UNION ALL SELECT KeyWord=N',DATA,',Name=N'CopyData' UNION ALL SELECT KeyWord=N',DEL,', Name=N'DropDestObjectsFirst')A WHERE CHARINDEX(KeyWord, CASE WHEN ISNULL(@Obj_Type,N'')='' THEN ',O,DATA,' ELSE @Obj_Type END)>0OPEN tbFETCH tb INTO @srcWHILE @@FETCH_STATUS=0BEGIN EXEC @err=sp_oasetproperty @TransferID,@src,1 IF @err<>0 GOTO lb_Err FETCH tb INTO @srcENDCLOSE tbDEALLOCATE tb--复制对象EXEC @err=sp_oamethod @S_dbid,'Transfer',null,@TransferIDIF @err<>0 GOTO lb_Err--结束SET @err=0GOTO lb_Exit--错误处理lb_Err: EXEC sp_oageterrorinfo NULL, @src OUT, @desc OUT RAISERROR(N'错误编号 %#x, 错误源 "%s", 错误描述 "%s"',16,1,@err,@src,@desc) RETURN -1lb_Exit: EXEC sp_OADestroy @Dbid EXEC sp_OADestroy @srvid EXEC sp_OADestroy @TransferID RETURN @errGO --只复制结构是这样调用的: EXEC P_CopyDB @Source_DB='northwind',@Des_DB='test',@Obj_Type='O' 可以,不过这样的话,存储过程就会写得比较麻烦,比较这种处理更适合用程序,而不是存储过程.如果你要实现的话,你可以使用 Transfer 对象的 AddObjectByName 方法逐个添加要复制的对象,然后实现复制 对 SQL_DMO模型不大熟悉,能否贴一下大致得例子 结贴,使用 SQL_DMO 对象 完成操作SQL_DMO 很强大,只是相关得帮助很少 SQL 语句求助 一道数据库的作业,大家来看看 急问!怎么从一个数据库中象另一个数据库中导入数据 并且主键和默认值不丢失 帮我写一条查询语句,在线等 求个sql高手 sort order id 到底是个什么东东哦! 全局临时表支不支持事务? 在做安装程序要哪些BDE文件?我中的是ODBC数据源+SQL Server2000!!急!急!急!急! 存儲過程建立表的問題﹗為什么通過參數指定要建立的表名無效﹗ 不是很复杂 如果我用DELPHI连接SQL SERVER 执行了一个错误的SQL 我如何能捕捉这个错误 并把对应的错误写到文本里面呢 建了一个简单的存储过程 但是里面有些语法不会写 请指教
批量表结构提取和批量建表
http://dev.csdn.net/article/72/72614.shtm
drop procedure [dbo].[P_CopyDB]
GO/*-- 在 SQLServer 中使用SQLDMO.Transfer 实现数据迁移Transfer对象的重要属性:
属性名 类型 描述
--------------------------------- ------------------- --------------------
CopyAllDefaults Boolean 所有默认值
CopyAllObjects Boolean 所有对象
CopyAllRules Boolean 所有规则
CopyAllStoredProcedures Boolean 所有存储过程
CopyAllTables Boolean 所有表
CopyAllTriggers Boolean 所有触发器
CopyAllUserDefinedDatatypes Boolean 所有用户自定义类型
CopyAllViews Boolean 所有视图
CopyData Boolean 所有数据
DestDatabase String 目标对象数据库
DestLogin String 目标数据库登陆用户名
DestPassword String 目标数据库登陆密码
DestServer String 目标服务器
DestUseTrustedConnection Boolean 用户信任连接
DropDestObjectsFirst Boolean 是否先删除目标对象
IncludeDependencies Boolean 是否包含依靠对象
ScriptType Boolean 脚本类型重要方法:
方法名称 功能描述
--------------------------- --------------------------
AddObject 增加对象
AddObjectByName 通过对象名称增加对象 存储过程实现源数据库到目标数据库的对象和数据的复制
要求源数据库和目标数据库在同一服务器
如果是要实现不同服务器之间的复制,则需要增加验证信息
--邹建 2005.07(引用请保留此信息)--*//*--调用示例 CREATE DATABASE test
EXEC P_CopyDB @Source_DB='northwind',@Des_DB='test'
DROP DATABASE test
--*/
--对象复制
CREATE PROCEDURE P_CopyDB
@Des_DB sysname, --目标数据库
@Obj_Type nvarchar(4000)=N'',--复制的对象类型,可以是下列字符串列表:
-- O 所有对象,D 默认值,R 规则,P 存储过程
-- T 表,TR 触发器,DT 用户定义数据类型
-- V 视图,DATA 数据,DEL 删除目标对象
@Source_DB sysname=N'', --源数据库
@ServerName sysname=N'', --服务器名
@UserName sysname=N'', --用户名,不指定则表示使用 Windows 身份登录
@pwd sysname=N'' --密码
AS
SET NOCOUNT ON
DECLARE @srvid int,@Dbid int,@S_dbid int,@D_dbid int,@TransferID int,
@err int,@src varchar(255), @desc varchar(255)IF ISNULL(@ServerName,N'')=N'' SET @ServerName=@@SERVERNAME
IF ISNULL(@Source_DB,N'')=N'' SET @Source_DB=DB_NAME()--创建sqldmo对象·
EXEC @err=sp_oacreate 'sqldmo.sqlserver',@srvid OUT
IF @err<>0 GOTO lb_Err--连接服务器
IF ISNULL(@UserName,N'')=N'' --使用 Windows 身份登录
BEGIN
EXEC @err=sp_oasetproperty @srvid,'loginsecure',-1
IF @err<>0 GOTO lb_Err EXEC @err=sp_oamethod @srvid,'connect',NULL,@servername
END
ELSE
EXEC @err=sp_oamethod @srvid,'connect',NULL,@servername,@UserName,@pwdIF @err<>0 GOTO lb_Err--获取数据库集
EXEC @err=sp_oagetproperty @srvid,'databases',@Dbid OUT
IF @err<>0 GOTO lb_Err--选择源数据库
EXEC @err=sp_oamethod @Dbid,'item',@S_dbid OUT,@Source_DB
IF @err<>0 GOTO lb_Err--选择目标数据库
EXEC @err=sp_oamethod @Dbid,'item',@D_dbid OUT,@Des_DB
IF @err<>0 GOTO lb_Err--设置复制的对象
EXEC @err=sp_oacreate 'SQLDMO.Transfer',@TransferID OUT
IF @err<>0 GOTO lb_Err--设置目标服务器信息
EXEC @err=sp_oasetproperty @TransferID,'DestServer',@ServerName
IF @err<>0 GOTO lb_Err --设置连接用户
IF ISNULL(@UserName,N'')=N'' --使用 Windows 身份登录
BEGIN
EXEC @err=sp_oasetproperty @TransferID,'DestUseTrustedConnection',1
IF @err<>0 GOTO lb_Err
END
ELSE
BEGIN
EXEC @err=sp_oasetproperty @TransferID,'DestLogin',@UserName
IF @err<>0 GOTO lb_Err EXEC @err=sp_oasetproperty @TransferID,'DestPassword',@pwd
IF @err<>0 GOTO lb_Err
END --设置复制对象信息
EXEC @err=sp_oasetproperty @TransferID,'DestDatabase',@Des_DB
IF @err<>0 GOTO lb_ErrDECLARE tb CURSOR FAST_FORWARD LOCAL
FOR
SELECT Name FROM(
SELECT KeyWord=N',D,', Name=N'CopyAllDefaults' UNION ALL
SELECT KeyWord=N',O,', Name=N'CopyAllObjects' UNION ALL
SELECT KeyWord=N',R,', Name=N'CopyAllRules' UNION ALL
SELECT KeyWord=N',P,', Name=N'CopyAllStoredProcedures' UNION ALL
SELECT KeyWord=N',T,', Name=N'CopyAllTables' UNION ALL
SELECT KeyWord=N',TR,', Name=N'CopyAllTriggers' UNION ALL
SELECT KeyWord=N',DT,', Name=N'CopyAllUserDefinedDatatypes' UNION ALL
SELECT KeyWord=N',V,', Name=N'CopyAllViews' UNION ALL
SELECT KeyWord=N',DATA,',Name=N'CopyData' UNION ALL
SELECT KeyWord=N',DEL,', Name=N'DropDestObjectsFirst'
)A WHERE CHARINDEX(KeyWord,
CASE WHEN ISNULL(@Obj_Type,N'')='' THEN ',O,DATA,' ELSE @Obj_Type END)>0
OPEN tb
FETCH tb INTO @src
WHILE @@FETCH_STATUS=0
BEGIN
EXEC @err=sp_oasetproperty @TransferID,@src,1
IF @err<>0 GOTO lb_Err
FETCH tb INTO @src
END
CLOSE tb
DEALLOCATE tb--复制对象
EXEC @err=sp_oamethod @S_dbid,'Transfer',null,@TransferID
IF @err<>0 GOTO lb_Err--结束
SET @err=0
GOTO lb_Exit--错误处理
lb_Err:
EXEC sp_oageterrorinfo NULL, @src OUT, @desc OUT
RAISERROR(N'错误编号 %#x, 错误源 "%s", 错误描述 "%s"',16,1,@err,@src,@desc)
RETURN -1lb_Exit:
EXEC sp_OADestroy @Dbid
EXEC sp_OADestroy @srvid
EXEC sp_OADestroy @TransferID
RETURN @err
GO
--只复制结构是这样调用的:
EXEC P_CopyDB @Source_DB='northwind',@Des_DB='test',@Obj_Type='O'
SQL_DMO 很强大,只是相关得帮助很少