VB.NET

how to create database

Please support our VB.NET advertiser: Intel Parallel Studio Home

Thread Solved

•

Join Date: Jun 2009

Posts: 23

Reputation: sweetsasthi is an unknown quantity at this point

Solved Threads: 0

sweetsasthi sweetsasthi is offline

Offline

Newbie Poster

how to create database

Jul 4th, 2009

hai friends,
I dont know how to create database dynamically in vb.net.(if a button is clicked 4 databases in access or sql has to be created).similarly by clicking the delete button the specified database should be deleted.can you help me out with the coding.

•

Join Date: Oct 2008

Posts: 2,721

Reputation: adatapost has much to be proud of

Solved Threads: 500

adatapost

Offline

Posting Maven

Re: how to create database

Jul 5th, 2009

sweetsasthi,

General Syntax:
Create database databasename.

•

Join Date: Jun 2009

Posts: 23

Reputation: sweetsasthi is an unknown quantity at this point

Solved Threads: 0

sweetsasthi sweetsasthi is offline

Offline

Newbie Poster

Re: how to create database

Jul 6th, 2009

Thank you.
But can I have the exact coding for creating a database when a button is clicked in vb.net

•

Join Date: Jun 2009

Posts: 107

Reputation: Piya27 is an unknown quantity at this point

Solved Threads: 8

Piya27

Offline

Junior Poster

Re: how to create database

Jul 6th, 2009

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
[code = VB.NET]
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim con As SqlConnection
        Dim sql As String
        Dim cmd As SqlCommand
 
        con = New SqlConnection("Server=urserver;" & "DataBase=;" & "Integrated Security=ur security;")
        sql = "CREATE DATABASE ABC  ON PRIMARY" + "(Name=abc_data, filename = 'C:\MSSQL7\data\abc.mdf', size=3," + "maxsize=5, filegrowth=10%)log on" + "(name=abc_log, filename='C:\MSSQL7\abc_log.ldf',size=3," + "maxsize=20,filegrowth=1)"
        con.Open()
 
        cmd = New SqlCommand(sql, con)
 
        Try
            cmd.ExecuteNonQuery()
            MsgBox("DATABASE Created")
        Catch ex As Exception
            MsgBox("Database Already Exists!")
        End Try
 
    End Sub
[code = VB.NET]
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim con As SqlConnection
        Dim sql As String
        Dim cmd As SqlCommand

        con = New SqlConnection("Server=urserver;" & "DataBase=;" & "Integrated Security=ur security;")
        sql = "CREATE DATABASE ABC  ON PRIMARY" + "(Name=abc_data, filename = 'C:\MSSQL7\data\abc.mdf', size=3," + "maxsize=5, filegrowth=10%)log on" + "(name=abc_log, filename='C:\MSSQL7\abc_log.ldf',size=3," + "maxsize=20,filegrowth=1)"
        con.Open()

        cmd = New SqlCommand(sql, con)

        Try
            cmd.ExecuteNonQuery()
            MsgBox("DATABASE Created")
        Catch ex As Exception
            MsgBox("Database Already Exists!")
        End Try

    End Sub