Search results

  1. arnelgp

    Multiple member List

    are you sure that the Denomination is Christian? Christian don't allow multiple marriage when his/her partner is still alive. Muslim can have 4 wifes the max. anyway, there are two queries on the demo db. qryMarriedMen only list all men that are married. qryHusbandAndWives is the one you need...
  2. arnelgp

    Solved Position form to added record

    maybe you can test this: Public Sub AddItem(ID As Long, strITPath As String) Dim strCriteria As String Dim lDocNo As Long Dim strSql As String Dim rst As DAO.Recordset Dim strBookmark As String...
  3. arnelgp

    Set focus to textbox in subform after clicking command button

    are there "other" codes on your main/subform aside from the Load event of your main form? are there other subforms on Main form?
  4. arnelgp

    Set focus to textbox in subform after clicking command button

    what code does you have? i strongly suggests post #5 code. on the Load Event of your MainForm: Private Sub Form_Load() With DoCmd .GotoControl "yourSubformName" .GotoControl "textboxNameOnYourSubform" End With End Sub
  5. arnelgp

    windows 11, cant see hidden files in folder

    if there are system files, you can remove their System attribute: Attrib *.* -s -h -r attrib switches are command-line options used with the attrib command to display or change file attributes, such as +r to set a file as read-only or -h to remove the hidden attribute. Switches like /s and...
  6. arnelgp

    windows 11, cant see hidden files in folder

    or even use the DOS, Attrib command. use switches -H (remove hidden attribute), -R (remove read-only attribute). on the folder: Attrib *.* -r -h
  7. arnelgp

    Solved How to add text to a null value field in an access report

    that is because your IIF() criteria is incomplete, change: IIf(IsNull([Forms].[GrantsF].[ManagementDeliverability]),"N/A",[ManagementDeliverability]) To: IIf(IsNull([Forms].[GrantsF].[ManagementDeliverability]),"N/A",[Forms].[GrantsF].[ManagementDeliverability])
  8. arnelgp

    Simple Password Strength Checker with PWned Online Check

    not all have the same Net Framework as you have.
  9. arnelgp

    VBA class modules & factory design

    creating a class out of adodb.recordset?
  10. arnelgp

    Solved view attachments from many tables

    here you may try again.
  11. arnelgp

    Solved view attachments from many tables

    not sure what you want but just in case try.
  12. arnelgp

    Export Report to PDF with Index to Records

    you need third party tool to be able to do that. or maybe use Adobe automation or Debenu (Foxit toolkit).
  13. arnelgp

    Solved Key Events - Ctrl-Delete UnDetected

    Ctrl-Delete is a normal event of the Textbox to delete Text. so the "Normal" event will take place before your own (made event). here i remove the keyup event on both Main and subform. I add a Class on the subform (see Load event of the subform). i use Timer event on the subform...
  14. arnelgp

    Solved Key Events - Ctrl-Delete UnDetected

    i tried it with your sample db. even in edit mode (pencil), it detect the ctrl-del key. open the db in post 2 and edit edit a record and press ctrl-del.
  15. arnelgp

    Seeking a Moderator for the Moderators

    it says on her self-title: "Super Moderator · From .. ..super like superman. who can go against her except Lex.. she doesn't like birds, specially when asleep:
  16. arnelgp

    Solved Key Events - Ctrl-Delete UnDetected

    you also add Keypreview to the datasheet subform.
  17. arnelgp

    Seeking a Moderator for the Moderators

    I nominate Patricia.
  18. arnelgp

    Best approach for temporary A2003 installation

    install A2003 on "virtual machine" using VMWare or VirtualBox or Proxmox. the later 2 are free.
  19. arnelgp

    deleting a non empty directory

    copy all the Modules on the sample db to your db. you can call: ForceDeleteFolder "D:\YourFolderName" it will "force close" any open files then proceed deleting the folder.
  20. arnelgp

    deleting a non empty directory

    delete folder Sub DeleteFolderFSO(ByVal FolderPath$) Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.FolderExists(FolderPath) Then fso.DeleteFolder FolderPath, True ' True = force delete non-empty folder MsgBox "Folder deleted...
Back
Top Bottom