Share a txt file between parent and child

[GraeagleBill]

A text log file is open in the parent as #1. Clearly

me.Parent.print #1, " testing"

doesn't work. I can envision closing #1 in the parent, opening the file for append in the child and closing it again when the child has finished its tasks. Then, finally, re-opening the file for append in the parent.

The question becomes is there a easier/better way to share the log file?

[accesstos]

Hi Bill!

Try

Print #1, " testing"

from child too, while the file #1 is open. It works.

But the best approach is to add a public method in parent (say LogFile), something like:

Public Sub LogFile(strText As String)
    'Procedure in parent's code module.
    Dim lngFile As Long
    
    lngFile = FreeFile
    Open "c:\LogFile.txt" For Append As lngFile
    Print #lngFile, strText
    Close lngFile
End Sub

Then, from the child’s module, you can say:

Me.Parent.LogFile "Hi! This is your child!"

Cheers,
John

[GraeagleBill]

Print #1, " testing"

Well, that is simple enough. I had Parent/Child on the brain this morning, not thinking Access would recognize the open file.
Thanks,
Bill

[accesstos]

You are welcome!