Installation verschiedener Programm in einem

cryc

Hallo,

wir müssen für die Uni ein Programm XX schreiben.

Damit das läuft, muss auf dem Rechner das Programm XX installiert werden bzw. es muss nur entpackt werden, eine JAVA Version muss installiert sein und davor geprüft werden,ob schon eine vorhaanden ist und es muss ein MySQL Server installiert werden und natürlich geprüft werden ob schon ein server installiert ist.

Meine Vorstellung ist, das ich eine setup datei habe die ich starte und sich dann alles von alleine installiert.
Also zuerst wähle ich aus, welche Komponenten installiert werden sollen und wohin. Die Feineinstellungen z.B. beim sql server jedoch sollen automatisch, also vorgegeben, installiert werden.

Hat da jemand ne ahnung womit das funktionieren kann?

Achja und die Installation soll dann versteckt ablaufen. Für das Programm, dass wir schreiben müssen, existiert bereits eine exe und mit autoit habe ich es auch shcon hinbekommen, das er es alleine installiert. jedoch soll das halt versteckt möglich sein.

Gruß,

Tobias

**Xenobiologist**

HI,

ja das sollte funktionieren.

Was meinst du genau mit versteckt?

Ohne das ein User angemeldet ist? Im Hintergrund? Dürfen Fenster hochpoppen?

...

So long,

Mega

cryc

Ok ich versuche mal den gewünschten Ablauf zu skizzieren:

Starten der setup.exe

--> Willkommensbildschirm

--> Auswahlmöglichkeit, welche der 3 Programme installiert werden sollen

[x] Programm A
[x] Programm B
[x] Programm C

--> (sichtbar) Wohin soll Programm A installiert werden?

--> (versteckt) Installation Programm A

--> (sichtbar) Wohin soll Programm B installiert werden?

--> (versteckt) Installation Programm B ( hier dann der sqlserver mit den von mir vorgegebenen Werten)

and so on

EDIT: Versteckt heißt, dass der User die GUI's nicht sieht, so wie er sie sieht wenn ich eine ganz einfache Installationsroutine mit AutoIt erstelle.

Perfekt wäre es dann noch wenn dann noch die Umgebungsvariablen für Java gesetzt werden würden!

hoffe es ist klarer geworden!

Gruß,

Tobias

**Xenobiologist**

Hi,

kann ich leider wieder nur schreiben. Ja ist möglich und viel Spaß. :rofl_devil:

Oder willst du das es jemand für dich schreibt?

Fang doch einfach mal an und dann kannst du bei konkreten Fragen hier sicher schnell Hilfe bekommen.

So long,

Mega

Chicago

hi,

also wenn ich das richtig verstanden habe soll es doch erst prüfen ob bestimmte programme schon vorhanden sind. Dann soll es sagen das Prog ist vorhanden das nicht.
Somit könntest du sagen wenn XY Prog da, installier die fehlenden ...

Desweiteren gebe ich th.meger recht... hier ist das Autoit-Forum.... und nicht das
wünsch Dir ein Script-Forum...

Fang an, bei fragen poste deinen ansatz und schildere das Problem, und du wirst sehen es gibt
bestimmt eine menge hilfe....... so wars bei mir auch .... hier sind alle sehr hilfsbereit...
weil es das beste Forum ist was ich kenne..

Chicago

Tyrael

Hallo,

ich habe auch angefangen an etwas ähnlichem zu arbeiten. Bin da aber noch nicht fertig damit.

Kannst du aber mal ausprobieren ob du es für deine Zwecke anpassen kannst.

Spoiler anzeigen

Code

#include <GUIConstants.au3>
dim $Checkbox[13]
$gui = GUICreate("Installations-Fenster", 622, 500, 187, 115)
$Checkbox[0] = GUICtrlCreateCheckbox("7-zip", 16, 50, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP)) 
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox[1] = GUICtrlCreateCheckbox("OpenOffice2.0", 16, 75, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP)) 
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox[2] = GUICtrlCreateCheckbox("ACheckbox3", 16, 100, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP)) 
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox[3] = GUICtrlCreateCheckbox("ACheckbox4", 16, 125, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP)) 
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox[4] = GUICtrlCreateCheckbox("ACheckbox5", 16, 150, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP)) 
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox[5] = GUICtrlCreateCheckbox("ACheckbox6", 16, 175, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[6] = GUICtrlCreateCheckbox("ACheckbox7", 16, 200, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[7] = GUICtrlCreateCheckbox("ACheckbox8", 16, 225, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[8] = GUICtrlCreateCheckbox("ACheckbox9", 16, 250, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[9] = GUICtrlCreateCheckbox("ACheckbox10", 16, 275, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[10] = GUICtrlCreateCheckbox("ACheckbox11", 16, 300, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[11] = GUICtrlCreateCheckbox("ACheckbox12", 16, 325, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Checkbox[12] = GUICtrlCreateCheckbox("ACheckbox13", 16, 350, 97, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$WS_GROUP,$WS_TABSTOP))
$Input1 = GUICtrlCreateInput(IniRead ( "d:\install\7-zip.ini", "InstallPath", "Path", "d:\Programme\7-zip" ), 120, 50, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input2 = GUICtrlCreateInput(IniRead ( "d:\install\openoffice.ini", "InstallPath", "Path", "C:\Programme\Openoffice2.0" ), 120, 75, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input3 = GUICtrlCreateInput("AInput3", 120, 100, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input4 = GUICtrlCreateInput("AInput4", 120, 125, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input5 = GUICtrlCreateInput("AInput5", 120, 150, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input6 = GUICtrlCreateInput("AInput6", 120, 175, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input7 = GUICtrlCreateInput("AInput7", 120, 200, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input8 = GUICtrlCreateInput("AInput8", 120, 225, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input9 = GUICtrlCreateInput("AInput9", 120, 250, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input10 = GUICtrlCreateInput("AInput10", 120, 275, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input11 = GUICtrlCreateInput("AInput11", 120, 300, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input12 = GUICtrlCreateInput("AInput12", 120, 325, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input13 = GUICtrlCreateInput("AInput13", 120, 350, 160, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
GUICtrlCreateLabel("Programm", 16, 30, 51, 17)
GUICtrlSetFont(-1, 7, 800, 0, "MS Sans Serif")
GUICtrlCreateLabel("Installationspfad", 120, 30, 80, 17)
GUICtrlSetFont(-1, 7, 800, 0, "MS Sans Serif")
GUICtrlSetState(-1, $GUI_CHECKED)
$OK = GUICtrlCreateButton("Starte Installation", 200, 420, 100, 50, 0)
$cancel   = GUICtrlCreateButton("Abbrechen", 320, 420, 100, 50)
GUISetState(@SW_SHOW)


While 1
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE OR $msg = $cancel
 ExitLoop
Case $msg = $OK
 for $i=0 to ubound($Checkbox)-1 step 1
  if (GUICtrlRead($Checkbox[$i]) = $GUI_CHECKED) then
   if($i=0)then
    _7zip()
   ElseIf($i=1) then
    _openoffice2()
 ; ElseIf($i=2) then
  ; _install_Anwendungb()
  ; ElseIf($i=3) then
  ; _install_Anwendung()
  ; ElseIf($i=4) then
  ;  _moveProfile()
   Endif
  EndIf
 next
Case Else  
;;;;;
EndSelect
WEnd
Exit


Func _7zip()
	IniWrite("d:\install\7-zip.ini", "InstallPath", "Path", GUICtrlRead($Input1))
;Run("7zip.exe")
MsgBox(0, "Test", "7zip")
EndFunc


Func _openoffice2()
	IniWrite("d:\install\openoffice.ini", "InstallPath", "Path", GUICtrlRead($Input2))
;Run("openoffice.exe")
MsgBox(0, "Test", "Openoffice")
EndFunc

Alles anzeigen

cryc

So ich habe dann jetzt einfach mal mit was angefangen.

1. Die zwei Buttons sind aber leider ohne Funktion. Kann mir das jemand erklären? Wenn ich von nem anderen Skript was reinkopiere, dann funzt es. Änder ich das dann, klappt es nicht mehr

2. Ich will jetzt, dass wenn man auf weiter klickt, dass sich ein neues Fenster öffnet.
Ist es jetzt schlauer, das existierende Fenster zu schließen und ein neues zu erstellen? oder Kann man ds Fenster lassen, und nur die Sachen zu löschen die auf dem Fenster drauf sind.

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
GUICreate("CTMSCP - Installation",600,400,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) ; will create a dialog box that when displayed is centered
GUICtrlCreateLabel("Willkommen zur Installation der CTMSCP - Software", 15, 130, 500, 400)
GUICtrlSetFont(-1, 15, 800, 0, "Arial")
$OK = GUICtrlCreateButton("Weiter", 290, 326)
$CANCEL = GUICtrlCreateButton("Abbrechen", 400, 325, 100, 30, 0)

[/autoit] [autoit][/autoit] [autoit]

GUISetBkColor (0xE0FFFF)
GUICtrlCreatePic("test.gif",15,15, 311, 65)

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE OR $msg = $CANCEL
ExitLoop
Case $msg = $OK
ExitLoop
Case Else
;;;;;;;
EndSelect
Wend

[/autoit]

**Xenobiologist**

Hi,

es ist denke ich einfacher ein zweites Fenster parallel zu erstellen, dieses zu hiden und dann wenn auf weiter geklickt wird, dann show Fenster 2 und hide Fenster 1.

So long,

Mega