Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Ammar Hadi
  Where is Ammar Hadi?
 Al-Samawah
 Iraq
 Ammar Hadi
 To: mut jayan
  Where is mut jayan?
 chennai
 India
 mut jayan
 Tags
Subject: RE: Records not shown in grid
Thread ID: 228730 Message ID: 228737 # Views: 2 # Ratings: 1
Version: Visual FoxPro 9 Category: Grids
Date: Thursday, May 21, 2009 8:02:30 AM         
   


> I have create two forms namely 1. empmain.scx 2. search.scx, in empmain form I have entered new employee records only in that i have put one grid control, and five text boxes and three command button. when I run the form all the records displayed in grid. I have click search command button in empmain.scx the search form will open and i have find some records and again i have come back to empmain form the records not display in the grid control.
>
> 1. code of the empmain.scx is below
>
> use "D:\centac\emp.dbf"
> locate for (thisform.txtappno.value) = appno
> if NOT found()
> INSERT INTO centac values(thisform.txtappno.value, thisform.txtadd1.value, thisform.txtadd2.value, thisform.txtadd3.value, thisform.txtadd4.value,;
> thisform.combo1.value, thisform.combo2.value, thisform.txtddno.value, thisform.txtbank.value, VAL(thisform.txtamount.value), thisform.txtdate.value)
> thisform.grid1.refresh
> ELSE
> Messagebox("APPLNO ALREADY EXISTS")
> endif
> thisform.txtappno.value = ""
> thisform.txtadd1.value = " "
> thisform.txtadd2.value = " "
> thisform.txtadd3.value = " "
> thisform.txtadd4.value = " "
> thisform.txtddno.value = " "
> thisform.txtbank.value = " "
> thisform.txtamount.value = " "
> thisform.txtappno.setfocus
>
> 2. code of the seach is below
>
> use "D:\centac\emp.dbf
> if thisform.optiongroup1.option1.value = 1
> locate for thisform.txtsearch.value = ddno
> if found()
> Messagebox("RECORD FOUND")
> ELSE
> Messagebox("RECORD NOT FOUND")
> ENDIF
> thisform.txtsearch.value = " "
> thisform.txtsearch.setfocus
> ELSE
> if thisform.optiongroup1.option2.value =1
> lctext = alltrim(upper(this.parent.txtsearch.value))
> select * from centac where upper(address1) like lctext+'%'
> endif
> ENDIF
> thisform.txtsearch.value = " "
> thisform.txtsearch.setfocus
>
> How to rectify the problem?
>
Hi mut,

Your query:
select * from centac where upper(address1) like lctext+'%'
is questionable. Why there is no INTO clause??.

how do you use the result of this query?
the query this way is supposed to show results in a browse window.

Is your grid in the main form assigned the recordsource properly??

your query my affect the grid.

Ammar Hadi ................IRAQ

My Foxite Weblog

---------------
I I I really love foxite
___________________________

ENTIRE THREAD

Records not shown in grid Posted by mut jayan @ 5/21/2009 7:19:23 AM
RE: Records not shown in grid Posted by Ammar Hadi @ 5/21/2009 8:02:30 AM
RE: Records not shown in grid Posted by Stefan Wuebbe @ 5/21/2009 9:56:51 AM
RE: Records not shown in grid Posted by Mayur Subbu @ 5/22/2009 4:31:12 AM