While res.Available res.MoveNext Print "Field1: " & res["Field1"] Wend
me i do that : For each res Print "Field1:" & res!Field1 next It's more simple no ? 2011/7/1 Caveat <gam...@caveat.demon.co.uk>: > Hi, > > I'm trying to get database access to an ODBC datasource (have been > trying for a few days now). > > I have the simplest Access (.mdb) database in the world: one table > called people, with an id, a first name, a last name, and a phone > number. There is no password on the database. I can see data in the > people table if I use MDB Viewer (i.e. the table 'people' is NOT > empty!). > > Thanks to a tip from Ricardo, I have gotten as far as a good connection, > can see the ResultFields in the Result as expected (4 of them, with the > expected column names), I get the appropriate error if I deliberately > choose an invalid tablename (like persons for e.g.)... all good... > but... > > I can't seem to get any kind of actual results in my result set, > Result.Available seems to always be False although I know there's data > in the table. > > This is also the case if I run the Database example in Gambas3, so I'm > guessing it's not just my shoddy coding lol > > Here's the code I used (but note **it doesn't work** with the Database > example either!): > > Public Sub tryNewDB() > > Dim conn As Connection > Dim res As Result > Dim sql As String > Dim resF As ResultField > conn = Connections["NEWDB"] > conn.Open > sql = "select * from people" > res = conn.Exec(sql) > For Each resF In res.Fields > Print "Found field: " & resF.Name > Next > Print "Result Count: " & res.Count > res.MoveFirst > Print "Available? " & boolToString(res.Available) > While res.Available > res.MoveNext > Print "Field1: " & res["Field1"] > Wend > > End > > Private Function boolToString(value As Boolean) As String > > If value Then > Return "True" > Endif > Return "False" > > End > > ************ result *********** > Found field: ID > Found field: Field1 > Found field: Field2 > Found field: Field3 > Result Count: 0 > Available? False > ************ result *********** > > Many thanks in advance for any new pointers... > > Regards, > Caveat > > > ------------------------------------------------------------------------------ > All of the data generated in your IT infrastructure is seriously valuable. > Why? It contains a definitive record of application performance, security > threats, fraudulent activity, and more. Splunk takes this data and makes > sense of it. IT sense. And common sense. > http://p.sf.net/sfu/splunk-d2d-c2 > _______________________________________________ > Gambas-user mailing list > Gambas-user@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/gambas-user > -- Fabien Bodard ------------------------------------------------------------------------------ All of the data generated in your IT infrastructure is seriously valuable. Why? It contains a definitive record of application performance, security threats, fraudulent activity, and more. Splunk takes this data and makes sense of it. IT sense. And common sense. http://p.sf.net/sfu/splunk-d2d-c2 _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user