How to save file with date and time stamp?

[jolene_keagy]

I know there are other examples, but using this code, is it possible to add the date and time to Output.txt filename, so I don't overwrite my file every time I save? Thx.

This is just a single command button that grabs the context of a text box and exports..

Private Sub CmdExport_Click()
Dim FF As Long
Dim FilePath As String

FF = FreeFile()
FilePath = "C:\Reports\Output.txt"
Open FilePath For Output As #FF
  Print #FF, txtSql.Text & Date & "  " & Time
Close #FF

End Sub