Recent content by Josef P.

I would remove On Error Resume Next and replace it with explicit error handling to find out the issue.

You must distinguish between the stored value/data type and the visual representation. I thought you would want something like that in the JSON string: {"x":0.0} 0.0 is a number in JSON. If it were a string, it would look like this: {"x":"0.0"}

How did you adjust the highlighted lines in ConvertToJson function? => Case VBA.vbInteger, VBA.vbLong ' Number (use decimals for numbers) ConvertToJson = VBA.Replace(JsonValue, ",", ".") Case VBA.vbSingle, VBA.vbDouble, VBA.vbCurrency, VBA.vbDecimal ConvertToJson...

When inserting/converting into the JSON string, you can format the number as you wish. If you use the JsonConverter from Tim Hall: https://github.com/VBA-tools/VBA-JSON/blob/master/JsonConverter.bas#L445C5-L447C57 With special processing for the decimal numbers, something like this could be...

Change Controls to Fields ... I overlooked the fact that you take the values from a recordset. lngQtyLast = Nz(.Fields("Zone" & vZone & "_Quantity"), 0)

A few thoughts: You can also check explicitly with IsMissing. Public Function onhand(vProduct_Code As Variant, Optional vAsOfDate As Variant, Optional vZone As Variant) As Double ... If IsMissing(vZone) Then lngQtyLast = Nz(!Product_Quantity, 0) ElseIf vZone Like "[ABCD]" Then...

An example file with several variants: https://github.com/josef-poetzl/access-examples/blob/main/forms/MuliValueSelection.zip Continous form with ComboBox (This is probably the most commonly used variant.) Continous with CheckBox (all items visible) ListBox with property Multi Select Listbox...

Note: And if someone has the rights to copy the backup file, they can restore the database in their own server instance in which they have SA rights.

Only opening the query or measured incl. moving to the end of the data records?

That should already work. Is there an error message for this? Have you already tried this variant? SELECT ProductName, ProductID, TotalAmount, CGControl, TaxableValue, ITaxableAB, TaxInclusive, DiscountValue, itemClsCd, itemCd, Barcode, ItemSoldID, Company, TaxClassA, TPIN, TheNotes, Cashier...

[OT] Making the select statement with the joins available as an SQL server view (in FE as linked table) or using a pass-through query is not an option?

2 Tasks: 1. generate filter expression (where condition) - When changing the length option group, supply the textbox for manual filling with the appropriate value. - generate condition string with textbox and option group of section 2. set the data source of the list box with this filter -...

Ivercy also supports the MSSCCI interface. Alternatively, there is also OASIS-SVN or the open source application msaccess-vcs. I now use msaccess-vcs (mostly with git/TortoiseGit) and no longer miss the Access VCS add-in that ran until Access 2010. msaccess-vcs has the advantage for me that I...

Note: A useful article on the topic of member variables: https://nolongerset.com/this/

If I have confusable variables [TotAsts and TotAssts] in the code, where I even have to scroll, then (in my opinion) my main problem is not where I declared the variables, but the code design itself. If I understand you correctly, you are arguing that exactly these confusable variables are...