Set up initial migrations

Migrations/Migrations.fsproj

@@ -1,5 +1,4 @@
 <Project Sdk="Microsoft.NET.Sdk">
-
   <PropertyGroup>
     <OutputType>Exe</OutputType>
     <TargetFramework>net8.0</TargetFramework>
@@ -10,7 +9,12 @@
   </ItemGroup>
 
   <ItemGroup>
+    <PackageReference Include="DbUp" Version="5.0.40" />
+    <PackageReference Include="dbup-sqlite" Version="5.0.40" />
     <PackageReference Include="Microsoft.Data.Sqlite" Version="8.0.6" />
   </ItemGroup>
 
+  <ItemGroup>
+    <EmbeddedResource Include="Scripts\*.sql" />
+  </ItemGroup>
 </Project>

Migrations/Program.fs

@@ -1,4 +1,28 @@
-[<EntryPoint>]
+open System.Reflection
+
+open DbUp
+open Microsoft.Data.Sqlite
+
+[<EntryPoint>]
 let main args =
-    let connectionString = ""
-    0
+    let connectionString = "Data Source=JimBroBot.db"
+
+    use connection = new SqliteConnection(connectionString)
+    use _ = new SQLite.Helpers.SharedConnection(connection)
+
+    let upgrader =
+        DeployChanges.To
+            .SQLiteDatabase(connection.ConnectionString)
+            .WithScriptsEmbeddedInAssembly(Assembly.GetExecutingAssembly())
+            .LogToConsole()
+            .Build()
+
+    let result = upgrader.PerformUpgrade()
+
+    match result.Successful, result.Error with
+    | (false, err) ->
+        printfn $"ERROR: ${err}"
+        1
+    | (true, _) ->
+        printfn "Migrations successful"
+        0