Xhack

Un forum dedicato all'hacking
 
IndiceIndice  PortalePortale  CalendarioCalendario  FAQFAQ  CercaCerca  RegistratiRegistrati  Lista UtentiLista Utenti  GruppiGruppi  Accedi  

Condividi | 
 

 file editor

Andare in basso 
AutoreMessaggio
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: file editor   Ven Ott 26, 2007 6:59 pm

Codice:

;...:::*$$_/'''made up by darkjoker'''\_$$*:::...
#include <GUIConstants.au3>
#include <File.au3>
GUICreate("File editor", 250, 350)
$input = GUICtrlCreateInput ("inserire il nome del file da creare o editare", 10, 30)
$edit = GUICtrlCreateEdit ("inserire il testo da inserire nel file", 10, 100)
$ok = GUICtrlCreateButton ("Ok", 70, 300, 100, 30)
$about = GUICtrlCreateButton ("About the author", 70, 265, 100, 30)
GUISetState ()   

While 1
    $msg = GUIGetMsg()
    Select
   Case $msg = $GUI_EVENT_CLOSE
      ExitLoop
   case $msg = $ok
      if not FileExists (guictrlread ($input)) Then
         _FileCreate (guictrlread ($input))
      EndIf
      FileOpen(guictrlread ($input), 1)
      FileWriteLine (guictrlread ($input), guictrlread ($edit))
   case $msg = $about
      MsgBox (32, "About the author", "File editor stato creato da darkjoker"&@crlf&"http://xhack.forumitalian.net")
    EndSelect
Wend

praticamente un notepad fatto in casa... mettete un percorso di un file gia esistente o da creare nella input e poi nella textarea mettete il testo da inserire...
se non mettete nessun percorso ma solo il nome di un file ve lo modifica (o crea) nella cartella in cui si trova questo script...
per chiarimenti.... chiedete, sono qui apposta.

_________________
L'unico computer sicuro, un computer spento.

Nel software esiste sempre almeno un bug, generalmente localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: file editor   Lun Ott 29, 2007 6:20 pm

versione 1.1 appena modificata Wink

eccovi qui un'altra versione di FileEditor, questa invece dei pulsanti usa dei menu (guictrlcreatemenu),
oltre a questo ho anche apportato delle altre modifiche:
lettura di file esterni
modifica di file esterni
edit allargata
inserite delle label
uso delle hotkey:
ctrl a -> apre un file
ctrl s -> salva un file
ctrl e -> chiude fileeditor
ctrl i -> fornisce informazioni about me
purtroppo pero ho dovuto fare in modo che prima venisse cancellato il file da edtitare, e poi che ne venisse riscritto un'altro con le stesse informazioni piu quelle che avete aggiunto voi, chi di voi sa dirmi il perche?
non molto difficile, se ci ragionate un'attimo capite subito di cosa si tratta... Wink
Codice:

#include <GUIConstants.au3>
#include <File.au3>
GUICreate("File editor", 500, 500)
$menu1 = guictrlcreatemenu ("File")
$obj_menu1 = GUICtrlCreateMenuItem ("Apri", $menu1)
$obj_menu2 = GUICtrlCreateMenuItem ("Salva", $menu1)
$obj_menu3 = GUICtrlCreateMenuItem ("Esci", $menu1)
$menu2 = GUICtrlCreateMenu ("About")
$obj_menu4 = GUICtrlCreateMenuItem ("About the author", $menu2)
GUICtrlCreateLabel ("inserire il nome del file da creare o editare", 10, 20)
$input = GUICtrlCreateInput ("", 230, 15, 260)
GUICtrlCreateLabel ("inserire il testo da inserire nel file", 10, 50)
$edit = GUICtrlCreateEdit ("", 10, 65, 480,400)
GUISetState ()   
HotKeySet ("^a", 'apri')
HotKeySet ("^s", 'salva')
HotKeySet ("^e", 'esci')
HotKeySet ("^i", 'info')
While 1
    $msg = GUIGetMsg()
    Select
      case $msg = $obj_menu1
         $file = FileOpenDialog("Selezionare file",@DesktopDir,"All (*.*)")
      GUICtrlSetData ($edit, FileRead ($file ))
         GUICtrlSetData ($input, $file)
   Case $msg = $GUI_EVENT_CLOSE
      ExitLoop
   case $msg = $obj_menu2
      filedelete ($file)
         _FileCreate (guictrlread ($input))
      FileOpen(guictrlread ($input), 1)
      FileWriteLine (guictrlread ($input), guictrlread ($edit))
   case $msg = $obj_menu4
      MsgBox (32, "About the author", "File editor stato creato da darkjoker"&@crlf&"http://xhack.forumitalian.net")
   case $msg = $obj_menu3
      ExitLoop
    EndSelect
Wend
func apri ()
   $file = FileOpenDialog("Selezionare file",@DesktopDir,"All (*.*)")
   GUICtrlSetData ($edit, FileRead ($file ))
   GUICtrlSetData ($input, $file)
EndFunc
func salva ()
   filedelete ($input)
   _FileCreate (guictrlread ($input))
   FileOpen(guictrlread ($input), 1)
   FileWriteLine (guictrlread ($input), guictrlread ($edit))
EndFunc
func esci ()
   Exit
EndFunc
func info ()
   MsgBox (32, "About the author", "File editor stato creato da darkjoker"&@crlf&"http://xhack.forumitalian.net")
EndFunc

_________________
L'unico computer sicuro, un computer spento.

Nel software esiste sempre almeno un bug, generalmente localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: file editor   Lun Nov 05, 2007 2:13 pm

trovo 2 difetti:
-la variabile $file la dichiari solo se premi "apri", quindi se fai salva la variabile non stata dichiarata, e il programma si chiude
-le 4 funzioni sono inutili, in quanto non le usi
a parte questo, mi sembra a posto...
Torna in alto Andare in basso
Visualizza il profilo
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: file editor   Lun Nov 05, 2007 2:25 pm

scusate, ho sbagliato, le funzioni servono per le hotkey... per consiglio di usarle anche per il menu, cos si risparmiano righe... per risolvere la cosa del $file, basta aggiungere alla funzione salva la riga:
Codice:

$file=guictrlread($input)
oppure si pu cambiareil filedelete($file) in filedelete(guictrlread($input))
Torna in alto Andare in basso
Visualizza il profilo
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: file editor   Lun Nov 05, 2007 6:34 pm

beh, si, hai ragione.. la prima versione l'ho fatta solo per creare... la seconda solo per modificare...
grazie per le correzioni...

_________________
L'unico computer sicuro, un computer spento.

Nel software esiste sempre almeno un bug, generalmente localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo
Contenuto sponsorizzato




MessaggioTitolo: Re: file editor   

Torna in alto Andare in basso
 
file editor
Torna in alto 
Pagina 1 di 1
 Argomenti simili
-
» Come eliminare un file .exe

Permessi di questa sezione del forum:Non puoi rispondere agli argomenti in questo forum
Xhack :: Programmazione :: Autoit-
Vai verso: