[Gambas-user] convert code vb to gambas

[nando]

I would seem to me that if you did NOT get the message 'no records found'
then your data actually has symbol EOF in it.
Check your data rows for what code 002 has
-Fernando


---------- Original Message -----------
From: "gunartha.nyoman" <gunartha.nyoman at ...1817...>
To: mailing list for gambas users <gambas-user at lists.sourceforge.net>
Sent: Tue, 15 Jan 2008 11:11:04 +0700
Subject: [Gambas-user] convert code vb to gambas

> Dear All,
> 
> I try to create code to fin a record as :
> where run get message : unknown symbol EOF in result .....
> 
> PUBLIC SUB FindStok()
>   DIM strsql AS String
>   DIM rs AS Result
> 
>    strsql = " select code,nm_brg,pricef,avgcost from goods where code ='002' " 
>    rs = conn.Exec(strsql)
> 
>     'code in visual basic, how to convert to gambas
>     'rs as new adodb.recordset (in vb)
>    IF NOT rs.EOF THEN 
>       txtKD_BRG.Text = rs!nm_brg
> 
>    else
> 	message ("no records found ")
>    ENDIF  
> END
> 
> Thank you
> regards
> Gunartha
> 
> -------------------------------------------------------------------------
> Check out the new SourceForge.net Marketplace.
> It's the best place to buy or sell services for
> just about anything Open Source.
> http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
------- End of Original Message -------