DATA E HORA COM INTERVALO NO TXT

TIAGO2012 30/03/2012 15:12:05
#398802
Ola pessoal, preciso que a cada 5 minutos ou mais.. fique salvando a data e hora em um txt, não subscrevendo e sim em um intervalo ela vá aparecendo no txt.
ALTAIR148 30/03/2012 15:15:48
#398803 Resposta escolhida
Você fala tipo assim

15:10:01....
15:15:01...
15:20:01...

é isso?
ALTAIR148 30/03/2012 15:39:53
#398804
Boa tarde,

Bote o código abaixo dentro do timer que funciona que é uma beleza...

Dim sw As StreamWriter
        Dim strPath = [Ô]C:    este.txt[Ô]
        sw = New StreamWriter(strPath, True) [ô]True for appending
        sw.WriteLine(Format(Date.Now, [Ô]HH:mm:ss[Ô]) & [Ô] [Ô] & Format(Date.Now, [Ô]dd/MM/yyyy[Ô]))
        sw.Close()
TIAGO2012 30/03/2012 17:20:02
#398825
Opa é essa a idéia sim, coloquei o código no timer mas deu [Ô]Error Type [ô]StreamWriter[ô] is not defined.[Ô] pelo que entendi eu não define a hora.
ALTAIR148 30/03/2012 17:24:49
#398826
Tem que importar o namespace System.IO

Assim no inicio de tudo

imports system.IO
TIAGO2012 30/03/2012 17:57:05
#398830
Perfeito, muito obrigado! Uma outra duvida sobre Clipboard.. eu coloquei essa opção para aparecer também no txt, funciona mas teria como aparecer lá no txt Cilpboar antes do conteudo copiado?

Public Class Form1
Dim Clipboard As String

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Clipboard = My.Computer.Clipboard.GetText
If Clipboard <> [Ô][Ô] Then
tbLog.AppendText(Clipboard)
Me.WindowState = FormWindowState.Normal
Me.TopMost = True
timerKeys.Stop()
timerKeys.Start()
Me.TopMost = True
My.Computer.Clipboard.Clear()
Else
End If
End Sub
ALTAIR148 30/03/2012 17:58:23
#398831
Não entendi. Tente explicar melhor.
TIAGO2012 30/03/2012 18:05:43
#398834
Assim, eu coloquei esse código quando copio alguma coisa, automaticamente ele salva esse conteudo copiado em um log.txt eu queria que acima do conteudo tivesse Clipboard lá no txt

ex:


[Clip board]

Aqui o texto copiado que aparece no txt
ALTAIR148 30/03/2012 18:11:09
#398835
Como que vc grava ele?
TIAGO2012 30/03/2012 18:14:43
#398836
Bom no aplicativo eu coloquei um textbox renomiei para tbLog

My.Computer.FileSystem.WriteAllText([Ô]C:\HP\Log.txt[Ô], tbLog.Text, True)

coloquei o código que te passei antes do Clipboard ai é automatico quando é copiado já aparece lá no txt
Tópico encerrado , respostas não são mais permitidas
Voltar