SQL创建数据库，重建和复制数据库数据

创建数据库:

strALLDataBaseName= "FN3L300MGYDF_" & Format(CDate(strDate), "yyyyMMdd")

strPos="E:/MSSQL/"

strSQL = "USE master " & _
"IF not exists(select * from sysdatabases where name='" & strALLDataBaseName & "') " & _
"create database " & strALLDataBaseName & " " & _
"on " & _
"( " & _
"name='" & strALLDataBaseName & "_data" & "', " & _
"filename='" & strPos & strALLDataBaseName & "_data" & ".mdf', " & _
"size=10, " & _
"filegrowth = 20% " & _
") " & _
"log on " & _
"( " & _
"name='" & strALLDataBaseName & "_log" & "', " & _
"filename='" & strPos & strALLDataBaseName & "_data" & ".ldf', " & _
"size=3, " & _
"filegrowth = 10% " & _
")"

select * into 会重建一样的数据库表，但是重建的表 没有主键和索引

Insert into 是插入数据

strSQL = " USE " & strALLDataBaseName & " " & _
" IF exists(Select ID From SYSOBJECTS Where ID=OBJECT_ID('Card_Fee')) " & _
" begin " & _
" Insert into " & strALLDataBaseName & ".dbo.Card_Fee Select * from FN3L300MGYDF.dbo.Card_Fee Where " & _
" FN3L300MGYDF.dbo.Card_Fee.CardFeeSN Not In (Select CardFeeSN From " & strALLDataBaseName & ".dbo.Card_Fee) " & _
" End " & _
" Else " & _
" begin" & _
" select * into " & strALLDataBaseName & ".dbo.Card_Fee from FN3L300MGYDF.dbo.Card_Fee " & _
" End "

重建数据库表，主键和索引

strSQL = " USE " & strALLDataBaseName & " " & _
" IF exists(Select ID From SYSOBJECTS Where ID=OBJECT_ID('acc_Bargain_M')) " & _
" begin " & _
" drop table " & strALLDataBaseName & ".dbo.acc_Bargain_M " & _
" End " & _
" CREATE TABLE [dbo].[acc_Bargain_M]( " & _
" [BargainMSN] [nchar](10) NOT NULL CONSTRAINT [DF_acc_Bargain_M_BargainMSN] DEFAULT ('AAA0000000'), " & _
" [DBCode] [nchar](3) NOT NULL CONSTRAINT [DF_acc_Bargain_M_DBCode] DEFAULT ('***'), " & _
" [State] [nchar](2) NOT NULL CONSTRAINT [DF_acc_Bargain_M_State] DEFAULT ('正常'), " & _
" [UpdateCount] [int] NOT NULL CONSTRAINT [DF_acc_Bargain_M_UpdateCount] DEFAULT ((0)), " & _
" [UpdateTime] [datetime] NOT NULL CONSTRAINT [DF_acc_Bargain_M_UpdateTime] DEFAULT ('1969-06-13'), " & _
" [UpdateName] [nvarchar](8) NOT NULL CONSTRAINT [DF_acc_Bargain_M_UpdateName] DEFAULT (''), " & _
" [MakeOutTime] [datetime] NOT NULL CONSTRAINT [DF_acc_Bargain_M_MakeOutTime] DEFAULT ('1969-06-13'), " & _
" [MakeOutName] [nvarchar](8) NOT NULL CONSTRAINT [DF_acc_Bargain_M_MakeOutName] DEFAULT (''), " & _
" [Viser] [nvarchar](8) NOT NULL CONSTRAINT [DF_acc_Bargain_M_Viser] DEFAULT (''), " & _
" [Remarks] [nvarchar](80) NOT NULL CONSTRAINT [DF_acc_Bargain_M_Remarks] DEFAULT (''), " & _
" [Auditor] [nvarchar](8) NOT NULL CONSTRAINT [DF_acc_Bargain_M_Auditor] DEFAULT (''), " & _
" [CustomerSN] [nchar](10) NOT NULL CONSTRAINT [DF_acc_Bargain_M_CustomerSN] DEFAULT ('AAA0000000'), " & _
" CONSTRAINT [PK_acc_Bargain_M] PRIMARY KEY CLUSTERED " & _
" ( " & _
" [BargainMSN] Asc " & _
" )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON, FILLFACTOR = 90) ON [PRIMARY] " & _
" ) ON [PRIMARY] " & _
" CREATE NONCLUSTERED INDEX [IX_acc_Bargain_MState] ON [dbo].[acc_Bargain_M] " & _
" ( " & _
" [State] Asc " & _
" )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON, FILLFACTOR = 90) ON [PRIMARY] " & _
" CREATE NONCLUSTERED INDEX [IX_acc_Bargain_MDBCode] ON [dbo].[acc_Bargain_M] " & _
" ( " & _
" [DBCode] Asc " & _
" )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON, FILLFACTOR = 90) ON [PRIMARY] " & _
" CREATE NONCLUSTERED INDEX [IX_acc_Bargain_M_CustomerSN] ON [dbo].[acc_Bargain_M] " & _
" ( " & _
" [CustomerSN] Asc " & _
" )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON, FILLFACTOR = 90) ON [PRIMARY] " & _
"Insert into " & strALLDataBaseName & ".dbo.acc_Bargain_M Select * From FN3L300MGYDF.dbo.acc_Bargain_M"