Page Header - pass a variable

[MartyO]

I would like to pass the resource name that the user selects from the "Using
Resource" dialog box when my report runs, to the strUserName varialbe in the
code below. Can I do that? Can I capture that info or do I have to build my
own form?

Dim strUserName
strUserName = "MartyO"
FilePageSetupHeader Name:="myToDoList", Text:="&[Report] as of &[Date]"
& Chr$(10) & "&[Project Title]" & Chr$(10) & strUserName
ReportPrintPreview Name:="myToDoList"

Thanks in advance!
Marty