Unmantained Guida [GUIDA]Creare Un AutoPatcher In VB8

Una guida contrassegnata come Unmantained contiene informazioni su un argomento obsoleto, non più utile o files non aggiornati da parte del creatore.
Stato
Discussione chiusa ad ulteriori risposte.

xDarkSejnx

Utente Gold
15 Agosto 2010
483
85
37
234
Ora Vi Insegnerò come creare un autopatcher!!*-*

  1. Istalliamo Microsoft Net Framework 3.5
  2. Istalliamo Microsoft Visual Basic 2008 Express Edition
  3. Avviamo Microsoft Visual Basic 2008 Express Edition
  4. In Alto A Destra Clicchiamo Su File-->New Project-->Windows Forms Application
  5. Vi Aprira Una Finestra Uguale A Questa:
  6. Imageshack - 65033916.jpg
  7. A Sinistra dovreste Visualizzare La ToolBox
  8. Scorrete Fincè Non Trovate PictureBox
  9. Selezionate TuTTo il Rettangolo Bianco Cosi:
  10. Imageshack - 41151489.jpg
  11. In Basso A Destra Ci sono le Proprietà Del Rettangolo Bianco Selezionato
  12. Evidenziate Il Nome BeckgroundImage e Accanto a (none) Appariranno "..." Cliccateci
  13. Vi Dovrebbe Apparire Una Schermata cosi:
  14. Imageshack - 67107167.jpg
  15. Cliccate su Local resources--->Import e selezionate l'immagine che volete per Sfondo
  16. In ToolBox Cerchiamo TextBox E inseriamolo Nel Autopatcher
  17. Stessa Cosa Cerchiamo ProgressBar e inseriamola Nel AutoPatcher
  18. A Questo Punto In ToolBox Cerchiamo Button aggiungiamone 4
  19. Posizionare e Ingrandire I Button A Vostro Piacimento
  20. Clicchiamo 1 Sola Volta Su Button1 e nelle proprietà cerchiamo Text cancelliamo La Scritta Botton1 e Scriviamo Inizia o quello Che volete voi!
  21. Stessa cosa Nel Botton2 Scriviamo Opzioni
  22. Botton3 Aggiornamenti
  23. Botton4 Termina
  24. In TuTTo L'altro Spazio Rimanente Possiamo Inserire Un Immagine o una Pagina web
  25. Per Inserire Un Immagine Basta Seguire i Passi 7 e 8
  26. Per Inserire Una Pagina web:
  27. In ToolBox Cercare WebBrowser Determinare le grandezze e in Proprieta Cercare Url e accanto scriviamo l'indirizzo web Attenzione Nella Grafica Visualizzerete Solo Un Rettangolo Bianco Della Pag Web!
  28. Per Dare Un Nome All Applicazione Cliccare Su Form1 Della Grafica!!!! In Text Scriviamo Quello Che Volete Io Scrivo AutoPatcher By DarkSejn
PASSIAMO AGLI SCRIPT
clicchiamo 2 Volte Su Inizia
e Incolliamo Questo
Shell("avvia da qui.exe")
End

clicchiamo 2 volte su opzioni
e Incolliamo Questo
Shell("config.exe")
End

clicchiamo 2 Volte Su Aggiornamenti
e Incolliamo Questo
Button1.Enabled = False
Button1.Text = "Attendere, prego..."
TextBox1.Text = "Download iniziato."
ProgressBar1.Value = "1"
Timer1.Start()
Andiamo nella Grafica Alla ToolBox Clicchiamo 2 volte su Timer e Altre 2 Volte Su Timer1
e Nello Script Incolliamo Que
ProgressBar1.Value = "2"
TextBox1.Text = "patch.txt è testato.."
If My.Computer.FileSystem.FileExists("patch.txt") Then My.Computer.FileSystem.DeleteFile("patch.txt")
TextBox1.Text = "patch.txt è stato cancellato."
End If
My.Computer.Network.DownloadFile("http://indirizzo web del patch.txt", "patch.txt")
TextBox1.Text = "Nuovo patch.txt scaricato."
ProgressBar1.Value = "3"

TextBox1.Text = "locale_it.eix è stato testato."
If My.Computer.FileSystem.FileExists("pack/locale_it.eix") Then
My.Computer.FileSystem.DeleteFile("pack/locale_it.eix")
TextBox1.Text = "locale_it.eix è stato cancellato."
End If
ProgressBar1.Value = "4"
My.Computer.Network.DownloadFile("http://indirizzo web del vostro locale_it.eix", "pack/locale_it.eix")
TextBox1.Text = "Nuovo locale_it.eix scaricato."
End

Dove C'è questo http://indirizzo web del vostro locale_it.eix e questo http://indirizzo web del patch.txt
dovete incollare l'indirizzo web dei file.
I file bisogna caricarli No!!! Su MegaUpoload
BISOGNA CARICARLI SU SITI TIPO ALTERVISTA
Clicchiamo 2 volte su Termina e Nello script Incollare questo
Ora Basta Salvare i file
cliccate su Start Debugging quell icona in alto a forma di play cosi:
Imageshack - 63252196.jpg
Vi aprira Il vostro AutoPatcher
cliccate su inizia e vi segnalera in giallo la scritta
Shell("avvia da qui")
è normale perchè l'autopatcher non è nella cartella
chiudete l'anteprima dell autopatcher
andate a File in alto a destra e Save All Dategli un Nome Tipo Autopatcher e Poi Save
una volta salvato aprite la cartella AutoPatcher-->AutoPatcher-->obj-->Debug
e trasferite l'applicazione "WindowsApplication1"sul Desktop e rienominatela a vostro piacimento
Una Volta Rienominata Trasferire L'autopatcher in qualsiasi client e avviarlo
FINE!!!!
SI ACCETTONO +1
PER PROBLEMI O DEI CHIARIMENTI SULLA GUIDA DITELO!

SCUSATE PER GLI ERRORI ORTOGRAFICI SE CI SONO XD:asd::asd:

ECCO IL MIO AUTOPATCHER
Imageshack - 27210345.jpg


--- Aggiornamento Post ---

Guida fatta da me!!! Non copiata
 
Ho 2 domande.
Mi dice che End if me lo da come errrato perchè?
Imageshack - immagineae.jpg

Poi nel mio sito altervista devo mettere tutti i file .epk e .eix
Ho questo dubbio grazie.

--- Aggiornamento Post ---

è in poche parole cosa serve patch.txt?
 
Tutto Fare anke a me da l'errore di end if non è nulla basta cancellarlo funziona lo stesso e poi su altervista io ho caricato solo que locale_it.eix e patch.txt e mi aggiorna benissimo comunque per aiuto sono anche su skipe nome: simoDarkSejn!!1
GRAZIE A TUTTI PER I COMPLIMENTI!
 
cmq complimenti il primo che con cosi pochi messaggi aiuta già... gli altri leechano tutti nei primi mess ._.
 
Sarebbe bello se al posto di usare la ProgressBar per visualizzare lo stato dei download molto semplice... ;) Comunque bravo
 
grazie raga ho fatto un video con fraps lo converto e lo posto se poi proprio siete incapaci di farlo e non ne potete fare a meno mandatemi un pm ve lo fo io

--- Aggiornamento Post ---

tuttofare per que end if basta cancerlarlo e ricopiarlo non ti rida errore

--- Aggiornamento Post ---

[video=youtube;MkcTekW-OLw]http://www.youtube.com/watch?v=MkcTekW-OLw[/video]
[video=youtube;MqK601HnGsY]http://www.youtube.com/watch?v=MqK601HnGsY&feature=channel[/video]

--- Aggiornamento Post ---

grazie raga ho fatto un video con fraps lo converto e lo posto se poi proprio siete incapaci di farlo e non ne potete fare a meno mandatemi un pm ve lo fo io

--- Aggiornamento Post ---

tuttofare per que end if basta cancerlarlo e ricopiarlo non ti rida errore

--- Aggiornamento Post ---

[video=youtube;MkcTekW-OLw]http://www.youtube.com/watch?v=MkcTekW-OLw[/video]
[video=youtube;MqK601HnGsY]http://www.youtube.com/watch?v=MqK601HnGsY&feature=channel[/video]

ekkovi i video come promesso!!!!!:asd::asd:
 
Stato
Discussione chiusa ad ulteriori risposte.
Indietro
Top Bottom