Open "C:\mesto\12\To_Store\01\por" & Format(Date, "DDMMYY") & Format(Time, "HHMMSS") & ".txt" For Output As #1
Print #1, Text1.Text
Close #1
e sada mi treba jos da kada napise da mi izadje poruka da je napisana kao npr. popup prozorcic gde ce pisati :Poruka je uspesno napisana
ili tako nesto
jos mi treba komanda za brisanje fila
[Ovu poruku je menjao aikidomaster dana 01.08.2008. u 10:57 GMT+1]