Rioran
Everything is possible and achievable.
- Сообщения
- 26
- Репутация
- 2
Всем привет и хорошего настроения!
Подскажите, пожалуйста, как с помощью Au3 выполнить запрос к базе данных SQLite на диске С?
В официальной справке нашёл замечательный кусок кода, в котором не хватает всего одной детали: как указать директорию базы и пароль к ней.
Для создания тестовой базы можно использовать запрос:
В дальнейшем планирую использовать set/get функции к этой базе:
Подскажите, пожалуйста, как с помощью Au3 выполнить запрос к базе данных SQLite на диске С?
В официальной справке нашёл замечательный кусок кода, в котором не хватает всего одной детали: как указать директорию базы и пароль к ней.
Код:
#include <MsgBoxConstants.au3>
#include <SQLite.au3>
#include <SQLite.dll.au3>
Local $hQuery, $aRow, $sMsg
_SQLite_Startup()
ConsoleWrite("_SQLite_LibVersion=" & _SQLite_LibVersion() & @CRLF)
_SQLite_Open() ; open :memory: Database
_SQLite_Exec(-1, "CREATE TABLE aTest (a,b,c);") ; CREATE a Table
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('c','2','World');") ; INSERT Data
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('b','3',' ');") ; INSERT Data
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('a','1','Hello');") ; INSERT Data
_SQLite_Query(-1, "SELECT b FROM aTest ORDER BY a;", $hQuery) ; the query
While _SQLite_FetchData($hQuery, $aRow) = $SQLITE_OK
$sMsg &= $aRow[0]
WEnd
_SQLite_Exec(-1, "DROP TABLE aTest;") ; Remove the table
MsgBox($MB_SYSTEMMODAL, "SQLite", "Get Data using a Query : " & $sMsg)
_SQLite_Close()
_SQLite_Shutdown()
; Output:
; ;~ Hello World
Для создания тестовой базы можно использовать запрос:
Код:
CREATE TABLE [Rio_03] ([Ind_Num] integer NOT NULL PRIMARY KEY AUTOINCREMENT, [DateX] NOT NULL, [TimeX] NOT NULL, [Name] varchar NOT NULL, [Event] varchar NOT NULL)
В дальнейшем планирую использовать set/get функции к этой базе:
Код:
INSERT INTO Rio_03([DateX], [TimeX], [Name], [Event]) VALUES (date('now', 'localtime'), time('now', 'localtime'), 'rvoronov', 'Random row');
SELECT [DateX], [TimeX], [Name], [Event] FROM [Rio_03] WHERE [Ind_Num] = (SELECT MAX([Ind_Num]) FROM Rio_03)