Beiträge von Schnitzel

**Schnitzel**

und wieso bauste das nicht ein was ich dir im 2ten Post hierdrin gezeigt hab?

Spoiler anzeigen

[autoit]

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Pasword Abfrage", 258, 87, 192, 124)
$Input1 = GUICtrlCreateInput("", 128, 40, 121, 21, $ES_PASSWORD)
$Label1 = GUICtrlCreateLabel("Password Abfrage", 8, 0, 131, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Bitte Password eingeben:", 0, 40, 124, 17)
$Weiter = GUICtrlCreateButton("Weiter >", 8, 56, 75, 25, BitOR($BS_DEFPUSHBUTTON,$WS_GROUP))
$Label3 = GUICtrlCreateLabel("Made by Mrx", 144, 16, 76, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Weiter
If GUICtrlRead($Input1) = "23081994" Then
Main()
Else
TrayTip("Fehler", "Sie haben das Fasche Password eingegeben!", 6)
EndIf
EndSwitch
WEnd

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

Func Main()
msgbox(0,"","Main")
EndFunc

[/autoit]

**Schnitzel**

Zitat von Diegorn

HayKann man eine Textdatei mit einem PW versehen.

du kannst sie mithilfe von _Crypt_DecryptFile() in eine verschlüsselte Datei umwandeln.

Zitat

Oder kann man einen eigenen editor mit autoit machen???

mit fileread() kannste eine datei einlesen und dann muss du sie nur in ne editbox reinschreiben.
und dann ne kleine speicherfunktion mit der du die editbox einliest und den inhalt in ne datei schreibst.
kein großer act

**Schnitzel**

Dann sag uns halt endlich mal was.

Wie soll man dir denn so helfen?

**Schnitzel**

Zitat von gmmg

beispiel einer installation .

Sry aber das is n ziemlich schlechtes Beispiel. Auch wenns bei dir funktionieren mag, ist es doch sehr fehleranfällig

Zitat von Mitnick

Winwait ("fenster 1, "", 30)

Winaktivate ("fenster2")

ne du du wartest ja auf das 2te fenster. Also

[autoit]

Winwait("fenster2")
Winaktivate("fenster2")

[/autoit]

**Schnitzel**

achso, n anderes fenster kannst du mit Winactivate aktivieren.

die controlfunktionen gehen aber auch wenn das fenster minimiert oder versteckt ist

**Schnitzel**

haste jetz noch ein Problem oder ist es gelöst?

sag doch mal bisschen mehr

**Schnitzel**

schau dir doch am besten die anderen Control...-Funktionen in der Hilfe an.

Da ist egtl alles mit Beispiel drin

Controlclick, Controlsettext, Controlsend

**Schnitzel**

Zitat von dsgamer007

Sonst lass ihn die abfrage doch einfach mit controlclick wegklicken

es geht darum dass 2 verschiedene fenster kommen könnten da hilft dir controlclick alleine wenig

**Schnitzel**

Kommt denn die Sicherheitsfrage auch wenn du statt:

[autoit]

run ("\\mech00i\IT-Files\Clientsoftware\7Zip\7z465.exe")

[/autoit]

das verwendest:

[autoit]

Shellexecute ("\\mech00i\IT-Files\Clientsoftware\7Zip\7z465.exe")

[/autoit]

und kommst du mit dem codeschnipsel zurecht den ich gepostet hab?

Zitat

win pro 64

windows war egtl klar :D:D
intressanter wäre ob XP, Vista oder Win7

**Schnitzel**

ich glaube die sicherheitsfrage kam nicht wenn du statt Run() Shellexecute verwendest.
bin mir da aber nicht ganz sicher.

welches Betriebssystem hast du denn? vllt hilft auch #RequireAdmin am Anfang des Scripts.

ansonsten hab ich eine fensterabfrage immer so gelöst:

Spoiler anzeigen

[autoit]

Do
sleep(100)
Until WinExists("Fenster1") Or Winexists("Fenster2")

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

Select
Case Winexists("Fenster1")
; dann mache das hier
Case Winexists("Fenster2")
;ansonsten mache das hier
EndSelect

[/autoit]

ob das jetzt die beste lösung ist weiß ich nicht aber sie funktioniert

**Schnitzel**

so?

ps: verwende lieber spoiler und autoit boxen anstatt der zitate

Spoiler anzeigen

[autoit]

BlockInput(1)

run ("\\mech00i\IT-Files\Clientsoftware\7Zip\7z465.exe")

WinWait("7-Zip 4.65 Setup")

ControlClick("7-Zip 4.65 Setup", "&Install", "Button2")

WinWait("7-Zip 4.65 Setup")

Sleep(5000)

ControlClick("7-Zip 4.65 Setup", "&Finish", "Button2")

BlockInput(0)
msgbox(0,"Meldung vom Skript", "Ich bin mit der Installation fertig!")

[/autoit]

**Schnitzel**

wo liegt das problem?

-->guictrlcreatepic erstellen
-->über dropdown auswählen lassen welches bild
-->per guictrlsetimage() bild anzeigen

**Schnitzel**

quick & dirty:

Spoiler anzeigen

[autoit]

#include <File.au3>
Dim $kunden
_FileReadToArray("kunden.txt", $kunden)
$import=FileRead("import.txt")
for $i = 1 To $kunden[0]
$tmp = StringSplit($kunden[$i], ";")
$import = StringReplace($import, $tmp[1], $tmp[2])
Next
FileWrite("Ergebnis.txt", $import)

[/autoit]

**Schnitzel**

Spoiler anzeigen

[autoit]

#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
; includen denke ich is klar

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

If not IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", "") Then
; if not iniread: bedeutet soviel wenn die datei nicht da ist oder wenn die Section in der ini noch nicht beschrieben ist, wenn also kein Programmpfad in der ini steht dann mache folgendes:
$path = FileOpenDialog("Wähle das Programm", @Scriptdir, "Programme (*.exe)", 1)
; öffne einen FileOpendialog, @Scriptdir ist der pfad bei dem es sich von anfang an befindet und
; "Programme <--was da steht ist frei wählbar (*.exe) <--- Nur alle exe-Dateien
; die 1 steht für: Der Pfad muss existieren
IniWrite(@Scriptdir & "\Settings.ini", "Pfade", "Programm", $path)
; Speichere den eben ermittelten $path also den pfad zur exe-Datei in einer ini
; die sich im Skriptverzeichnis befindet und Settings.ini heißt
; Unter der Sektion Pfade mit dem Key: Programm
EndIf

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

$Form1 = GUICreate("Form1", 139, 123, 192, 124)
; erstelle eine gui^^
$Icon1 = GUICtrlCreateIcon(IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", 0), -1, 8, 8, 121, 105, BitOR($SS_NOTIFY,$WS_GROUP))
; erstelle ein icon. mit dem bild der exe-Datei die vorhin in der ini gespeichert wurde.
; alles andere is relativ uninteressant bzw Standard
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Icon1
ShellExecute(IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", 0))
; Shellexecute: führe die datei aus
; Wiederrum der Pfad zu der exe Datei den wir vorhin in die ini geschrieben haben
EndSwitch
WEnd

[/autoit]

**Schnitzel**

so wär ein kleines programm mit gui

Spoiler anzeigen

[autoit]

#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>

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

If not IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", "") Then
$path = FileOpenDialog("Wähle das Programm", @Scriptdir, "Programme (*.exe)", 1)
IniWrite(@Scriptdir & "\Settings.ini", "Pfade", "Programm", $path)
EndIf

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 139, 123, 192, 124)
$Icon1 = GUICtrlCreateIcon(IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", 0), -1, 8, 8, 121, 105, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Icon1
ShellExecute(IniRead(@Scriptdir & "\Settings.ini", "Pfade", "Programm", 0))
EndSwitch
WEnd

[/autoit]

**Schnitzel**

wie hast dus denn ausprobiert?

so gehts:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 625, 443, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 176, 120, 289, 73, BitOR($BS_DEFPUSHBUTTON,$WS_GROUP))
$Input1 = GUICtrlCreateInput("Input1", 168, 16, 209, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
msgbox(0,"","")
EndSwitch
WEnd

[/autoit]

**Schnitzel**

leg ihn einfach als DefPushButton fest:

[autoit]

$Button1 = GUICtrlCreateButton("Button1", 0, 0, 0, 0, BitOR($BS_DEFPUSHBUTTON,$WS_GROUP))

[/autoit]

**Schnitzel**

Willkommen im forum.

Für was brauchst du denn so einen Makrorekorder?
Ohne ansatz isses kein helfen^^

Also zeig uns bitte was du gemacht hast und wo du Hilfe brauchst. Keiner wird dir hier ein komplettes Programm bauen

**Schnitzel**

Bots werden hier nicht supportet

bitte forenregeln lesen:
https://autoit.de/index.php?page=Forumrules

**Schnitzel**

wurde schonmal gefrage:

Zitat

Was wird das denn wenn es fertig ist?

Beiträge von Schnitzel

Kleine Frage

Editor mit PW

Kleine Frage

Mehrere Programme installieren und weiter klicken.

Mehrere Programme installieren und weiter klicken.

Kleine Frage

Mehrere Programme installieren und weiter klicken.

Mehrere Programme installieren und weiter klicken.

Mehrere Programme installieren und weiter klicken.

Mehrere Programme installieren und weiter klicken.

Mehrere Programme installieren und weiter klicken.

Gui Guictrlcreatecombo - bild

Suchen & Ersetzen

Wie kann ich ein Programmpfad auslesen und dann ein Programm mit diesem Pfad öffnen

Wie kann ich ein Programmpfad auslesen und dann ein Programm mit diesem Pfad öffnen

Kleine Frage

Kleine Frage

Makrorekorder

Hilfe bei Timer und Tastendruck

Refresh oder Wiederholen