VB.Net/Database ADO.net/SqlCommand Drop

Материал из VB Эксперт
Перейти к: навигация, поиск

Drop a Database through SqlConnection

<source lang="vbnet"> Imports System Imports System.Data Imports System.Data.SqlClient public class MainClass

  Shared Sub Main()
     Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _
         "integrated security=sspi;database=MyDatabase")
     "Create Command object
     Dim nonqueryCommand As SqlCommand = thisConnection.CreateCommand()
     Try
        " Open Connection
        thisConnection.Open()
        Console.WriteLine("Connection Opened")
        " Execute NonQuery To Create Database
        nonqueryCommand.rumandText = "CREATE DATABASE MyDb"
        Console.WriteLine("Executing {0}",nonqueryCommand.rumandText)
        Console.WriteLine("Number of rows affected : {0}",nonqueryCommand.ExecuteNonQuery())
        " Execute NonQuery To Drop Database
        nonqueryCommand.rumandText = "Drop DATABASE MyDb"
        Console.WriteLine("Executing {0}",nonqueryCommand.rumandText)
        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

      </source>


Execute NonQuery To Drop a Table and report how many rows affected

<source lang="vbnet"> Imports System Imports System.Data Imports System.Data.SqlClient public class MainClass

  Shared Sub Main()
     Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _
         "integrated security=sspi;database=tempdb")
     "Create Command object
     Dim nonqueryCommand As SqlCommand = thisConnection.CreateCommand()
     Try
        " Open Connection
        thisConnection.Open()
        Console.WriteLine("Connection Opened")
        " Execute NonQuery To Create Table
        nonqueryCommand.rumandText = "CREATE TABLE MyTable (ID integer)"
        Console.WriteLine("Executing {0}", nonqueryCommand.rumandText)
        Console.WriteLine("Number of rows affected : {0}", nonqueryCommand.ExecuteNonQuery())
        " Execute NonQuery To Drop Table
        nonqueryCommand.rumandText = "DROP TABLE MyTable"
        Console.WriteLine("Executing {0}", nonqueryCommand.rumandText)
        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

      </source>