学生档案管理系统（VB 与SqlServer2005）

SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[学生基本信息表]') AND type in (N'U')) BEGIN CREATE TABLE [dbo].[学生基本信息表]( [学号] [char](8) NOT NULL, [姓名] [char](10) NOT NULL, [入学日期] [datetime] NULL, [性别] [char](2) NULL, [出生日期] [datetime] NULL, [籍贯] [nvarchar](50) NULL, [民族] [nvarchar](50) NULL, [身份证号] [char](18) NULL, [政治面貌] [nvarchar](50) NULL, [电话] [nvarchar](50) NULL, [住址] [nvarchar](50) NULL, [邮箱] [nvarchar](50) NULL, [教育背景] [text] NULL, [备注] [text] NULL, CONSTRAINT [PK_学生基本信息表] PRIMARY KEY CLUSTERED ( [学号] ASC )WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY] ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY] END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[用户信息表]') AND type in (N'U')) BEGIN CREATE TABLE [dbo].[用户信息表]( [用户ID] [char](6) NOT NULL, [用户名称] [char](10) NOT NULL, [密码] [char](10) NOT NULL, [电话] [nvarchar](50) NULL, [邮箱] [nvarchar](50) NULL, CONSTRAINT [PK_用户信息表] PRIMARY KEY CLUSTERED ( [用户ID] ASC )WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY] ) ON [PRIMARY] END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[学籍异动信息表]') AND type in (N'U')) BEGIN CREATE TABLE [dbo].[学籍异动信息表]( [异动ID] [numeric](18, 0) IDENTITY(1,1) NOT NULL, [学号] [char](8) NOT NULL, [异动类型] [char](10) NOT NULL, [异动日期] [datetime] NULL, [异动原因] [text] NULL, CONSTRAINT [PK_学籍异动信息表] PRIMARY KEY CLUSTERED ( [异动ID] ASC )WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY] ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY] END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[家庭成员信息表]') AND type in (N'U')) BEGIN CREATE TABLE [dbo].[家庭成员信息表]( [成员ID] [numeric](18, 0) IDENTITY(1,1) NOT NULL, [学号] [char](8) NOT NULL, [成员姓名] [char](10) NOT NULL, [关系] [nvarchar](50) NULL, [职务] [nvarchar](50) NULL, [所在单位] [nvarchar](50) NULL, [联系方式] [nvarchar](50) NULL, CONSTRAINT [PK_家庭成员信息表] PRIMARY KEY CLUSTERED ( [成员ID] ASC )WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY] ) ON [PRIMARY] END GO IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_学籍异动信息表_学生基本信息表]') AND parent_object_id = OBJECT_ID(N'[dbo].[学籍异动信息表]')) ALTER TABLE [dbo].[学籍异动信息表] WITH CHECK ADD CONSTRAINT [FK_学籍异动信息表_学生基本信息表] FOREIGN KEY([学号]) REFERENCES [dbo].[学生基本信息表] ([学号]) ON DELETE CASCADE GO IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_家庭成员信息表_学生基本信息表]') AND parent_object_id = OBJECT_ID(N'[dbo].[家庭成员信息表]')) ALTER TABLE [dbo].[家庭成员信息表] WITH CHECK ADD CONSTRAINT [FK_家庭成员信息表_学生基本信息表] FOREIGN KEY([学号]) REFERENCES [dbo].[学生基本信息表] ([学号]) ON DELETE CASCADE insert into [dbo].[用户信息表] ( [用户ID] , [用户名称] , [密码] , [电话] , [邮箱] ) values( '123456' , 'qq' , 'qq' , '123' , '456' )