Agenda, Programma facilissimo

« Older   Newer »
  Share  
lknokl
CAT_IMG Posted on 6/5/2008, 16:19     +1   -1




Un altro programma stupidissimo ma pe chi ha sempre la testa tra le nuvole come me è utile
un agenda....con una particolarita....ti salva le note in un file di testo (txt) chiamato agenda sul desktop....con una formattazione minima....
poca memoria, facile utilizzo...nella prossima versione provvedero a creare il file in una pagina html con una formattazione un po piu decente xD

eccovi il sorgente....scusate se non vi metto l'exe ma non ho voglia di compilarlo :P

CODICE
;;;;;;;;;;;;;;;;;;;Agenda By |Kn0K|;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;http://autoit.forumcommunity.net;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#include <GUIConstants.au3>
$form=GUICreate("Kn0k Agenda", 205,200)

$Date = GUICtrlCreateMonthCal ("2008/05/01",20, 20)
GUISetState()
$istruzioni=guictrlcreatelabel("Cliccare il giorno desiderato",35,180)

Do
  $msg = GUIGetMsg()
 


 
  If $msg = $Date Then
  $a=inputbox ("Inserisci una nota","Inserisci una nota")
  $ora=inputbox("Inserisci ora nota","Inserisci ora nota")
  $b=msgbox(0,"Nota inserita",$a)

  filewrite (@DesktopCommonDir&"\agenda.txt",GUICtrlread($Date)&" ore: "&$ora&" nota:"&$a&@CRLF)
  $chiudi=MsgBox(4,"Vuoi inserire un altra nota?","Vuoi inserire un altra nota?")
  if $chiudi=7 Then
          Exit
          winclose("Kn0k Agenda")
  EndIf
 
  endif
Until $msg = $GUI_EVENT_CLOSE

non ridete troppo asahsudahsdauhdsau
knok

Edited by lknokl - 12/5/2008, 10:46
 
Top
Jac123
CAT_IMG Posted on 6/5/2008, 19:51     +1   -1




semplice ma utile!
 
Top
lknokl
CAT_IMG Posted on 12/5/2008, 09:46     +1   -1




gli ho fatto una modifica xke invece ke salvarlo sul desktp lo salvava con il nome di desktopdiragenda.txt xD
 
Top
2 replies since 6/5/2008, 16:19   238 views
  Share