Inno setup 如果Inno脚本中没有使用ADODB的目录，如何创建新目录（数据库）

作为安装程序的一部分，我正在尝试通过inno安装程序执行sql脚本。Sql脚本工作正常。下面是我的示例代码

procedure RunScript();
var
 ADOCommand: Variant;
 ADOConnection: Variant;
begin
 try
 ADOConnection := CreateOleObject('ADODB.Connection'); 
 ADOConnection.ConnectionString := 
  'Provider=SQLOLEDB;' +               // provider
  'Data Source=localhost\SomeInstance;' +   // server name
  'Initial Catalog=SomeDB;' +
  'Application Name=Demo;' +
  'Integrated Security=SSPI;';                   // password
 ADOConnection.Open;
 try
    ADOCommand := CreateOleObject('ADODB.Command');
    ADOCommand.ActiveConnection := ADOConnection;
    
    ExtractTemporaryFile('DatabaseScript.sql');
    //Execute script
    ExecuteScript(ExpandConstant('{tmp}{\}') + 'DatabaseScript.sql', ADOCommand);

 finally
  ADOConnection.Close;
 end;
 except
  MsgBox(GetExceptionMessage, mbError, MB_OK);
 end;
end;

我的要求是检查指定名称的数据库是否不存在，然后它应该首先创建该数据库，然后执行上面的代码。但在这里，我必须提供目录名，脚本将在该数据库上执行

我正在寻找的是

db := CreateOleObject('ADODB.Database');

是否可以使用inno设置脚本（pascal脚本）

提前谢谢