db.Create("MxDokFkforte.BtDatabase")
    db.Open("DRIVER=SQL Server;Server="+serwer+";Database="+baza+";",userek,haslo)
    dk.Create("mxDokFKforte.PDokument")
    dk.Open((using "%d,BUFOR", IndeksRoku()),db)

string userek="Admin"
string haslo=""
string serwer="DOMOWY-PC\SAGEPL"  // tylko FORTE
string baza="BAZA20212"      // tylko FORTE
dispatch db,dk
db.Create("mxDokFKforte.BtDatabase")
db.Open("DRIVER=SQL Server;Server="+serwer+";Database="+baza+";",userek,haslo)
dk.Create("mxDokFKforte.PDokument")