Solved

databindings

Posted on 2006-07-08
3
194 Views
Last Modified: 2010-04-23
hello experts ,
I want to query database and retrieve value of a field of table , and put it in textbox1,I wrote these :


Dim cn As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0; _
data  source=d:\db1.mdb")
cn.Open()
Dim da As OleDbDataAdapter = New OleDbDataAdapter _("select * from table1 where fname='hossein'", cn)
Dim ds As DataSet = New DataSet
TextBox1.DataBindings.Add("text", ds, "table1.lname")
da.Fill(ds)

but when I run this , error appear :

An unhandled exception of type 'System.ArgumentException' occurred in system.windows.forms.dll

Additional information: Cannot create a child list for field table1.

please help me to correct these codes,
is there better way?
thanks
0
Comment
Question by:farhadtolooie
  • 2
3 Comments
 
LVL 34

Expert Comment

by:Sancler
ID: 17064406
Unless you are using more than one DataTable, you don't need a DataSet, you can just work with a DataTable.  If you are using a DataAdapter you do not need explicitly to open the Connection: the DataAdapter opens and closes it automatically.  But if you are going explicitly to .Open a Connection, you should always .Close it, too.  Unless you are using a strongly typed dataset (i.e. one which is defined at design time) you should put your databinding after, not before, you fill your table.  Otherwise, as the error message says, the binding will not be able to find the table/field it is referred to: it won't yet exist.  

Rolling all that together (and assuming that your table has a field called "lname") try this.

Dim cn As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0; _
data  source=d:\db1.mdb")
Dim da As OleDbDataAdapter = New OleDbDataAdapter _("select * from table1 where fname='hossein'", cn)
Dim dt As New DataTable
da.Fill(dt)
TextBox1.DataBindings.Add("text", dt, "lname")

Roger
0
 

Author Comment

by:farhadtolooie
ID: 17064543
hello roger
I wrote your code and run it , but this error occur:

An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll

what doyou think about it?
what's the problem?

farhad
0
 
LVL 34

Accepted Solution

by:
Sancler earned 55 total points
ID: 17064688
I think this is the problem

Dim cn As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0; _
data  source=d:\db1.mdb")

I just copied and pasted it as it stood.  There are TWO spaces, not one, between 'data' and 'source'.  

Here it is corrected, and on one line.  I've just tested it (although with a different data source) and it works OK for me

        Dim cn As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0; data source=c:\test\test.mdb")

Copy and paste that, and substitute your d:\db1.mdb for my c:\test\test.mdb

Roger
0

Featured Post

Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

Join & Write a Comment

This article explains how to create and use a custom WaterMark textbox class.  The custom WaterMark textbox class allows you to set the WaterMark Background Color and WaterMark text at design time.   IMAGE OF WATERMARKS STEPS Create VB …
Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
This video demonstrates how to create an example email signature rule for a department in a company using CodeTwo Exchange Rules. The signature will be inserted beneath users' latest emails in conversations and will be displayed in users' Sent Items…
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

758 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now