Hallo, ich bin seit einer Weile stiller Leser dieses Forums, hab aber nun selbst mal ein Problem.
Seit über einem halben Jahr versuche ich via C++ und dem Borland C++ Builder v6 auf ein Buchaltungsprogramm Namens BüroPlus zuzugreifen.
Ich habe schon das halbe Internet durchsucht und in einigen anderen Foren gepostet, leider bisher ohne Erfolg.
Evtl. könnt Ihr mir helfen.
Zu dem Buchhaltungsprogramm gibt es massig DemoProgramme und Scriptlets für die Sprachen Delphi 5 , WSH und VB aber nicht für C++
Das einfachste Beispiel in Delphi habe ich versucht umzustellen :
in :
Aber woher soll der Variant BPNext die Funktion Init kennen ?
Bei Delphi scheint es aber zu funktionieren.
Ich brauche dringend Hilfe, wenn mir jemand dabei auf die Sprünge helfen könnte, würde ich mich auch revanchieren.
Ich konnte folgende Quellen extrahieren :
Folgende Quellen konnte ich bisher extrahieren
http://www.ortleb.de/downloads/BPNext/BpNexT.IDL
http://www.ortleb.de/downloads/BPNext/BpNT_OCX.cpp
http://www.ortleb.de/downloads/BPNext/BpNT_OCX.h
http://www.ortleb.de/downloads/BPNext/BpNT_TLB.cpp
http://www.ortleb.de/downloads/BPNext/BpNT_TLB.h
CU
Torsten
Seit über einem halben Jahr versuche ich via C++ und dem Borland C++ Builder v6 auf ein Buchaltungsprogramm Namens BüroPlus zuzugreifen.
Ich habe schon das halbe Internet durchsucht und in einigen anderen Foren gepostet, leider bisher ohne Erfolg.
Evtl. könnt Ihr mir helfen.
Zu dem Buchhaltungsprogramm gibt es massig DemoProgramme und Scriptlets für die Sprachen Delphi 5 , WSH und VB aber nicht für C++
Das einfachste Beispiel in Delphi habe ich versucht umzustellen :
Code:
var BpApp: Variant; a,b,c : string; begin BpApp := CreateOleObject('BpNt.Application'); BpApp.Init('GetKundendaten','','',''); showmessage(BpApp.GetVersion); BpApp.GetKundendaten(a,b,c); showmessage(a + ' ' + b + ' ' + c); BpApp := nil; end;
Code:
//der Originale String AnsiString Original = "GetKundendaten"; AnsiString Original2 = ""; //der Puffer wchar_t c1[255]; Variant BPNext; BPNext = CreateOleObject("BpNt.Application"); BPNext.Init(Original.WideChar(c1,sizeof(c1)),Original2.WideChar(c1,sizeof(c1)),Original2.WideChar(c1,sizeof(c1)),Original2.WideChar(c1,sizeof(c1))); BPNext = Unassigned;
Bei Delphi scheint es aber zu funktionieren.
Ich brauche dringend Hilfe, wenn mir jemand dabei auf die Sprünge helfen könnte, würde ich mich auch revanchieren.
Ich konnte folgende Quellen extrahieren :
Folgende Quellen konnte ich bisher extrahieren
http://www.ortleb.de/downloads/BPNext/BpNexT.IDL
http://www.ortleb.de/downloads/BPNext/BpNT_OCX.cpp
http://www.ortleb.de/downloads/BPNext/BpNT_OCX.h
http://www.ortleb.de/downloads/BPNext/BpNT_TLB.cpp
http://www.ortleb.de/downloads/BPNext/BpNT_TLB.h
CU
Torsten