Data update

This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions

View file

@ -1,33 +0,0 @@
Import-Module -Name PSSQLite
## Create a database and a table
$dataSource = ".\Addresses.db"
$query = "CREATE TABLE SSADDRESS (Id INTEGER PRIMARY KEY AUTOINCREMENT,
LastName TEXT NOT NULL,
FirstName TEXT NOT NULL,
Address TEXT NOT NULL,
City TEXT NOT NULL,
State CHAR(2) NOT NULL,
Zip CHAR(5) NOT NULL
)"
Invoke-SqliteQuery -Query $Query -DataSource $DataSource
## Insert some data
$query = "INSERT INTO SSADDRESS ( FirstName, LastName, Address, City, State, Zip)
VALUES (@FirstName, @LastName, @Address, @City, @State, @Zip)"
Invoke-SqliteQuery -DataSource $DataSource -Query $query -SqlParameters @{
LastName = "Monster"
FirstName = "Cookie"
Address = "666 Sesame St"
City = "Holywood"
State = "CA"
Zip = "90013"
}
## View the data
Invoke-SqliteQuery -DataSource $DataSource -Query "SELECT * FROM SSADDRESS" | FormatTable -AutoSize

View file

@ -1,14 +0,0 @@
Option Explicit
Dim objFSO, DBSource
Set objFSO = CreateObject("Scripting.FileSystemObject")
DBSource = objFSO.GetParentFolderName(WScript.ScriptFullName) & "\postal_address.accdb"
With CreateObject("ADODB.Connection")
.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & DBSource
.Execute "CREATE TABLE ADDRESS (STREET VARCHAR(30) NOT NULL," &_
"CITY VARCHAR(30) NOT NULL, STATE CHAR(2) NOT NULL,ZIP CHAR(5) NOT NULL)"
.Close
End With