Passing parameter to query for Access database

Question

0.00/5 (No votes)

See more:

VB

Hi,
I am using following code and trying to get data by given parameters.  I donot know how to pass the parameter value to my query.

Dim con As New OleDb.OleDbConnection
    Dim ds As New DataSet
    Dim da As OleDb.OleDbDataAdapter
    Dim sql As String

con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source = D:\.Net Programs\DB Experiments\AddressBook.mdb"
        con.Open()
        sql = "SELECT * FROM tblContacts where Name=? and City=?"
        da = New OleDb.OleDbDataAdapter(sql, con)
        da.Fill(ds, "AddressBook")
        con.Close()

Please advise.
Thanks
Furqan

Posted 19-Sep-11 4:32am

Furqan Sehgal

Add a Solution

2 solutions

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)

OriginalGriff · Answer 1 · 2011-09-19T05:05:00

Solution 1

Try:

VB

sql = "SELECT * FROM tblContacts where Name=@NM and City=@CT"
da = New OleDb.OleDbDataAdapter(sql, con)
da.SelectCommand.Parameters.AddWithValue("@NM", name)
da.SelectCommand.Parameters.AddWithValue("@CT", city)

Posted 19-Sep-11 5:05am

OriginalGriff

Comments

Furqan Sehgal 19-Sep-11 11:18am

I have been trying this and the error is
No value given for one or more required parameters.

Geoff Williams 19-Sep-11 12:02pm

The original query was correct. Using OLE, you need to use the '<bold>?/<bold>' character as place holders for the data values.

<pre lang="vb">sql = "SELECT * FROM tblContacts where Name=? and City=?"
da = New OleDb.OleDbDataAdapter(sql, con)
da.SelectCommand.Parameters.AddWithValue("@name", name)
da.SelectCommand.Parameters.AddWithValue("@city", city)</pre>

André Kraak · Answer 2 · 2011-09-19T05:11:00

Solution 2

You need to add the parameters to your data adapter using da.SelectCommand.Parameters.Add in the order they appear in the SQL statement.

See OleDbDataAdapter.SelectCommand Property[^] and OleDbCommand.Parameters Property[^] for details.

Posted 19-Sep-11 5:11am

André Kraak