Dostęp do BtRecordset z ambasica
Ogólnie zadanie jest takie: z programu Symfonii (np. Handel) odczytać rekordy z różnych tabel programu FK.
Świetnie się nadaje BtRecordset. W vbscripcie można zrobić tak:
Kod:
set db = createobject("mxbtbase.btdatabase")
call db.open("s:\danefirm\fk\demo111b", "admin", "")
set rs = createobject("mxbtbase.btrecordset")
set rs.btdatabase = db
rs.open("kontrahenci")
rs.getrec(12)
WScript.Echo rs.value("skrot")
Ale w ambasicu nie ma tego nieszczęsnego set i zawodzi analogiczne:
Kod:
Dispatch db
Dispatch rs
db = createobject("mxbtbase.btdatabase")
db.open("s:\\danefirm\\fk\\demo111b", "admin", "")
rs = createobject("mxbtbase.btrecordset")
rs.btdatabase = db
rs.open("kontrahenci")
rs.getrec(12)
message rs.value("skrot")
Problemem jest niemożność prawidłowego wykonania operacji
rs.btdatabase = db
Wykonanie 'PropertyPut' nie powiodło się.
Co robić?
