i've done this in vb.Net / C#.Net; let us know if you are a programmer and just need a deeper code example.

once i had the reference to System.Data.SQLite it's really easy.

Dim f As String = Application.StartupPath & "\" & "Stormrage.SQLite.db3"

'delete so we can test the whole process:

If File.Exists(f) Then

File.Delete(f)

End If

Dim SQLconn As New System.Data.SQLite.SQLiteConnection()

Dim SQLcommand As SQLiteCommand

Dim sql As String

'create database if it does not exist

Try

If Not File.Exists(f) Then

Dim SQLconnect As New System.Data.SQLite.SQLiteConnection()

'Database Doesn't Exist so Created at Path

SQLconnect.ConnectionString = "Data Source=" & f & ";"

SQLconnect.Open()

SQLconnect.Close()

End If

Catch ex As Exception

MsgBox(ex.ToString)

End Try

Try

'now the file exists, lets add some tables.

SQLconn.ConnectionString = "Data Source=" & f & ";"

SQLconn.Open()

SQLcommand = SQLconn.CreateCommand

''drop all the tables if they exist:

'Dim SchemaTable As New DataTable

'SchemaTable = SQLconn.GetSchema(SQLiteMetaDataCollectionNames.Tables, {"NEXUSLEVELS"})

'For int As Integer = 0 To SchemaTable.Rows.Count - 1

' If SchemaTable.Rows(int)!TABLE_TYPE.ToString = "table" Then

' sql =

' End If

'Next

'> create table t (

'> a varchar(15) check (length(a) <= 15),

'> b integer check (typeof(b) = 'integer')

sql = "CREATE TABLE [SQLiteDevelopers] ( " & vbCrLf

sql = sql & "[DeveloperID] INTEGER IDENTITY(1,1) NOT NULL, " & vbCrLf

sql = sql & "[DeveloperName] VARCHAR(50) NOT NULL, " & vbCrLf

sql = sql & "[DeveloperType] VARCHAR(30) NULL DEFAULT 'EVIL', " & vbCrLf

sql = sql & " PRIMARY KEY (DeveloperID), " & vbCrLf

sql = sql & " CHECK ([DeveloperType] = 'EVIL' OR [DeveloperType] = 'GOOD' OR [DeveloperType] = 'NEUTRAL') ) " & vbCrLf

sql = sql & " " & vbCrLf

SQLcommand.CommandText = sql

SQLcommand.ExecuteNonQuery()