Is There a way to do this in B4A?
Dim sqLiteConnection As New SQLiteConnection("Data Source=D:\SQLite\test.db")
sqLiteConnection.Open
Dim function As New CelsToFahrFunction
sqLiteConnection.RegisterFunction([function])
Dim command As New SQLiteCommand("select CtoF(-40)", sqLiteConnection)
Dim result As Long = CLng(command.ExecuteScalar)
sqLiteConnection.UnRegisterFunction([function])
sqLiteConnection.Close
BR,
Fabio
Dim sqLiteConnection As New SQLiteConnection("Data Source=D:\SQLite\test.db")
sqLiteConnection.Open
Dim function As New CelsToFahrFunction
sqLiteConnection.RegisterFunction([function])
Dim command As New SQLiteCommand("select CtoF(-40)", sqLiteConnection)
Dim result As Long = CLng(command.ExecuteScalar)
sqLiteConnection.UnRegisterFunction([function])
sqLiteConnection.Close
BR,
Fabio