TITULO DO ARQUIVO TXT
No meu programa estou fazendo uma espécie de log. Meu programa salva o log em um arquivo de texto. Eu queria que esse arquivo de texto tivesse como nome: Log + a data do dia. Exemplo: Log11-10-2011.txt
Eu tenho o seguinte código e já tentei de tudo porém não consegui fazer com que ele ficasse como da forma descrita acima:
Dim strLinha As String
strLinha = [Ô]O usuário [Ô] & Text1 & [Ô] entrou no sistema, no dia [Ô] & Date & [Ô] ás [Ô] & Time & [Ô].[Ô]
Open App.Path & ([Ô]\Logs\Log.txt[Ô]) For Append As #1
Print #1, strLinha
Close #1
Obrigado desde já.
Eu tenho o seguinte código e já tentei de tudo porém não consegui fazer com que ele ficasse como da forma descrita acima:
Dim strLinha As String
strLinha = [Ô]O usuário [Ô] & Text1 & [Ô] entrou no sistema, no dia [Ô] & Date & [Ô] ás [Ô] & Time & [Ô].[Ô]
Open App.Path & ([Ô]\Logs\Log.txt[Ô]) For Append As #1
Print #1, strLinha
Close #1
Obrigado desde já.
Veja se resolve.
Dim strLinha As String
strLinha = [Ô]O usuário [Ô] & Text1 & [Ô] entrou no sistema, no dia [Ô] & Date & [Ô] ás [Ô] & Time & [Ô].[Ô]
Open App.Path & ([Ô]\Logs\Log[Ô] [txt-color=#e80000]& Format(Date, [Ô]dd-mm-yyyy[Ô]) &[/txt-color] [Ô].txt[Ô]) For Append As #1
Print #1, strLinha
Close #1
Dim strLinha As String
strLinha = [Ô]O usuário [Ô] & Text1 & [Ô] entrou no sistema, no dia [Ô] & Date & [Ô] ás [Ô] & Time & [Ô].[Ô]
Open App.Path & ([Ô]\Logs\Log[Ô] [txt-color=#e80000]& Format(Date, [Ô]dd-mm-yyyy[Ô]) &[/txt-color] [Ô].txt[Ô]) For Append As #1
Print #1, strLinha
Close #1
Tópico encerrado , respostas não são mais permitidas