Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 152
  • Last Modified:

DB GRID CONTROL AND DATA ACCESS

This is really annonying me.  I have an access DB that I am accessing through VB.  I have a DBcombo DBGrid and Data Control.

I have about 7 forms.  Main form calls the other forms where I am running a query.  On the first 3 forms this works fine:

Private Sub DBCombo1_Click(Area As Integer)

Let Me.Data1.RecordSource = "SELECT * FROM [STUDENT QUERY] WHERE [student id]= '" & _
Me!DBCombo1.Text & "'"
Me.Data1.Refresh


Even though It appears that I have the exact same code and properties for the controls, On all the other forms when I open the dbcombo or when the form loads, I get this message

Runtime Error 438
Object does not support this property or method
It occurs with the Data1.Refresh.

If I remove Data1.refresh I don't get errors, but of course the dbgrid is not bound to my dbcombo.

What am I doing wrong?
thanks
0
DAVIDH
Asked:
DAVIDH
  • 2
  • 2
1 Solution
 
anthonycCommented:
try dbgrid1.rebind

0
 
DAVIDHAuthor Commented:
It does not give me an error message, but it does not update anything either.

Any other ideas?
0
 
anthonycCommented:
I would try this:

dim rs as recordset

set rs = data1.database.openrecordset("select * from table1", dbOpenDynaset)
set data1.recordset = rs
dbgrid1.rebind


0
 
DAVIDHAuthor Commented:
I found the problem,  Each form has a Data1 on it, When I change the name to data6 and the dbgrid recordsource to data6 it works, go figure, it must have been looking at a datacontrol on another form.

David
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now