Use DB: '~\TestIni.idb'
Use DBInfo: '~\dataset\Info.idb'
Use TableInfo: '~\dataset\tables.itbl'

if (DB->Exists(DB->FromLoc('~\TestIni.idb')) is FALSE)
{
	CREATE NEW DATABASE('TestIni', '~\TestIni.idb', '1234', NULL, String->Empty)
}

event On_Startup(EventArgs e)
{
	DatabaseStartupEvent ee = (e to DatabaseStartupEvent)
	ee->IsThread = TRUE
	DB->Thread->Event = ee
	DB->Thread->Start()
}

if (DB->Exists(DB->FromLoc('~\TestIni.idb')) is TRUE && DB->Threads > 0)
{
	DB->RunThread(__SCRIPT)

	INSERT INTO 'Users', PARAM($ID|$Username|$Password), SET(
	$ID = DB->NextID('Users'),
	$Username = 'Test',
	$Password = '1234')

	EXECUTE >> RUN:SINGLE()
}

if (DB->SUCCESS)
	DB->SendCallback(TRUE)
else
	DIE CONNECTION & THROW ERROR[$Get, $Set'Connection has been killed']