Click here to Skip to main content
15,798,200 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
I created a program using SQL to insert data in database. Program run smoothly when I open forms but when I add data into database it gives me the error as follows:

An attempt to attach an auto-named database for file C:\Users\IECUSER\Documents\Visual Studio 2012\Projects\Invoicing Software\Invoicing Software\ failed. A database with the same name exists, or specified file cannot be opened, or it is located on UNC share.

What I have tried:

Imports System.Data.SqlClient
Imports System.Data.Sql
Imports System.IO
Public Class CustomerForm
    Dim cnoo As New SqlConnection("Data Source=(LocalDB)\v11.0;AttachDbFilename=C:\Users\IECUSER\Documents\Visual Studio 2012\Projects\Invoicing Software\Invoicing Software\;Integrated Security=True")
    Dim cmddd As New SqlCommand
    Dim dr As SqlDataAdapter
    Private Sub CustomerForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox7.Text = Label8.Text
    End Sub
    Private Sub TextBox3_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox3.TextChanged
        Label8.Text = Val(TextBox3.Text) + Val(TextBox7.Text)
    End Sub

    Private Sub TextBox6_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox6.TextChanged
        Label8.Text = Val(TextBox7.Text) - Val(TextBox6.Text)
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        If TextBox1.Text = "" Then
            MessageBox.Show("Enter Phone_No in TextBox")
        ElseIf TextBox2.Text = "" Then
            MessageBox.Show("Enter Customer_Name TextBox")
        ElseIf TextBox3.Text = "" Then
            MessageBox.Show("Enter Customer_Bus_Name TextBox")
        ElseIf TextBox4.Text = "" Then
            MessageBox.Show("Enter address TextBox")
            Dim cmded As New SqlCommand
            cmded.Connection = cnoo
            cmded.CommandText = "insert into CUTable (Customer_Name,Phone_No,Customer_Bus_Name,Address,Balance) values (@Customer_Name,@Phone_No,@Customer_Bus_Name,@Address,@Balance)"
            cmded.Parameters.AddWithValue("@Customer_Name", TextBox1.Text)
            cmded.Parameters.AddWithValue("@Phone_No", TextBox2.Text)
            cmded.Parameters.AddWithValue("@Customer_Bus_Name", TextBox4.Text)
            cmded.Parameters.AddWithValue("@address", TextBox5.Text)
            cmded.Parameters.AddWithValue("@Balance", Label8.Text)
            TextBox2.Text = ""
            TextBox2.Text = ""
            TextBox2.Text = ""
            TextBox2.Text = ""

            MessageBox.Show("Record  SAVED!")
        End If
    End Sub
End Class
Updated 30-Jul-23 9:49am

You're creating a connection at the class level, but never disposing it, so it's hanging open every time you open and close your form.

The same is true for the SqlCommand object you're creating up there too.

AWAYS create the connection object when you need it, as late as possible, and create your command object, set it up and execute it, then you MUST call Dispose on the command and connection objects when you're done with the command, disposing them as early as possible. This is what the "using" statement is for:
using (SqlConnection conn = new SqlConnection(connection string)
    using (SqlCommand comm = new SqlCommand(statement)
        // Finish setting up your command, like parameters
        // Execute the command
}  // When execution gets to here, the using statements will call
   // Dispose on the object defined in them automatically.
Share this answer
In addition to what Dave has said, you also probably shouldn't be attaching a database at all - it's only there for development and is not available in the production version of SQL Server.

Instead, create the DB in SQL Server (via CREATE TABLE commands or SSMS) and let it handle it.
Share this answer

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900