#include <SQLite.au3>
#include <SQLite.dll.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$hGUI1 = GUICreate("Form1", 174, 51, 192, 114)
$hCombo1 = GUICtrlCreateCombo("...", 12, 12, 145, 25)
GUISetState(@SW_SHOW)
Dim $hQuery, $aRow, $sMsg, $sFileDB = @ScriptDir & "\DB_FILE_NAME", $sNameTableDB = "MyDB", $sNameColDB = "MyColumn",
_SQLite_Startup($sFileDB)
; Запрос на выборку
_SQlite_Query (-1, "SELECT " & $sNameColDB & " FROM " & $sNameTableDB & ";", $hQuery)
While _SQLite_FetchData ($hQuery, $aRow) = $SQLITE_OK
GUICtrlSetData($hCombo1, $aRow[0] & "|")
WEnd
_SQLite_Close()
_SQLite_Shutdown()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd