Welcome to the SQLitening support forums!
Started by cj, November 01, 2016, 02:04:07 pm
#INCLUDE ONCE "sqliteningFB.bi"#INCLUDE ONCE "string.bi"function MainOrSomething() AS integer dim AS long NumRecs dim AS long col, columns dim AS string crlf = CHR(13,10) dim s AS STRING cls slconnect "184.108.40.206",51234 slopen "sample.db3","C" slSel "SELECT rowid, manuf,product,price from parts limit 3" columns = slGetColumnCount if columns then do while slGetRow for col = 1 To columns s += slf(col) + CHR$(9) next mid$(s,len(s)-1) = crlf 'end line with CR NumRecs += 1 LOOP ? s ? "NumRecs";Numrecs else ? "No recordset returned" end if 'sldisconnect 'function result was not explicitly set undefined reference to 'slDisconnect@0'end function MainOrSomething
Quote from: Paul Squires on January 10, 2017, 09:55:38 pm... I have not converted the slRunProc function yet because, quite frankly, I don't yet totally understand the calling parameters....
Quote from: cj on January 11, 2017, 01:09:46 pmNot sure how to get rid of the console flashing for a second.
QuoteNot sure, yet if there is a FREEFILE function.