sql删除数据库中所有表的数据

sql删除数据库中所有表的数据

ID:34726140

大小:60.68 KB

页数:4页

时间:2019-03-10

sql删除数据库中所有表的数据_第1页
sql删除数据库中所有表的数据_第2页
sql删除数据库中所有表的数据_第3页
sql删除数据库中所有表的数据_第4页
资源描述:

《sql删除数据库中所有表的数据》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、CREATEPROCEDUREDeleteAllDataASBEGINDECLARE@SQLnvarchar(2000),@CurrentTablesysname,@CurrentSchemasysname--GrabtheserverversionforanystatementswhichneedtobemodifiedbasedupontheserverversionDECLARE@ServerVersionintSET@ServerVersion=(SELECTCAST(LEFT(CAST(SERV

2、ERPROPERTY('ProductVersion')ASvarchar(50)),CHARINDEX('.',CAST(SERVERPROPERTY('ProductVersion')ASvarchar(50)))-1)ASint))--Thissolutionentailsacursor.Alternatively,itcouldbedonewith--theundocumentedstoredproceduresp_msforeachtable,orwithlooplogic.DECLARETab

3、leCursorSCROLLCURSORFORSELECTQUOTENAME(TABLE_SCHEMA)ASschemaname,QUOTENAME(TABLE_NAME)ASnameFROMINFORMATION_SCHEMA.TABLESWHERETABLE_TYPE='BASETABLE'OPENTableCursorFETCHNEXTFROMTableCursorINTO@CurrentSchema,@CurrentTable--DisablealltriggersfirstWHILE@@FETC

4、H_STATUS=0BEGIN--CreateaTSQLstringtodisabletriggersonthecurrenttableSET@SQL=(SELECT'ALTERTABLE'+@CurrentSchema+'.'+@CurrentTable+'DISABLETRIGGERALL')EXECUTEsp_ExecuteSQL@SQL;--Printasuccessorfailuremessage,dependinguponwhetherornotanerrorwasraised.IF@@ERR

5、OR=0BEGINPRINT'Triggerssuccessfullydisabledon'+@CurrentSchema+'.'+@CurrentTableENDELSEBEGINPRINT'Anerrorhasoccuredwhiledisablingtriggerson'+@CurrentSchema+'.'+@CurrentTableEND--CreateaTSQLstringtodisableconstraintsonthecurrenttableSET@SQL=(SELECT'ALTERTAB

6、LE'+@CurrentSchema+'.'+@CurrentTable+'NOCHECKCONSTRAINTALL')EXECUTEsp_ExecuteSQL@SQL;--Printasuccessorfailuremessage,dependinguponwhetherornotanerrorwasraised.IF@@ERROR=0BEGINPRINT'Constraintssuccessfullydisabledon'+@CurrentSchema+'.'+@CurrentTableENDELSE

7、BEGINPRINT'Anerrorhasoccuredwhiledisablingconstraintson'+@CurrentSchema+'.'+@CurrentTableEND--FetchthenexttablefromthecursorFETCHNEXTFROMTableCursorINTO@CurrentSchema,@CurrentTableEND--MovebacktothefirsttableinthecursorFETCHFIRSTFROMTableCursorINTO@Curren

8、tSchema,@CurrentTableWHILE@@FETCH_STATUS=0BEGINIF@ServerVersion>=9--IFwe'reonSQL2005orgreater,wecanuseTry/Catch.BEGINSET@SQL=(SELECT'BEGINTRYTRUNCATETABLE'+@CurrentSchema+'.'+@CurrentTable+'PRINT''Datasuccessfullytr

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。