Beiträge von Dietmar

ich kann nur dummy eingeben beim login und sehe nur einen tab quakenet
trotz ehem. Online Zockerzeit immer um irc etc rumgekommen
Schnall auch nicht so richtig wo du die tabs auf den Weg bringst,
generell sieht es ja so aus...

GUICtrlCreateTabItem("Client Verwaltung") ;Tab 2 Client-Verwaltung (Gui für Anlage der PCs die mittels WOL/Ping/SSH /RDP erreicht werden sollen)

GUICtrlCreateGroup("",25,30,230,50)
$Cbo_Client_Aktion = GUICtrlCreateCombo("", 40, 48, 198, 25, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1,"Anlage eines neuen Clients|Ändern/Löschen eines Clients","Anlage eines neuen Clients")
GUICtrlCreateGroup("", -99, -99, 1, 1)

GUICtrlCreateGroup("",25,80,230,220)
GUICtrlCreateLabel("Matchcode", 40, 107)
$Inp_Client_MC = GUICtrlCreateInput("Name für die Auswahl", 114, 104, 124, 21)
$Cbo_Client_MC = GUICtrlCreateCombo("", 114, 104, 124, 21)
GUICtrlSetState($Cbo_Client_MC,$GUI_HIDE)
GUICtrlCreateLabel("PC-Name", 40, 139)
$Inp_Client_Host = GUICtrlCreateInput("Computer-Beispiel", 114, 136, 124, 21)
GUICtrlCreateLabel("Mac-Adresse", 40, 171)
$Inp_Client_Mac = GUICtrlCreateInput("aabbccddeeff", 114, 168, 124, 21)
GUICtrlCreateLabel("IP-Adresse", 40, 203)
$Inp_Client_IP = _GUICtrlIpAddress_Create($Wol_Gui, 114, 200, 124, 21)
_GUICtrlIpAddress_Set($Inp_Client_IP, "1.1.1.1")
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_HIDE)
GUICtrlCreateLabel("Broadcast", 40, 235)
$Inp_Client_BC = _GUICtrlIpAddress_Create($Wol_Gui, 114, 232, 124, 21)
_GUICtrlIpAddress_Set($Inp_Client_BC, "1.1.1.255")
_GUICtrlIpAddress_ShowHide ($Inp_Client_BC, @SW_HIDE)
GUICtrlCreateLabel("System (OS)", 40, 267)
$Cbo_Client_OS = GUICtrlCreateCombo("",114, 264, 124, 21, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1,"Windows|Linux|Bitte OS auswählen","Windows")
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Btn_Client_Del = GUICtrlCreateButton("Client löschen", 30, 310, 91, 33, 0)
GUICtrlSetState($Btn_Client_Del,$GUI_HIDE)
$Btn_Client_Save = GUICtrlCreateButton("Client speichern", 160, 310, 91, 33, 0)

GUICtrlCreateTabItem("Tunnel Verwaltung") ; ;Tab 3 Tunnel Verwaltung (Gui für Anlage von Routerkonfigurationen(SSH) und Hinterlegung von SSH Tunneln)

GUICtrlCreateGroup("Routerkonfiguration für WOL und SSH Tunnel", 10,30,265,150) ; Router
$Cbo_Router_Aktion = GUICtrlCreateCombo("",20,50,200,21,$CBS_DROPDOWNLIST)

Also GUICtrlCreateTabItem("Blablabla") und darunter die dazugehörigen Controls
Und dann das nächste GUICtrlCreateTabItem("lalala") und darunter die dazugehörigen Controls usw.

GUICtrlCreateTabItem

kommt bei Dir gar nicht vor?

ootb --> out of the box

Was ich meinte in dem Bereich wo man die definiert was passieren soll wenn man auf Button xyz drücken soll,
dort habe ich mit dem Switch für $Woltabs das Verhalten auch für die tabs abgebildet.
Naja nicht ich, der Tip kam hier mal im Forum.
Also was soll passieren wenn ich auf Tab1 ,2 oder 3 klicke.
Der Rückgabewert der Tabs ist dann 0 1 2 3 usw je nach Anzahl Tabs
Also habe ich dann passend für die jeweiligen Tabs die Controls aus bz. eingeblendet so wie benötigt.
Wie gesagt alle anderen außer die IP Controls machten auch keine Probleme von daher kann bei Dir noch ein
anderes Problem sein. Für hartnäckige Controls kann man sich er aber gut der von mir geposteten Sonderbehandlung bedienen.

Tabstatus abfragen und in Abhängigkeit davon die Controls ein/ausblenden.

Bei mir funktionierte das ootb mit allen Controls, ohne zutun außer bei den IP Eingabeboxen.
Die waren überall sichtbar und dort habe ich es mit Hilfe aus dem Forum dann so gelöst.

$Wol_Gui = GUICreate("Wake on LAN - GUI", 283, 400,935,5)
$Wol_Tabs = GUICtrlCreateTab(0, 0, 290, 25)
....
und weiter unten
....
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE ; Aktion - Schliessen via [x]
Exit
Case $Wol_Tabs ; GUI - Durchscheinen des IP Dialoges verhindern
$current = GUICtrlRead($Wol_Tabs)
Switch $current
Case 0
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_HIDE)
_GUICtrlIpAddress_ShowHide ($Inp_Client_BC, @SW_HIDE)
_GUICtrlIpAddress_ShowHide ($Inp_Tunnel_zIP, @SW_HIDE)
Case 1
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_SHOW)
_GUICtrlIpAddress_ShowHide ($Inp_Client_BC, @SW_SHOW)
_GUICtrlIpAddress_ShowHide ($Inp_Tunnel_zIP, @SW_HIDE)

Das ist eine Pack/Komprimierungsmethode,
die halt durch Missbrauch von Trojanern, gerne von Antivirensoftware missverstanden wird.
Von daher reagieren die auf solche Dateien besonders sensibel.

http://www.google.de/search?q=upx+antivr&ie=utf-8&oe=utf-8&aq=t&rls=org.mozilla:de:official&client=firefox-a#pq=upx%20antivr&hl=de&cp=9&gs_id=h&xhr=t&q=upx+viren&pf=p&sclient=psy&client=firefox-a&hs=5Bv&rls=org.mozilla:de%3Aofficial&source=hp&pbx=1&oq=upx+viren&aq=f&aqi=&aql=&gs_sm=&gs_upl=&bav=on.2,or.r_gc.r_pw.&fp=be4451314243c1dc&biw=1176&bih=555

Falls nicht schon geschehen UPX beim Kompilieren auschalten.

Zitat

Das ist eine entpackte iso Datei... !

Ich bewundere Deinen Schafsinn

Zitat

Ich weiß nur noch eine Möglichkeit, unzwar externes CD/DvD Laufwerk.
Vielleicht habt ihr noch eine Lösung für das Problem.

Warum möchtest Du unbedingt mehrere Lösungen für Dein Problem?
Klemm ein externes Laufwerk an und installier damit oder RIS in der Zeit hätte man mit dcpromo multiple Domänen hochgezogen.
Oder mit Dos incl. Netzwerk booten mit "net use" Laufwerke mappen und dann installieren. Brauchst Du halt Dostreiber für LAN.
Evtl. wirst Du hier fündig http://www.bootdisk.de/ RIS ist via PXE erreichbar und braucht die Disk nicht

Hallo Ilse

GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKTOP + $GUI_DOCKHCENTER)

Hinter dem jeweiligen Control kann man es so im Prinzip bestimmen, mit welchen Fixpunkten das Control "relativ" verankert sein soll.
Ist auch etwas fummelig funktioniert aber.

Hier passt es besser.
Der andere Post, habe ich wohl missverstanden das er gar nicht die Gui sondern nur einen Teil in der Gui resizen will.

nein die loosen Daten zum Beispiel so, der markierte Ordner ist privat und hat mit win7 nix zu tun

Nein ich sagte nicht, das es zu langsdam ist
sondern das Du an das Tempo von regedit /e nicht rankommst

Schade wenn es gesperrt ist, dann hast Du ja keine andere Möglichkeit.
wenn die einzelnen Elemete passen würde ich die erste Zeile so in die Datei schreiben.
Und den Rest mit iniwrite, da das der exportierten Struktur (wie sie regedit liefern würde), schon sehr nah kommt.
Danach umbenenen dann hast Du eine Regdatei, die dann mittels shellexecute aausrollen oder mit GPO wenn AD etc vorhanden.

you make my day
"Das Verhältnis verhält sich verhältnismäßig nicht so wie es soll »"

Nun gut willst Du das alles berechen? Dafür gibt es doch Hilfsmittel, welche die Controls beim Resizen berücksichtigen.

GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKTOP + $GUI_DOCKHCENTER)

Hinter dem jeweiligen Control kann man es so im Prinzip bestimmen mit welchen Fixpunkten das Control verankert sein soll.

Gruß Dietmar

Und warum nicht Fehlermeldung?

Pfad angepasst, also mit Deinem gewünschten Pfad versucht?
32/64Bit berücksichtigt?

#requireadmin?

regedit per GPO verboten?

Das in einer Schleife zu exportieren ist auf jedenfall etwas langsamer und aufwendiger.
Wie Du siehst Fragen über Fragen... und warum

Also lass Dir helfen und antworte etwas ausführlilcher.

wenn der / die USer regedit benutzen dürfen:

Run("regedit /e c:\test.reg "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\")

wäre eine Möglichkeit mit wenig Text für Dich.

http://www.eolsoft.com/freeware/regis…it_switches.htm

Gruß Dietmar

Zitat

Ich habe es auch schon über VirtualBox probiert, dort erkennt er ebenfalls kein USB.

Häh wie meinen. und das Notebook kein Laufwerk haben ist wohl nen Witz, Du meinst Netbooks da ist es eher Usus.

Von USB Booten ist nicht so die Stärke von XP, ich würde wenn möglich via RIS installieren,
ansonsten nen USB CDROM leihen (manchmal macht es einen Unterschied im Bios CD / oder den evtl. erkannten Hersteller auszuwählen.)

Auch mit Installdiskette (USB) wäre eine Installation möglich am wenigsten nervig ist aber die CD7DVD Variante oder halt RIS.
Vmware mit 2k3/2k8 Server und Ris konfigurieren macht man einmal kann man aber immer wieder gebrauchen.

Gruß Dietmar

P.S.: Falls es hilft Win7 lässt sich top von Stick installieren und braucht auch nur die Instadateien auf dem Stick,
da musst Du nicht mit unetboot etc. rumhampeln.

Nochmal wenn es nur ums entpacken geht sollte expand seinen Job machen und das coole ist , das es eeeh da ist.
Finde 7-zip auch toll aber warum was einbauen wenn schon en funktionelles Gegenstück vorhanden ist.
Sonst ist man bald auf dem Stand von HP Druckerttreibern, der passte mal auf ne Diskette aber mittlerweile installiert
man ja grundsätzlich Picasa und den ganzen anderen Rotz mit, zumindest wenn es nach denen geht.

Ein paar von den ersten Scripten, die schon etwas Funktion hatten.

Das Programm diente dazu einen x400 Dienst zum reconnecten zu animieren und es nervte halt
sich mit umts einzuwählen und dann mit Dosfenstern rumzuhampeln.
Kurze Zeit später sah es dann so aus

Und ein kleines Ping Script um Timeouts zu protokollieren, zusätzlich ein paar Firmenserver die man so schnell auf Vorhandensein prüfen konnte. Mittlerweile macht das aber alles nagios im größeren Umfang.

$Stop = GuiCtrlCreateButton("Hilfe", 320, 80, 40, 40);, $BS_ICON)

$BS_ICON musste ich auskommentieren, mal schauen warum das aktuell nicht mehr geht.

P.S. IP Adressen wurden geändert daurch kann es etwas dauern bis er es merkt.

Gruß Dietmar

mit dem Befehl expand kan man z.B. Dateien aus *.Cab- Dateien extraieren, sollte mit Zip auch funktionieren

BugFix
Dann müssen aber alle 3 (Hallo Huhu Hejo) vorhanden sein
oder reicht auch das einzelne Auftreten von Huhu?

If StringInStr($s_dsn_driver,"\sqlsrv32.dll") Or $s_dsn_driver = "oracle" Then $s_dsn_label &= $s_dsn_name & "|"

Habe so etwas bei mir eingebaut, oracle ist noch dummy, normal steht was mit orcl..., um nur Oracle und MSSQL DSNs anzuzeigen
Würde das auch gehen?

If StringInStr($s_dsn_driver,"\sqlsrv32.dll \oracle.dll") Then $s_dsn_label &= $s_dsn_name & "|"

Gruß Dietmar

Also was ich vermutlich verstanden habe:

a.) du möchtest eine sortierte Liste mit Verzeichnissen, ohne die leeren Ordner gelistet zu bekommen.

Ich würde eine Ini nehmen, dann kann man im Editor auch ordnerweiwe schön auf und zuklappen
Dateien einlesen mit Hilfe von fileread rekursiv oder die Lösungen von bugfix (mit oder ohne objekt)
Am besten je Ordner, abei merkst Du ob der Ordner leer ist und überhaupt benötigt wird
wenn ordner nicht leer dieses Array dann mit arraysort sortieren dann
in einer Schleife alle Dateien des Ordners(Arrays mit ubound) abarbeiten

If $a_Ordner<>"" then
Arraysort($a_Ordner)
For $i_cnt = 1 to ubound($a_Ordner)
iniwrite("Dateien.ini",$a_Ordner,$a_Ordner[$i_cnt][1],Filegetversion($a_Ordner[$i_cnt][1])) ; iniwrite("Dateien.ini","Pfad_des_Ordners","Datei","evtl. Version oder Datum ")
next
Endif

Sieht dann bei mir im lauffähigen Script so aus:

Zitat

[\Programe\AutoIt3\]
Autoit.chm=...
Autoit.exe=3.3.61
[\Programe\AutoIt3\Aut2Exe\]
Aut2exe.exe=....
.....
..... usw

Alles anzeigen

Wenn das so in etwa aussehen soll, dann hätte ich da ene modifizierte Variante von Bugfix im Einsatz.
Das oben ist noch grob aus dem Kopf und auch nen Dreher drin aber soll nur der Erklärung dienen.

b.) evtl. additiv deine vorhandene Datei von den Einträgen befreien, halt die wo nur der Ordner steht ohne Datei

Dazu muss die Datei oder Beispiel mit der Struktur wie bei Dir vorhanden angefügt werden, ohne sieht es schlecht aus

Mal was anderes, Deutsch ist nicht Deine Muttersprache,oder?
Falls es so ist evtl. in Englisch schreiben oder anderes Übersetztungsprogramm suchen weil es so wirklich nicht gut zu verstehen ist.
Falls doch bemühe Dich in jedem Fall intensiver klar verständliche Sätze zu bilden, das sollte man zumindest von jedem verlangen können, der der deutschen Sprache mächtig ist.
Wie gesagt, ansonsten müsste man hier noch nen international Bereich einrichten oder auf das englischsprachige Forum hinweisen.

Will Dir jetzt nicht vor den Kopf stossen, nach dem Motto:"Kannst Du nix Deutsch." Muss man ja nicht, man muss es nur wissen und einigt sich z.B. auf eine andere Sprache. Ansonsten fühlt man sich veralbert. (Zumindest kommt es mir so vor.)
außerdem je intensiver man sich mit der Formulierung der Frage beschäftigt um leichter fällt es anderen es zu verstehen. Und machmal fällt einem dabei auch selbst der Groschen.

Gruß Dietmar

$Wol_Gui = GUICreate("Wake on LAN - GUI", 283, 354)
$Wol_Tabs = GUICtrlCreateTab(0, 0, 290, 25)

...
...
..

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Wol_Tabs
$current = GUICtrlRead($Wol_Tabs)
Switch $current
Case 0
_GUICtrlIpAddress_ShowHide ($Input_IP, @SW_HIDE)
_GUICtrlIpAddress_ShowHide ($Input_BC, @SW_HIDE)
Case 1
If GUICtrlRead($Radio_Save)=1 Then
_GUICtrlIpAddress_ShowHide ($Input_IP, @SW_SHOW)
_GUICtrlIpAddress_ShowHide ($Input_BC, @SW_SHOW)
EndIf
EndSwitch

Case $Radio_Del

Könnte Dir evtl. helfen habe mal das Problem gehabt das die IP Form auf allen Tabs sichtbar war.

Das hier ist auch sehr informativ/hilfreich: [ gelöst ] Buch

Gruß Dietmar