SqlException was unhandled

Question

0.00/5 (No votes)

See more:

Hello all.

I'm trying to build a class to my program that will work with a data base unfortunetly I ran into Runtime error named:

"SqlException was unhandled - Invalid object name 'ProgDB'."

*ProgDB is the name of my tabale at the Database

The class objectives are:

1) Building "Insert" function.
2) Building "Exist" function.
3) Building "Get" function.
4) Understanding The Code.

heres my code so far:

VB

Public Class DBClass
    Dim sqlConn As New SqlConnection
    Dim sqlCMD As New SqlCommand
    Dim sqlDataAdapter As New SqlDataAdapter
    Dim dbPath As String = My.Settings.DBPath.ToString()
    Dim connectString As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=" & dbPath & ";Integrated Security=True;Connect Timeout=30;User Instance=True"
    Dim ds As DataSet
    Function IDExist(ByVal iDNum As String) As Boolean
        sqlConn.ConnectionString = connectString
        sqlConn.Open()
        Dim strSQL As String = "SELECT IDNum FROM ProgDB WHERE (IDNum = " & iDNum & ")"
        sqlCMD.Connection = sqlConn
        sqlCMD.CommandText = strSQL
        Dim i As String = sqlCMD.ExecuteScalar
        Dim exist = True
        If i <> Nothing Then
            exist = False
        End If
        sqlConn.Close()
        Return exist
    End Function

Thank you in advance Tsahi

Posted 19-Sep-11 9:40am

tsahi-al

Updated 19-Sep-11 12:08pm

v3

Add a Solution

3 solutions

Solution 1

Hi
Error clearly says it couldn't find table from the details you provided,
Are you sure you connected to same DB as table ProgDB exists?

Posted 19-Sep-11 15:35pm

kris444

Comments

tsahi-al 20-Sep-11 4:50am

progDB Exist, Ive used the Database Query's Allthough I know SQL pretty good I'm not writing them,

Do you need any value of Syntax?

Tsahi.

Solution 2

I know what the problem is, for some reason My settings dose'nt save the Path to the DB and therefor my connection string has no path Value, when i set the Path manualy it works like a charm!

now i need to figure out Why it dose'nt save the path at my settings

it saves the ImgOutput Path but not the DB Path

heres the code:

VB

Private Sub Settings_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DBBox.Text = My.Settings.DBPath.ToString()
        ImgBox.Text = My.Settings.ImgOutput.ToString()
    End Sub

    Private Sub DoneBTN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DoneBTN.Click
        My.Settings.DBPath = DBBox.Text
        My.Settings.ImgOutput = ImgBox.Text
        MsgBox("Settings saved successfully!")
        Me.Close()
    End Sub

Posted 20-Sep-11 1:00am

tsahi-al

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

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

sachin10d · Accepted Answer · 2011-09-20T01:29:00

Try this.

VB

Public Class DBClass
    Dim sqlConn As New SqlConnection
    Dim sqlCMD As New SqlCommand
    Dim sqlDataAdapter As New SqlDataAdapter
    Dim dbPath As String = My.Settings.DBPath.ToString()
    Dim connectString As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=" & dbPath & ";Integrated Security=True;Connect Timeout=30;User Instance=True"
    Dim ds As DataSet
    Function IDExist(ByVal iDNum As String) As Boolean
        sqlConn.ConnectionString = connectString
        sqlConn.Open()
        Dim strSQL As String = "SELECT IDNum FROM ProgDB WHERE (IDNum = @IDNum)"
        sqlCMD.Connection = sqlConn
        sqlCMD.CommandText = strSQL
        sqlCMD.CommandTypte = CommandType.Text
        sqlCMD.Parameters.AddWithValue("@IDNum",iDNum)
        Dim i As String = sqlCMD.ExecuteScalar
        Dim exist = True
        If i <> Nothing Then
            exist = False
        End If
        sqlConn.Close()
        Return exist
    End Function