How to add User and Creation info to a document

Situation:
Within a profesional environment, extra information is added to documets, like creation date username etc. automatically.
So how to do this in nfoPath 2007

Solution:
1. Open an document
2. Add Created By + add a Textbox next to it.
- Change the name to CreatedBy
- Value = username()
- Display: Read-Only
- Size: Set Height and Width to auto
- Padding and Margins: Set all values to 0


3. Add the word on after the previous created textbox
4. Add a Textbox next to it.
- Change the name to CreateDate
- Value = today()
- Display: Read-Only
- Size: Set Height and Width to auto
- Padding and Margins: Set all values to 0

Result: