开发学院数据库 MSSQL Server 如何使用.NET和VB编程创建SQLServer 阅读

如何使用.NET和VB编程创建SQLServer

　2007-11-11 08:26:13　来源：WEB开发网　闂傚倷绶氬ḿ褍螞閹绢喖绠柨鐕傛嫹

闂傚倷绀侀幉锟犲垂閻㈠灚宕查柟鎵閸庡秵銇勯幒鎴濃偓鐢稿磻閹炬枼妲堟繛鍡楃С濞岊亞绱撻崒姘扁枌闁瑰嚖鎷�

婵犵數濮幏鍐川椤撴繄鎹曢梻渚€娼уú銈吤洪妸鈺佺劦妞ゆ帊鑳堕埊鏇㈡煏閸モ晛浠х紒杈╁仱閺佹捇鏁撻敓锟�闂傚倷绶氬ḿ褍螞閹绢喖绠柨鐕傛嫹　　闂傚倷鑳舵灙缂佺粯顨呴埢宥夊即閵忕姵鐎梺缁樺姇閻忔氨鈧凹鍓熷娲垂椤曞懎鍓伴梺閫炲苯澧紒澶婄秺瀵濡歌閸嬫捇妫冨☉娆忔殘闂佷紮缍€娴滎剟鍩€椤掑倹鏆柛瀣躬瀹曚即寮借閺嗭箓鏌ㄩ悤鍌涘

核心提示：概要程序员常常需要以编程方式创建数据库，本文介绍如何使用 ADO.NET 和 Visual Basic .Net 以编程方式创建 Microsoft SQL 创建示例的步骤 1.新建一个 Visual Basic .Net Windows 应用程序项目，如何使用.NET和VB编程创建SQLServer，默认情况下，将

　　概要
　　程序员常常需要以编程方式创建数据库。本文介绍如何使用 ADO.NET 和 Visual Basic .Net 以编程方式创建 Microsoft SQL
　　
　　创建示例的步骤
　　1.新建一个 Visual Basic .Net Windows 应用程序项目。默认情况下，将 Form1 添加到项目中。
　　2.在 Form1 上放一个 Command 按钮，并将其 Name 属性更改为 btnCreateDatabase，将其 Text 属性更改为 Create Database。
　　3.复制下面一行代码并粘贴到 Form1 的“general declaration”部分： Imports System.Data.SqlClient
　　4.复制下面的代码并粘贴到“Windows Form Designer generated code”区域之后：
　　
　　Private Sub btnCreateDatabase_Click(ByVal sender As System.Object, _
　　ByVal e As System.EventArgs) Handles btnCreateDatabase.Click
　　　　Dim reader As SqlDataReader
　　　　Dim str As String
　　
　　　　Dim myConn As SqlConnection = New SqlConnection("Server=(local)
etsdk;" & _
　　　　　　　　　　　　　　　　　　　　　　　　　　　　"uid=sa;pwd=;database=master")
　　
　　　　str = "CREATE DATABASE MyDatabase ON Prima(最完善的虚拟主机管理系统)RY " & _
　　　　　　　"(NAME = MyDatabase_Data, " & _
　　　　　　　" FILENAME = 'D:MyFolderMyDatabaseData.mdf', " & _
　　　　　　　" SIZE = 2MB, " & _
　　　　　　　" MAXSIZE = 10MB, " & _
　　　　　　　" FILEGROWTH = 10%) " & _
　　　　　　　" LOG ON " & _
　　　　　　　"(NAME = MyDatabase_Log, " & _
　　　　　　　" FILENAME = 'D:MyFolderMyDatabaseLog.ldf', " & _
　　　　　　　" SIZE = 1MB, " & _
　　　　　　　" MAXSIZE = 5MB, " & _
　　　　　　　" FILEGROWTH = 10%) "
　　
　　　　Dim myCommand As SqlCommand = New SqlCommand(str, myConn)
　　
　　Try
　　　　　　myConn.Open()
　　　　　　reader = myCommand.ExecuteReader()
　　　　Catch ex As Exception
　　　　　　MessageBox.Show(ex.ToString())
　　Finally
　　　　　　If Not reader Is Nothing Then
　　reader.Close()
　　　　　　　　If (myConn.State = ConnectionState.Open) Then
　　　　　　　　　　myConn.Close()
　　End If
　　　　　　　　MessageBox.Show("Database is created successfully", _
　　　　　　　　　　　　　　　　"MyProgram", MessageBoxButtons.OK, _
　　　　　　　　　　　　　　　　MessageBoxIcon.Information)
　　End If
　　End Try
　　End Sub
　　
　　5.更改连接字符串使其指向 sql server(WINDOWS平台上强大的数据库平台)，要确保将 Database 参数设置为 Master 或保留为空白。
　　6.按 F5 键或 CTRL+F5 组合键以运行该项目，然后单击创建数据库。
　　
　　其他注意事项
　　此代码创建的是带有特定属性的自定义数据库。
　　
　　将要保存所创建 .mdf 和 .ldf 文件的文件夹必须在运行该代码之前就已存在、否则会引发异常。
　　
　　如果想创建一个类似于 sql server(WINDOWS平台上强大的数据库平台) 的 Model 数据库的数据库并想让它存储在默认位置，那么请更改代码中的 str 变量： str = "CREATE DATABASE MyDatabase"