Sample Script: TLuaDB

--Create new DB device

DB = TLuaDB();

--Connect to a DSN

if (DB:Connect("DSN=testdsn;",TLuaDB.CLIENT_ODBC) == true) then

	--Insert a few rows

	bok = DB:Execute("insert into test (iID,sTest) values(10,'test');");

	--Select all rows in table

	bok = DB:Execute("select * from test;");

	if ( bok == true) then

		--Check if we got rows back

		if(DB:ResultAvilable() == true) then

			--Print how many columns this table contains

			iColCount = DB:ColCount(); print("Columns in this table: "..iColCount);

			--Get first row

			while (DB:NextRow() == true) do

				for iCurrentCol = 1, iColCount do

					--GetColType and GetCol take a 1 based index

					iColType = DB:GetColType(iCurrentCol);

					sData = DB:GetCol(iCurrentCol);

					--Print column #, column type and data

					print("Col #"..iCurrentCol.." Type: ".. iColType.." Data: "..sData);

				end

			end

		end

	else

		--Print error and exit

		SetExitStatus("Failed" .. DB:GetErrorDescription(),false);

	end

else

	--Print error and exit

	SetExitStatus("Failed to connect"..DB:GetErrorDescription(),false);

end