Then if you use only one connection you can use the last opened connection
in all the project by using DB
in the first form :
Public $hConn as new Connection
Public Sub _New()
$hConn.host=
$hConn.Name=
$hConn.Type="sqlite"
$hConn.Open
Form2.Show
End
In Form2 :
Public Sub Form_Open()
dim hResult as Result
hResult = DB.Find("mytable", "id=&1", 32)
if hResult.Available then
TextBox1.Text = hResult["field"]
Else
Message.Info("No result Found")
endif
end
------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and
threat landscape has changed and how IT managers can respond. Discussions
will include endpoint security, mobile security and the latest in malware
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user
