scrittura su file txt

**plrmntonio** · 10-01-2003, 21:23

come posso fare per creare un prog. che in un file txt mi scriva il contenuto di una casella di input + la data e l'ora alla pressione di un tasto?

**Mabi** · 10-01-2003, 22:33

codice:

Dim NomeFile As String
Dim Stringa1 As String

NomeFile = "C:\Prova.txt"
Stringa1 = Text1.Text & " " & CStr(Now)

Open NomeFile For Output As #1
  Print #1, Stringa1
Close #1

Ciao.

**plrmntonio** · 10-01-2003, 23:09

ma questo devo assegnarlo al pulsante no? e inserisce anche data e ora?

**Mabi** · 11-01-2003, 15:52

Si, lo inserisci nell'evento che t'interessa; in questo caso nel Click del tasto.
Inserisce la data e l'ora sfruttando la funzione Now.

**plrmntonio** · 11-01-2003, 16:01

però il file txt ogni volta me lo sovrascrive, mi sai dire il motivo?

**optime** · 11-01-2003, 16:15

chiaro! lo apri un Output! aprilo in Append...

**plrmntonio** · 11-01-2003, 16:33

Grazieeeeeeeeeeeeeeeeeeeee:gren: :gren:

**plrmntonio** · 13-01-2003, 22:20

un ultima cosa come faccio ad associare al pilsante oltre al click anche la pressione del tasto invio?

**xegallo** · 13-01-2003, 22:43

sull'evento keypress della textbox
scrivi

codice:

if keyascii = 13 then
   nomedelcommand_click
end if

**plrmntonio** · 13-01-2003, 23:09

grazie:quote: :quote: :quote: :quote: :quote:

Discussione: scrittura su file txt

Strumenti discussione

Ricerca discussione

Visualizza

scrittura su file txt

grande

ma...

Permessi di invio