Vista - Local variable assAdapter already declared in block?

Now you can work on your naming conventions.

The @$$Adaptor sounds like something you use to get a colonoscopy and you
have an oversized or undersized butt. (ha ha).

...



"bill" <bill@xxxxxx> wrote in message
news:ubas75J7IHA.4108@xxxxxx

This is exactly the same problem you had in the previous example.

Either remove the first Dim (the best solution), or change the second
one to just an assignment statement:

assCmd = New OleDb.OleDbCommand( _
"SELECT * from tblAssets where asset_tag=?")

On Mon, 21 Jul 2008 22:24:14 -0600, "bill" <bill@xxxxxx>
wrote:

It's still the assAdapter that errors out in this. It's not declared
anywhere else so I just don't see why this is happening. If i take out the
first declaration there are even more errors that come up.

"Jack Jackson" <jjackson@xxxxxx> wrote in message
news:b5pa849kcqoh9e6m74c43r8866noafne1a@xxxxxx

Sorry I see where you were going with that and you are right. It works like
this:
assAdapter = New OleDb.OleDbDataAdapter '(assCmd, Con)

What I don't see in the properties now is how to add the command and the
connection to the dataAdapter. Can you help me there since you've almost
done it all now?

Thank you!

"bill"<bill@xxxxxx> wrote in message
news:OhRK3f76IHA.5012@xxxxxx

You specify the connection in the command object.

assCmd = New OleDb.OleDbCommand( _
"SELECT * from tblAssets where asset_tag=?", Con)
assAdapter = New OleDbAdapter(assCmd)

or
assCmd = ...
Dim assAdapter as New OleDbAdapter
assAdapter.SelectCommand = assCmd


On Mon, 21 Jul 2008 23:05:29 -0600, "bill" <bill@xxxxxx>
wrote:

Thank you again! That got it Though there is more now.... I get an error
at "assAdapter.fill(assDT)" that says "fill: SelectCommand.Connection
property has not been initialized? Do you see why?
Dim Con = New OleDb.OleDbConnection("provider=microsoft.jet.oledb.4.0;" &
"data source=c:\_Archive\Documentation - Projects\Hardware Tracking -
2008\IT_Assets.mdb")

Dim assCmd As New OleDb.OleDbCommand("SELECT * from tblAssets where
asset_tag=?")

Dim assAdapter As OleDb.OleDbDataAdapter

assAdapter = New OleDb.OleDbDataAdapter(assCmd)

'Dim assCmd As OleDb.OleDbCommand

assCmd = New OleDb.OleDbCommand("SELECT * from tblAssets where asset_tag=?",
Con)

assCmd.Parameters.Add("asset_tag", OleDbType.VarChar).Value = cboAsset.Text

Dim assDT As New DataTable

'Need to initialize the dataAdapter here

'Release the instances of the above objects

assAdapter.Fill(assDT)

'assAdapter.Dispose()

Me.DataGridView1.DataSource = assDT

End If



"Jack Jackson" <jjackson@xxxxxx> wrote in message
news:f67c84lj9a92i4ds6rk7vrbnpa0f517mn5@xxxxxx

Sure. The message says it all. The DataAdapter's Select command,
which is built from the text you pass to the DataAdapter's
constructor, doesn't have any connection info.

See my comments below.
On Tue, 22 Jul 2008 18:05:09 -0600, "bill" <bill@xxxxxx>
wrote:
The following line creates an OleDbCommand without a connection
object.
The following line creates a DataAdapter from the OleDbCommand object
that doesn't have a connection object.
The following line creates a second command object with the same
select as the previous one, this time with a connection object. This
command object is never used. You should get rid of this line, and
add Con as a second parameter to the previous OleDbCommand.

Oh man, I should have seen that. I comment out that lin, add the con to the
second and it works perfectly. Thank you so much! You have been incredibly
helpful and patient and I really appreciate it. I have learned allot!
Thank you!
Bill Bray

"Jack Jackson" <jjackson@xxxxxx> wrote in message
newskid841jv1v9t9r705clrbc5bphn5u8kgr@xxxxxx

Now you can work on your naming conventions.

The @$$Adaptor sounds like something you use to get a colonoscopy and you
have an oversized or undersized butt. (ha ha).

...



"bill" <bill@xxxxxx> wrote in message
news:ubas75J7IHA.4108@xxxxxx

LOL! I thought someone would have said something sooner

It just made sense to me...it was a data adapter for the assets....but it
still made me chuckle.

"sloan" <sloan@xxxxxx> wrote in message
news:OOntyqZ7IHA.2416@xxxxxx