SQL Server–怎样用ADO在SQL SERVER中建库，建表

让我用markdown格式为您详细讲解如何使用ADO在SQL Server中建库和建表。

在SQL Server中使用ADO建库和建表

首先，我们需要确保已经安装了SQL Server，并且了解一些SQL语句的基础知识。

步骤1: 创建一个连接对象

要在SQL Server中使用ADO，首先需要创建一个连接对象。以下是一个示例：

Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=SQLOLEDB;Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;"

在该示例中，myServerAddress是SQL Server的IP地址或主机名，myDataBase是要连接的数据库名称，myUsername是数据库的用户名，myPassword是用户名的密码。根据自己的实际情况修改即可。

步骤2: 打开连接

创建连接对象后，需要打开连接，示例代码如下：

conn.Open

步骤3: 创建数据库

以下是创建一个名为myDatabase的数据库的示例代码：

Dim sql
sql = "CREATE DATABASE myDatabase"
conn.Execute sql

在上面的示例中，我们首先定义了一个变量sql，用于存储SQL语句。然后，我们将要创建的数据库名称myDatabase存储在该变量中，并调用conn.Execute方法执行该SQL语句来创建新的数据库。

步骤4: 选择数据库

在执行SQL语句前，还需要选择要使用的数据库，示例代码如下：

conn.DefaultDatabase = "myDatabase"

在上面的示例中，我们将要使用的数据库名称myDatabase赋值给conn.DefaultDatabase属性。

步骤5: 创建表

创建完数据库后，接下来需要创建表。以下是创建一个名为user的表的示例代码：

sql = "CREATE TABLE user (id INT PRIMARY KEY, name VARCHAR(50), age INT)"
conn.Execute sql

在该示例中，我们定义了一个名为user的表，该表包含三列：id(整型，主键)，name(字符串型，最大长度为50)，age(整型)。

步骤6: 关闭连接

最后，要记得关闭连接对象以释放资源，示例代码如下：

conn.Close
Set conn = Nothing

示例说明

示例1：创建一个部门表

下面是一个示例，用于创建一个名为Department的表，该表包含两列：DeptId(整型，主键)，DeptName(字符串型，最大长度为50)。

Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=SQLOLEDB;Data Source=myServerAddress;Initial Catalog=myDatabase;User Id=myUsername;Password=myPassword;"
conn.Open
conn.DefaultDatabase = "myDatabase"
Dim sql
sql = "CREATE TABLE Department (DeptId INT PRIMARY KEY, DeptName VARCHAR(50))"
conn.Execute sql
conn.Close
Set conn = Nothing

示例2：创建一个学生表

下面是另一个示例，用于创建一个名为Student的表，该表包含三列：StuId(整型，主键)，StuName(字符串型，最大长度为50)，Gender(字符串型，最大长度为10)，Age(整型)。

Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=SQLOLEDB;Data Source=myServerAddress;Initial Catalog=myDatabase;User Id=myUsername;Password=myPassword;"
conn.Open
conn.DefaultDatabase = "myDatabase"
Dim sql
sql = "CREATE TABLE Student (StuId INT PRIMARY KEY, StuName VARCHAR(50), Gender VARCHAR(10), Age INT)"
conn.Execute sql
conn.Close
Set conn = Nothing

以上就是使用ADO在SQL Server中建库和建表的完整攻略了，希望对您有所帮助！