Solved

why it not show data?

Posted on 2001-08-16
8
180 Views
Last Modified: 2011-09-20
i have 2 forms here. i want the DBGrid in form2 show data based onthe StudentNumber from Text1 in form1. i have success doing this. THANKS to all who have helped me before!

but, my problem is the DBGrid only show the first time entering StudentNumber only.


for example:
i enter StudentNumber for the first time : AH970001
the DBGrid show all the AH970001 data.

but when i enter StudentNumber for the second time: AH 970031
the DBGrid still show the AH970001 data.


ooppss..
i put this coding in my Form1

Form2.Show vbModal
Form2.Text1.Text=Text1.Text

is there any wrong here?

could anybody teach me on how to settle this problem?

i appreciate any help!
thanks in advance.
Private Sub Form_Load()
   Dim MySQL As String
   Dim Log As String
   Dim db As Database
   
   Text1.Text = Form1.Text1.Text
 
    Set db = DBEngine(0).OpenDatabase("c:\WINDOWS\Desktop\Psm2\PSM2.mdb")

   MySQL = "SELECT * FROM QStudentSubject where StudentNumber='" & Text1.Text & "'"
   Data1.RecordSource = MySQL
   Data1.Refresh
   
   Log = "StudentNumber='" & Text1.Text & "'"
   
   If Not Data1.Recordset.NoMatch Then
       Text1.Text = Data1.Recordset![StudentNumber]
       Text2.Text = Data1.Recordset![StudentIC]
       
       With Data1.Recordset
           If Not Data1.Recordset.EOF Then                
               DBGrid1 = Data1.RecordSource  
           End If
       End With
   End If

End Sub

0
Comment
Question by:arnab79
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
8 Comments
 
LVL 2

Expert Comment

by:daveherrmann
ID: 6394340
Try rebinding when you refresh
0
 

Author Comment

by:arnab79
ID: 6394447
i don't know how to rebind and the comment is so short.
0
 
LVL 2

Expert Comment

by:daveherrmann
ID: 6394593
dbgrid1.rebind
dgbrid1.refresh

do that whenever you change the recordsource.  i might have them backwards (might be refresh before rebind)
0
Technology Partners: 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!

 

Expert Comment

by:costello
ID: 6395013
Davehermann


you are relatively new to this site so I would ask you to please read the guidelines on comments vs answers at the bottom of this page and on http://www.experts-exchange.com/jsp/cmtyQuestAnswer.jsp 

It is not considered good practice to lock questions in this way, as this places these questions in the locked section and reduces the visibility of the question to other experts. It also tends to put pressure on the questioner to accept the proposed answer. In future, please do not post "answers" except in trivial questions which have one and only one answer such as what is 1+1. I know that is a bit simplistic but I am sure you get the idea.

Having said that I hope that you continue to contribute to this site and that your experience proves useful to many others in future.
I am also rejecting your answer, for above reasons.

arnab79,

This does not mean that thi comment is not valuable, it still can be accepted as an answer.

costello
Community Support Moderator @ Experts-Exchange
0
 
LVL 15

Accepted Solution

by:
JackOfPH earned 15 total points
ID: 6395196
this is what dave mean...
With Data1.Recordset
          If Not Data1.Recordset.EOF Then                
              DBGrid1 = Data1.RecordSource
              ***DBGrid1.bind
              ***DBgrid1.refresh
          End If
      End With
  End If
0
 

Author Comment

by:arnab79
ID: 6395642
thanks to both dave and costello for trying to help me! :)
i appreciate it very much!
i'll try both of your suggestion now!
but, can i ask again if i still got problem?
0
 

Author Comment

by:arnab79
ID: 6395650
oh, thanks to JackOfPH ! :)  :)

thanks for elaborating the suggestion for me!:)
i appreciate it very much!
0
 

Author Comment

by:arnab79
ID: 6398044
hi everybody :)

i've tried Dave's and Jack's suggestion.
it worked!!!!
i'm happy! thank you!
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction In a recent article (http://www.experts-exchange.com/A_7811-A-Better-Concatenate-Function.html) for the Excel community, I showed an improved version of the Excel Concatenate() function.  While writing that article I realized that no o…
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

733 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