Very Simple Problem

[Merlin]

Hello All,

Hope somebody wouldn`t mind helping me, i have a problem and as a newbie I
don`t know where im going wrong:

I keep getting the following error "An unhandled exception of type
'System.Data.Ol eDb.OleDbExcept ion' occurred in system.data.dll " on the line
that says: "daPatientsIDs. Fill(dtPatients IDs)"

When trying to run this Code:

'CODE START
Option Strict On
Imports System.Data.Ole Db

Public Class Form1
Inherits System.Windows. Forms.Form

Dim dbConnection As OleDbConnection
Dim dbCommand As OleDbCommand
Dim dbDataAdapter As OleDbDataAdapte r
Dim ConnectString As String = "Provider = Microsoft.Jet.O LEDB.4.0;" &
"Data Source = Hospital.MDB"
Dim dtPatientsIDs As New DataTable()
Dim daPatientsIDs As New OleDbDataAdapte r("Select [Patients ID] from
Patients", ConnectString)

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
daPatientsIDs.F ill(dtPatientsI Ds)
lstPatientIDs.D ataSource = dtPatientsIDs
lstPatientIDs.D isplayMember = "Patient ID"

OleDbDataAdapte r.Fill(dsPatien tsAndWards)

txtWardName.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Name")
txtWardType.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Type")

End Sub
End Class
'CODE FINISH

Anybody shed any light on this?

Regards
Merlin

[Jeremy Cowles]

"Merlin" <te**@nospam.co m> wrote in message
news:Rp******** ************@ka roo.co.uk...

Hello All,

Hope somebody wouldn`t mind helping me, i have a problem and as a newbie I
don`t know where im going wrong:

I keep getting the following error "An unhandled exception of type
'System.Data.Ol eDb.OleDbExcept ion' occurred in system.data.dll " on the line that says: "daPatientsIDs. Fill(dtPatients IDs)"

You need to put your fill statement in a try block, that way you will get a
descriptive error. Something like this:

....
Try
OleDbDataAdapte r.Fill(dsPatien tsAndWards)
Catch Ex as Exception
Console.WriteLi ne("Error: " & ex.Message)
Msgbox("Error: " & Ex.Message)
End Try
....

Then run it again, and give us the descriptive error message.

~
Jeremy

[Armin Zingler]

"Merlin" <te**@nospam.co m> schrieb

Hope somebody wouldn`t mind helping me, i have a problem and as a
newbie I don`t know where im going wrong:

I keep getting the following error "An unhandled exception of type
'System.Data.Ol eDb.OleDbExcept ion' occurred in system.data.dll " on
the line that says: "daPatientsIDs. Fill(dtPatients IDs)"

Already tried putting it in a try-catch block and examining the thrown
exception? Exception should contain details.

If it turns out to be an ADO.NET related question: Right group is
microsoft.publi c.dotnet.framew ork.adonet
--
Armin

http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

[Merlin]

Jeremy i`ve put the code in Try Expressions like you said and it throws up:

"Additional information: This would cause two bindings in the collection to
bind to the same property." on:

txtWardName.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Name")
txtWardType.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Type")

In my book that im working from it say "In the Forms Load event, write the
following code to fill the dataset from the the data adapter and then to
bind the two textboxes displaying details about the wards to the ward name
and ward type fields in the dataset"

Thanks for you help so far

Ta
Merlin

"Merlin" <te**@nospam.co m> wrote in message
news:Rp******** ************@ka roo.co.uk...

Hello All,

Hope somebody wouldn`t mind helping me, i have a problem and as a newbie I
don`t know where im going wrong:

I keep getting the following error "An unhandled exception of type
'System.Data.Ol eDb.OleDbExcept ion' occurred in system.data.dll " on the line that says: "daPatientsIDs. Fill(dtPatients IDs)"

When trying to run this Code:

'CODE START
Option Strict On
Imports System.Data.Ole Db

Public Class Form1
Inherits System.Windows. Forms.Form

Dim dbConnection As OleDbConnection
Dim dbCommand As OleDbCommand
Dim dbDataAdapter As OleDbDataAdapte r
Dim ConnectString As String = "Provider = Microsoft.Jet.O LEDB.4.0;" &
"Data Source = Hospital.MDB"
Dim dtPatientsIDs As New DataTable()
Dim daPatientsIDs As New OleDbDataAdapte r("Select [Patients ID] from
Patients", ConnectString)

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
daPatientsIDs.F ill(dtPatientsI Ds)
lstPatientIDs.D ataSource = dtPatientsIDs
lstPatientIDs.D isplayMember = "Patient ID"

OleDbDataAdapte r.Fill(dsPatien tsAndWards)

txtWardName.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard Name")
txtWardType.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard Type")

End Sub
End Class
'CODE FINISH

Anybody shed any light on this?

Regards
Merlin

[Jeremy Cowles]

"Merlin" <te**@nospam.co m> wrote in message
news:mp******** ************@ka roo.co.uk...

Jeremy i`ve put the code in Try Expressions like you said and it throws up:
"Additional information: This would cause two bindings in the collection to bind to the same property." on:

txtWardName.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Name")
txtWardType.Dat aBindings.Add(" Text", dsPatientsAndWa rds, "Patients.W ard
Type")

In my book that im working from it say "In the Forms Load event, write the
following code to fill the dataset from the the data adapter and then to
bind the two textboxes displaying details about the wards to the ward name
and ward type fields in the dataset"

My *guess* is that your code is executing more than once, and doubling the
bindings, however this question really belongs in the ADO.NET Group:

microsoft.publi c.dotnet.framew ork.adonet
~
Jeremy

[Jeremy Cowles]

One other thing you might try is stepping through each line of code to see
exactly when it crashes. You can do this by selecting "Debug > Step Into"
on the main menu at Design Time (while the app is NOT running) or F8 if you
use VB Classic key bindings.

~
Jeremy