Create An Database using SQL Connection

Abstract:


Create an new Database using SQL Connection.

Description:


To Create an new Database using SQL Connection in VB.net.

Code:



Imports System
Imports System.Data
Imports System.Data.SqlClient

Public Class CreateDatabase
Shared Sub Main()
Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _
"integrated security=sspi;database=DataBaseName;UID=sa;Pwd=")

'Create Command object
Dim nonqueryCommand As SqlCommand = thisConnection.CreateCommand()

Try
' Open Connection
thisConnection.Open()
Console.WriteLine ("Connection Opened")
' Execute NonQuery To Create Database
nonqueryCommand.CommandText = "CREATE DATABASE DataBaseName"
Console.WriteLine("Executing {0}",nonqueryCommand.CommandText)
Console.WriteLine("Number of rows affected : {0}",nonqueryCommand.ExecuteNonQuery())
' Execute NonQuery To Drop Database
nonqueryCommand.CommandText = "Drop DATABASE DataBaseName"
Console.WriteLine("Executing {0}",nonqueryCommand.CommandText)
Console.WriteLine("Number of rows affected : {0}",nonqueryCommand.ExecuteNonQuery())
Catch ex As SqlException
' Display error
Console.WriteLine ("Error: " & ex.ToString())
Finally
' Close Connection
thisConnection.Close()
Console.WriteLine ("Connection Closed")

End Try
End Sub
End Class


Comments

No responses found. Be the first to comment...


  • Do not include your name, "with regards" etc in the comment. Write detailed comment, relevant to the topic.
  • No HTML formatting and links to other web sites are allowed.
  • This is a strictly moderated site. Absolutely no spam allowed.
  • Name:
    Email: