Тема: VBScript: работаем с SQLite
Пример записи данных в базу данных SQLite через ODBC Driver (Sqlite version 2.8.17):
Dim objConn,objRecordset
Set objConn = CreateObject("ADODB.Connection")
objConn.ConnectionString = "DSN=SQLite Datasource;Database=C:\test.db;StepAPI=0;SyncPragma=NORMAL;NoTXN=;Timeout=100000;ShortNames=;LongNames=;NoCreat=;NoWCHAR=;LoadExt=;"
objConn.Open
Set objRecordset = objConn.Execute("INSERT INTO mytab (name) VALUES (""test"")")
objConn.Close
Для работы примера достаточно скачать и установить SQLite ODBC Driver - sqliteodbc.exe. Далее из меню Пуск - Программы выбрать SQLite ODBC Driver --> Shells --> SQLite 2. После запуска SQLite 2 появится диалог открытия файла --> выбрать диск С и указать имя файла test.db. Далее в консольной программе для создания таблицы "mytab" написать следующее:
CREATE TABLE mytab (name TEXT NULL);
После того, как база данных создана - проверить вышеприведённый скрипт, запустив его на выполнение. Затем в консольной программе для проверки результатов работы скрипта можно набрать:
SELECT * FROM mytab;
Примечания: базы данных не будут создаваться на рабочем столе и если в пути к базе или в названии базы есть русские буквы. При использовании SQLite3 Datasource (для баз данных, использующих SQLite 3.* и выше) русский текст перед записью в базу данных необходимо перекодировать в кодировку UTF-8.
Автор примера - Alexbootch.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.