現在時刻をタイトルにしたファイルを作成するには？

koro 2007-12-12 20:45:09 No: 138383

システム日付、時刻YYYYMMDDhhmmssをファイル名にしたテキストファイルをC:\に作成したいのですが、どのようにすればよろしいでしょうか？
なお、ファイルにはSuccessと出力したいと考えています。

まさ 2007-12-12 21:10:40 No: 138384

これでどうでしょう？？

    Dim intFileNo As Integer

    intFileNo = FreeFile

    Open "C:\" & Format$(Now, "yyyymmddhhnnss") For Output As #intFileNo
        Print #intFileNo, "Success"
    Close #intFileNo