4642 NOTE: changed project to use qbfc15, was using 14 installer looks for qbfc14 so changed that to 15 as well, docs may need to be changed as well

This commit is contained in:
2026-02-13 09:31:20 -08:00
parent e865c22aca
commit c1e4459dfa
4 changed files with 8 additions and 7 deletions

4
.gitignore vendored
View File

@@ -2,4 +2,6 @@ bin/
obj/ obj/
*.user *.user
.vs/ .vs/
packages/ packages/
/install/output
/AyaNovaQBI/Timestamp.cs

View File

@@ -50,10 +50,9 @@
<Prefer32Bit>false</Prefer32Bit> <Prefer32Bit>false</Prefer32Bit>
</PropertyGroup> </PropertyGroup>
<ItemGroup> <ItemGroup>
<Reference Include="interop.QBFC14, Version=15.0.0.1, Culture=neutral, PublicKeyToken=31d8aec643e18259, processorArchitecture=MSIL"> <Reference Include="Interop.QBFC15">
<SpecificVersion>False</SpecificVersion> <HintPath>..\libs\QuickBooks\Interop.QBFC15.dll</HintPath>
<EmbedInteropTypes>True</EmbedInteropTypes> <EmbedInteropTypes>True</EmbedInteropTypes>
<HintPath>..\..\..\..\Program Files (x86)\Common Files\Intuit\QuickBooks\interop.QBFC14.dll</HintPath>
</Reference> </Reference>
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL"> <Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<HintPath>packages\Newtonsoft.Json.13.0.1\lib\net45\Newtonsoft.Json.dll</HintPath> <HintPath>packages\Newtonsoft.Json.13.0.1\lib\net45\Newtonsoft.Json.dll</HintPath>

View File

@@ -1,4 +1,4 @@
using Interop.QBFC14; using Interop.QBFC15;
using Newtonsoft.Json.Linq; using Newtonsoft.Json.Linq;
using System; using System;
using System.Collections; using System.Collections;

View File

@@ -54,8 +54,8 @@ function CheckForQBFC(): Boolean;
begin begin
if not QBFCChecked then begin if not QBFCChecked then begin
QBFCCheckResult := True; QBFCCheckResult := True;
if not FileExists(ExpandConstant('{commoncf32}\Intuit\QuickBooks\QBFC14.dll')) then begin if not FileExists(ExpandConstant('{commoncf32}\Intuit\QuickBooks\QBFC15.dll')) then begin
QBFCCheckResult := MsgBox('QBFC14 does not appear to have been installed as required prior to QBI.' #13#13 'File: ' + ExpandConstant('{commoncf32}\Intuit\QuickBooks\QBFC14.dll') + ' was not found.'#13#13'Do you want to install QBI anyway?', mbConfirmation, MB_YESNO) = idYes; QBFCCheckResult := MsgBox('QBFC15 does not appear to have been installed as required prior to QBI.' #13#13 'File: ' + ExpandConstant('{commoncf32}\Intuit\QuickBooks\QBFC15.dll') + ' was not found.'#13#13'Do you want to install QBI anyway?', mbConfirmation, MB_YESNO) = idYes;
if not QBFCCheckResult then begin if not QBFCCheckResult then begin
WizardForm.CancelButton.OnClick(WizardForm.CancelButton); WizardForm.CancelButton.OnClick(WizardForm.CancelButton);
end; end;