Cursor question

[warik]

Can I do this with SQL?


a=1
use mytable && contain: number,name field
set order to number
seek(a)
if found()
messagebox("found it&quot
else
messagebox("nope&quot
endi


what I already done :


a=1
select * from mytable where number=a into my cursor


than what shuld I do next with the cursor mycursor? I use VFP5

Thank you in advance

 

[monikai]

Hi Warik !
Do you want the same what in the frst code ?

select mycursor
if reccount()<>0
messagebox(&quot;found it&quot
else
messagebox(&quot;nope&quot
endif



Monika from Warszawa (Poland)
(monikaiz@o2.pl)

 

[Mike Lewis]

Warik,

After you have run the SELECT, the cursor will contain the record that you were looking for, or it will be empty if the record does not exist.

You can test for that by doing:

IF RECCOUNT(&quot;MyCursor&quot > 0
messagebox(&quot;found it&quot
else
messagebox(&quot;nope&quot
endif

However, in this case, the SELECT has no advantage over the SEEK. I see no reason not to stay with your original code.

Mike



Mike Lewis
Edinburgh, Scotland

http://www.ml-consult.demon.co.uk

 

[warik]

Monikai and Mike, if I'm not wrong, what you are doing is counting mycursor record, but it's ok too for me.

Well, let me change the question. My problem with something like this :


a=1
use mytable && contain: number,name field
set order to number
seek(a)
if found()
iname=name
messagebox(&quot;Name is :&quot;+iname)
endi


can I do than with mycursor starting from this SQL :

a=1
select name from mytable where number=a into my cursor


I need something like this:

iname=select name from mytable where number=1
messagebox(&quot;Name is :+iname)

(of couse this code can not run)

thank's in advance

 

[monikai]

Hi!
select mycursor
if reccount()<>0
go top &&first for number=1
iname=mycursor.name
messagebox(&quot;Name is :+iname)
else
messagebox(&quot;nope&quot
endif

regards


Monika from Warszawa (Poland)
(monikaiz@o2.pl)

 

[Mike Lewis]

Warik,

OK, you want something like this:

a=1
select name from mytable where number=a into mycursor
if reccount > 0
iname=MyCursor.name
messagebox(&quot;Name is :&quot;+iname)
endif

Couple of points: Don't put a space between my and cursor; and Name isn't a very good choice for a field name, as it is a FoxPro keyword.

Mike


Mike Lewis
Edinburgh, Scotland

http://www.ml-consult.demon.co.uk

 

[warik]

Yes Monikai and Mike, now I understand how to use the cursor at my probelem. And also thank's for your point.

Thank you very much for you all