Search results

  1. J

    Custom event whine

    When the form instance is destroyed (reference counter -> 0). This does not have to be after closing if a reference to the form still exists.
  2. J

    Solved Opening an Access database to a form, then get and error.

    I usually open a small pop-up form that I use to initialize the actual application start. Example attached.
  3. J

    Solved Opening an Access database to a form, then get and error.

    Do you also have the problem when you open the form with Docmd.OpenForm (e.g. from another form or via the immeditate window)?
  4. J

    VBA to check if textbox only contains A-Z, a-z, hyphen and spaces

    Note: Public Function txtIsValid(TextToValidate) As Boolean<br>< txtIsValid = Not TextToValidate Like "*[!0-9 a-zA-Z]*" Or InStr(TextToValidate, "-") End Function txtIsValid("!-?") => True vs. Public Function txtIsValid(TextToValidate) As Boolean<br>< txtIsValid = Not TextToValidate...
  5. J

    Solved Opening an Access database to a form, then get and error.

    I seem to remember that I had a similar error message in context with conditional formatting. In my case, however, this was independent of whether the form was set as the start form or was called up manually.
  6. J

    Access Isn't Using Default database folder

    It looks like accde creation will now proceed as follows (symbolic): AccessApplication.SysCmd 603, (FullPathOfAccdb), (FileNameOnlyOfAccde) instead of AccessApplication.SysCmd 603, (FullPathOfAccdb), (replace(FullPathOfAccdb, ".accdb", ".accde"))
  7. J

    Solved Your opinions please

    Is it the language or the programmer using the languages? I myself prefer to program in C# because it is more "powerful". For example, I would sometimes prefer strong typing or a better interface implementation in VBA. However, this is not an argument against VBA when you consider how widely...
  8. J

    JSON Class

    Message from JimChristmas:
  9. J

    JSON Class

    Download JsonConverter.bas and import with VBE (Menu: File - Import file) Insert reference to Microsoft Scripting Runtime (Call from Immediate window: Application.References.AddFromGuid "{420B2830-E718-11CF-893D-00A0C9054228}", 1, 0) Now test it: Private Sub TestJson() ' Object =...
  10. J

    JSON Class

    Perhaps this is what you need: https://github.com/VBA-tools/VBA-JSON You can append data to the collection and dictionary objects and then generate a JSON string from them again.
  11. J

    Solved Problem with class factory

    Implemented with a VB Script file called by MZ-Tools. Script: https://github.com/AccessCodeLib/AccessCodeLib/blob/master/_tools/MZ-Tools/scripts/ExportReimportCodemodule.vbs
  12. J

    Solved Problem with class factory

    Note on: This can be easily done with MZ-Tools, for example.
  13. J

    The refresh time of a function is too short which results in an infinite loop.

    How do you ensure in your procedures that they run with the right data set?
  14. J

    MYSQL Connection on AWS

    Maybe you have Access 32 bit and the ODBC driver is for 64 bit.
  15. J

    Decrypt Encrypted Password

    varchar: HASHBYTES('SHA2_512', 'joseph') => 0x24D6EDB8DBE2BCA... nvarchar: HASHBYTES('SHA2_512', N'joseph') => 0x866D9B1682FB5DB56DDD86... Different input generates different output. ;)
  16. J

    Decrypt Encrypted Password

    select HASHBYTES('SHA2_512', N'joseph') , convert(varchar(512), HASHBYTES('SHA2_512', N'joseph'), 2)
  17. J

    Address Book - Subform

    A closing bracket is missing in my code: FilterString = replace(FilterStringTemplate, "{FilterValue}", "'" & replace(FilterValue, "'", "''") & "*'") More readable: private sub FilterSubForm(byval FilterValue as Variant) Const FilterStringTemplate as String = "[Contact Name] LIKE...
  18. J

    Address Book - Subform

    I assume you only want to use the one text box. Template for criteria string: [Contact Name] LIKE {FilterValue} OR Company LIKE {FilterValue} OR Telephone LIKE {FilterValue} OR Mobile LIKE {FilterValue} As code: Private Sub Text2_Change() 'Text2 ... what a great name ... you know immediately...
  19. J

    The refresh time of a function is too short which results in an infinite loop.

    [message queue] The simplest implementation: Table with timestamp (or sequence number) and data field for classroom ID. Some process inserts a new ID into the table as a new data record. This may run within a few milliseconds. A "queue function" then processes the data from the table. The record...
  20. J

    The refresh time of a function is too short which results in an infinite loop.

    How is the OutOfTime function started? Maybe some kind of message queue will help. The forms “report” into a queue (could also be a table) and the messages are processed from there in the order in which they were entered.
Back
Top Bottom