clsConcat: Error if GetStr ist a multiple of 4096

[Tanarri]

I had exported my big project several times with no problem, but today I got one with version 3.3.13
Please turn on debugging mode in VCS, otherwise the error will be not shown

With a additional debugging tool (vbWatchdog https://www.everythingaccess.com/vbwatchdog.asp ) I tracked it down to following line of code in clsConcat which fail:
Mid$(GetStr, (lngCnt * clngPageSize) + 1, clngPageSize) = astrPages(lngCnt)

The variables contents are on start of the procedure:
The string "GetStr" will be initialised with length 53248

And in the 13th interation:
A assignment will performed on position 53249 (1 past the end of initial string "GetStr") which results in Error 5

?Err.number, Err.Description
5 Ungültiger Prozeduraufruf oder ungültiges Argument (Propagate to 'MSAccessVCS.modVCSUtility.SaveComponentAsText')

The error is skipped when debugging is turned off, but should still be fixed.

[joyfullservice]

Thanks for reporting this! I have just pushed an update that should resolve this issue. Let me know if you encounter any further problems with the concatenation class.

[joyfullservice]

Sounds like we still have a little more to do on this, as noted in #195. I will try to look at this on Monday, unless someone else wants to offer a pull request before then.

[joyfullservice]

Thanks for the PR! It appears to have solved the issue, so I will go ahead and close this out. Feel free to reopen if anything further comes up. 👍