FileInstall?

XxFratziXx · 04/29/2010, 11:12

hallo leute !
ich habe für meine freunde und für mich
eine art "installer" gemacht
für gta cice city
naja also wenn ich den script öffne kommt diese meldung:

naja und hier der script

Spoiler

PHP Code:


			
MsgBox (0,"! ! ! !","ACHTUNG: sie müssen anschließend ein Passwort eingeben...")

$pw1 = InputBox ("Passwortcheck","Bitte geben sie das Passwort ein:                   (5 - stellig)","","*")



If $pw1 = "K4H81" Then

    MsgBox (0,"INFORMATION","Sie haben das richtige Passwort eingegeben! Drücken sie OK um fortzufahren")

ProgressOn("Der Installer lädt einen kleinen Moment bitte","Bitte warten ...")



For $i=0 to 500

ProgressSet($i/500*100,int($i/500*100)&"%")

Sleep(10)

Next

ProgressOff()

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>



#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("GTA vice city - INSTALLATION", 420, 162, 194, 124)

GUISetBkColor(0xABABAB)

$Label1 = GUICtrlCreateLabel("GTA Intaller: hier können sie GTA vice city installieren !", 8, 8, 401, 22)

GUICtrlSetFont(-1, 10, 400, 0, "Arial Black")

$Label2 = GUICtrlCreateLabel("GTA vice city wird in folgendem Pfad  installiert:", 8, 32, 279, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Label3 = GUICtrlCreateLabel("C:\GTA vice city.zip", 288, 32, 119, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Button1 = GUICtrlCreateButton("Installieren !", 216, 64, 193, 89, 0)

GUICtrlSetFont(-1, 20, 400, 0, "Arial")

$Button2 = GUICtrlCreateButton("Doch nicht !", 8, 64, 201, 89, 0)

GUICtrlSetFont(-1, 20, 400, 0, "Arial")

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###



While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button2

    MsgBox (0, "INSTALLATIONSABBRUCH","GTA vice city wird nicht installiert...")

    Exit

    ExitLoop

EndSwitch

Case $Button2

    MsgBox (0,"INFO","INFO: sobald die Installation fertig ist, kommt eine meldung!")

    FileInstall ("C:\Users\Sandro\Desktop\GTA vice city.zip","C:\GTA vice city.zip",1)

    MsgBox (0,"FERTIG !","Die Installation ist fertig! Sie müssen nur noch das .zip archiv irgendwohin entpacken und schon können sie losspielen !")

WEnd



EndIf

warum geht das nicht ??

Siblexful · 04/29/2010, 13:31

Du hast 'EndSwitch' zu früh geschrieben.

Spoiler

So müsste es gehen

EDIT: Und du hast zweimal '$Button2' verwendet.

XxFratziXx · 04/29/2010, 14:15

okay...
ich hab jetzt alles geändert (den unteren teil)
hab auf compatible gedrückt gewartet bises fertig ist die exe auf usb getan,
bei meinem laptop geöffnet und.... es dauerte eben ein bisschen.....
aber es hat gar nichts kopiert !!! / installiert!!!!
den die exe hatte 430 mb.... da müsste es ja theoretisch ja gehn TUTS ABER NICHT WARUM
bin voll am verzweifeln...

Siblexful · 04/29/2010, 16:54

Quote:

Originally Posted by WORLD-KILLER

okay...
ich hab jetzt alles geändert (den unteren teil)
hab auf compatible gedrückt gewartet bises fertig ist die exe auf usb getan,
bei meinem laptop geöffnet und.... es dauerte eben ein bisschen.....
aber es hat gar nichts kopiert !!! / installiert!!!!
den die exe hatte 430 mb.... da müsste es ja theoretisch ja gehn TUTS ABER NICHT WARUM
bin voll am verzweifeln...

Schick mal bitte den fertigen Sourcecode..
Ganz sicher das du im richtigen Verzeichnis etc. nachgeschaut hast?
Hat dein Laptop eig. als Festplatte 'C:\' ?

Knochenfabrikant · 05/01/2010, 19:35

Mach nach dem FileInstall folgendes:

Code:

If @error Then
MsgBox(0,"Error",@error)
Else
MsgBox (0,"FERTIG !","Die Installation ist fertig! Sie müssen nur noch das .zip archiv irgendwohin entpacken und schon können sie losspielen !")
EndIf

Und falls ein Error kommt, poste ihn.