SQL案例--001--20110508--批量生成SP的脚本

今天参加同事的婚礼，开心 ：）

中午一顿，晚上一顿，进行了两周的减肥计划再一次失败告终，杯具。。。

-----------------华丽的分割线----------------------------

 

言归正传，开始写和题目有关的内容。

 

环境：

    SQLServer2005服务器

    SQLServer2008R2客户端

 

需要把原始数据库中的50个左右的存储过程脚本导出，结果需要以一个SP一个文件的形式，文件名用SP名命名；

使用数据库的脚本生成，可以单独为每个SP生成一个文件，但是文件名是“DBO.[SPName].STOREDPROCEDURE”.sql，并不是我想要的[SPName].sql；

于是就想到要写一个批量重命名的脚本，翻出电脑里4年前的旧脚本找了半天，终于发现一个VBS的脚本，可以实现这样的功能，具体的步骤如下：

 

1、 使用Database的Generate Script

2、  选择需要生成脚本的SP

 

3、  选项设置

 

4、 运行批量改名的VBScript文件（运行前需要修改文件夹，详细代码如下）

 

strComputer = "." strWorkingFolder = "E:/DBGeneScript" Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/cimv2") Set colFiles = objWMIService.ExecQuery _ ("ASSOCIATORS OF {Win32_Directory.Name='" & strWorkingFolder & "'} Where ResultClass = CIM_DataFile") For Each objFile In colFiles 'strFileName = Right(strFileName,Len(strFileName)-Len(objFile.Drive & objFile.Path)) strNewName = Replace(UCase(objFile.Name),"DBO.","") strNewName = Replace(strNewName,".STOREDPROCEDURE","") errResult = objFile.Rename(strNewName) Next  

实际使用时，需要把代码里的strWorkingFolder值设置成实际生成的SP代码保存的文件夹；代码保存为.vbs文件，双击运行即可。

 

 

搞定，看电视。。。