Beiträge von XTC99

Wenn ich mich nicht irre gibts da das Programm "KGB Spy"
der kann unteranderem alle angesurften Internetseiten protokollieren (firefox auch).

Gibts auch als Demoversion.

ciao

Hier meine Variante von Adobe FlashPlayer Plugin.
Und mit TuneUp 2007.

Geht auch mit FireFox, nur mit AutoIt selbst habe ich probleme

Ciao
XTC99

Danke so könnte es funktionieren

Sorry hab schon die Hilfe durchsucht leider ohne Erfolg,
Ist es möglich einer Forschleife mehr als nur ein Argument zu übergeben

Vielen Dank für eure Hilfe

Fehlermeldungen bei diesem Versuch:

[/spoiler]
C:\Dokumente und Einstellungen\Administrator\Desktop\ttt.au3(1,18) : ERROR: syntax error
For $i = 1 to 999,
~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Administrator\Desktop\ttt.au3(2,32) : WARNING: $y: possibly used before declaration.
MsgBox(0,'',$i & ' - ' & $y)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Administrator\Desktop\ttt.au3(2,32) : ERROR: $y: undeclared global variable.
MsgBox(0,'',$i & ' - ' & $y)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Administrator\Desktop\ttt.au3 - 2 error(s), 1 warning(s)

Danke, jetzt weiss ich wie es geht

Vielen Dank für die Hilfe

PS: Dein Code ist mir noch ein bischen zu komplitziert zumindes das mit den Checkboxen

For $i = 11 To 20
GUICtrlSetState(Eval("Checkbox" & $i), $GUI_Hide)
GUICtrlSetState(Eval("Icon" & $i), $GUI_Hide)
Next
GUICtrlSetState($Button1, $GUI_Disable)

GUISetState(@SW_SHOW)

Danke, kannst du das eventuell mit einem Beispiel erklären ?

Hallo ich habe mir ein AuswahlMenü gebaut,
leider wird wenn es gestartet wird immer die letzte Seite (Button2)
angezeigt. Und nicht die Erste Seite (Button 1)

Erst wenn ich mit den Maustaste über die Checkboxen drüberfahre
sieht man den Text von Button 1.

Ist es möglich das Menü beim Aufruf sofort mit der Button 1 Seite zu starten.
(Button 1 -> Hide, Alle Checkboxen und Icons von 1 - 10 sichtbar)

Vielen Dank

[Blockierte Grafik: http://www.xtupload.com/new/image-C26B_49D8A7B3.jpg]

Super, vielen Dank

So vielleicht...

Run(@ComSpec & ' /k "' & @SystemDir & '\exf.exe" -crc32 "T:\_HDDRecovery\' & $chars & '\ODDFiles\boot.wim"')

Komisch habs grad mit Administratorrechten unter WinXP gestestet und der Ruhezustand war eingeschaltet.

Probiers mal so

#RequireAdmin

Run (@ComSpec & " /c powercfg /hibernate on", @ScriptDir, @SW_HIDE)

Bitte Autoit Quell-Code benutzen beim Forenschreiben, sonst tut man sich so schwer beim lesen

So könntest du es auch lösen:

Run (@ComSpec & " /c powercfg /hibernate on", @ScriptDir, @SW_HIDE)

hab scho ein bischen mit Arrays gearbeitet,
aber so ganz geläufig ist mir das Thema noch nicht :wacko:

Vielen Dank

Ciao
XTC99

Stimmt so einfach gings, Danke.

Danke schaut jetzt so aus

[Blockierte Grafik: http://g.imagehost.org/0165/Zwischenablage.jpg]

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test", 305, 293, 243, 186)
$Checkbox1 = GUICtrlCreateCheckbox("Pinnacle Studio Plus 10", 64, 32, 217, 17)
$Checkbox2 = GUICtrlCreateCheckbox("PowerDVD 6 CLJ Deluxe", 64, 72, 217, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Quicktime 7.0.4 Pro", 64, 112, 217, 17)
$Checkbox4 = GUICtrlCreateCheckbox("TMPGEnc 3.0 XPress", 64, 152, 217, 17)
$Checkbox5 = GUICtrlCreateCheckbox("VLC media player", 64, 192, 217, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Winamp Pro 5.22", 64, 232, 217, 17)
$Icon1 = GUICtrlCreateIcon("C:\WINDOWS\explorer.exe", -16, 24, 24, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
$Icon2 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -131, 24, 64, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
$Icon3 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -35, 24, 104, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
$Icon4 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -140, 24, 144, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
$Icon5 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -149, 24, 184, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
$Icon6 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -166, 24, 224, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

Hallo ich wollte mir für selbsterstelltes Menü die Schreibarbeit sparen,
in dem ich eine INI-Datei inlese und die Werte in eine Variable einlesen.

Habe mir gedacht der Befehl

$Programmname & $i = IniRead($file,'programm' & $i,'name','false')

dieses Ergebnis bringt.

$Programmname1 = IniRead($file,'programm1','name','false')
also $Programmname1 auf "Adobe Reader v9.0" setzt und
$Programmexe1 auf "AdbeRdr90_de_DE.exe" setzt.

Nur leider ist da meine Denkweise falsch, weil es funktioniert nicht
wie müsste die Syntax lauten, das ich auf das Ergebniss komme.

Vielen Dank für eure Hilfe

Das AutoIt Script

$file = 'C:\programme.ini'

;~ Auslesen
for $i = 1 to 10
$Programmname & $i = IniRead($file,'programm' & $i,'name','false')
$Programmexe & $i = IniRead($file,'programm' & $i,'exe','false')
Next

;Prüfung
for $i = 1 to 10
MsgBox (64, $i , $Programm & $i)
Next

Das INI-File

[programm1]
name=Adobe Reader v9.0
exe=AdbeRdr90_de_DE.exe


[programm2]
name=µTorrent v1.8
exe=utorrent14458.exe


[programm3]
name=AVG AntiVirus v8.5
exe=avg_free_stf_eu_85_278a1439.exe


[programm4]
name=eMule v48a
exe=eMule0.48a-Installer.exe


[programm5]
name=KMPlayer
exe=The_KMPlayer_1434.exe


[programm6]
name=iTunes
exe=iTunesSetup_v8.0.2.20.exe


[programm7]
name=Skype v4.0
exe=SkypeSetupFull.exe


[programm8]
name=PDFCreator v0.9.7
exe=PDFCreator-0_9_7_setup.exe


[programm9]
name=7zip v4.65
exe=7z465.exe


[programm10]
name=UltraVNC v1.0.5
exe=UltraVNC_105_Setup_W32.exe

Hallo wie kann ich in Autoit ein Menü mit Icons rechts Checkbox und dann den Text erstellen ?

Danke

Hier das Ergebniss so wie es dann auschauen soll:

[Blockierte Grafik: http://f.imagehost.org/0674/menue01.jpg]

Und so schauts bei mit aus

[Blockierte Grafik: http://f.imagehost.org/0673/menu02.jpg]
Leider nur der Text oder das Icon (siehe Checkbox1)

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test", 327, 200, 193, 115)
$Checkbox1 = GUICtrlCreateCheckbox("Pinnacle Studio Plus 10", 80, 8, 217, 17,$BS_ICON)
GUICtrlSetImage($Checkbox1,"shell32.dll",5)
$Checkbox2 = GUICtrlCreateCheckbox("PowerDVD 6 CLJ Deluxe", 80, 40, 217, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Quicktime 7.0.4 Pro", 80, 72, 217, 17)
$Checkbox4 = GUICtrlCreateCheckbox("TMPGEnc 3.0 XPress", 80, 104, 217, 17)
$Checkbox5 = GUICtrlCreateCheckbox("VLC media player", 80, 136, 217, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Winamp Pro 5.22", 80, 168, 217, 17)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

EndSwitch
WEnd

Puh HTA Dateien kann man nicht mit Autoit steuern. Aber wenn du sie mit Notepad öffnest siehst du alle
Aufrufe der installations Routinen, du könntes diese mit einem Batch installieren, und dann das Autoit Script aufrufen

Windows Installer Version 3.1v2
WindowsInstaller-KB893803-v2-x86--V3_1_4000_2435.exe /norestart /quiet


Microsoft .NET Framework Version 2.0
dotnetfx.exe /q:a /c:"Install /l /q


Microsoft .NET Framework Language Pack
LangPack.exe /q:a /c:"Install /l /q


Microsoft XML Parser (MSXML) 4.20
msiexec.exe /qn /i msxmlger.ms


Microsoft Visual Basic for Applications core
msiexec.exe /qn /i VBAOF11.MSI


Microsoft Visual Basic for Applications localized
msiexec.exe /qn /i VBAOF11I.MSI


DirectX 9c
DXSETUP.exe /silent


DHTML Editing Control for Applications
msiexec.exe /qn /i DhtmlEd.msi

Der AutoIt code funktioniert leider noch nicht, schätze es gibt noch Fehler mit Leerzeichen im Quellordner

#RequireAdmin
if FileExists (@TempDir & '\prerequisite') Then DirRemove(@TempDir & '\prerequisite', 1)

RunWait (@ScriptDir & '\msspp08090401de.exe -c -t:' & @TempDir & '\prerequisite')

TrayTip ("Windows Installer Version 3.1v2"," ",30,1)
RunWait ('"' & @TempDir & '\prerequisite\WindowsInstaller-KB893803-v2-x86--V3_1_4000_2435.exe" /norestart /quiet')

TrayTip ("Microsoft .NET Framework Version 2.0"," ",30,1)
RunWait ('"' & @TempDir & '\prerequisite\dotnetfx.exe" /q:a /c:Install /l /q')

TrayTip ("Microsoft .NET Framework Language Pack"," ",30,1)
RunWait ('"' & @TempDir & '\prerequisite\LangPack.exe" /q:a /c:Install /l /q')

TrayTip ("Microsoft XML Parser (MSXML) 4.20"," ",30,1)
RunWait (@SystemDir & '\msiexec.exe /qn /i "' & @TempDir & '\prerequisit\msxmlger.msi"')

TrayTip ("Microsoft Visual Basic for Applications core"," ",30,1)
RunWait (@SystemDir & '\msiexec.exe /qn /i "' & @TempDir & '\prerequisit\VBAOF11.MSI"')

TrayTip ("Microsoft Visual Basic for Applications localized"," ",30,1)
RunWait (@SystemDir & '\msiexec.exe /qn /i "' & @TempDir & '\prerequisit\VBAOF11I.MSI"')

TrayTip ("DirectX 9c"," ",30,1)
RunWait ('"' & @TempDir & '\prerequisite\DXSETUP.exe" /silent')

TrayTip ("DHTML Editing Control for Applications"," ",30,1)
RunWait (@SystemDir & '\msiexec.exe /qn /i "' & @TempDir & '\prerequisit\DhtmlEd.msi"')

DirRemove(@TempDir & '\prerequisite', 1)

Und hier das Script, der ausskommentierte Teil sollte eigentlich das XM-Prerequisite Paket installieren
nur leider ist das eine Internet Explorer_Server Klasse, und da war der sendkeys zu schnell.

Dein MSI funktioniert, nur rufe ich es über den run Befehl auf und da daher mit "C:\WINDOWS\System32\msiexec.exe /i"

Findest du so raus, Die Infos zu den Buttons siehst du auf diesem 2, Bild
Ich empfehle zu testen immer eine Virtuelle Maschine (VMware und VirtualPC) da kannst du alles testen.

Hoffe geholfen zu haben.

Ciao
XTC99

[Blockierte Grafik: http://www2.picfront.org/picture/u5ZRG1mk/img/01.jpg]

[Blockierte Grafik: http://www2.picfront.org/picture/PiJw0DfYkx/img/Zwischenablage.jpg]

#RequireAdmin

;~ run (@ScriptDir & '\msspp08090401de.exe')

;~ WinWaitClose ("MicroStation V8 XM Edition Software Prerequisite Pack","Cancel")

;~ WinWait("MicroStation V8 XM Edition Software Prerequisite Pack")
;~ WinActivate ("MicroStation V8 XM Edition Software Prerequisite Pack")
;~ Send("{TAB}{TAB}{ENTER}") ; Da leider Internet Explorer_Server Klasse nur mit send Keys installieren, möglich

;~ WinWait("MicroStation V8 XM Edition Software Prerequisite Pack","Der Installationsvorgang ist beendet")
;~ WinActivate ("MicroStation V8 XM Edition Software Prerequisite Pack","Der Installationsvorgang ist beendet")
;~ ControlClick ("MicroStation V8 XM Edition Software Prerequisite Pack", "OK", "Button1")

run (@SystemDir & '\msiexec.exe /i "' & @ScriptDir & '\Bentley_Redline.msi"')

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Willkommen beim InstallShield Wizard für Bentley Redline XM Edition")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Weiter >", "Button1")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Lizenzvereinbarung")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "Ich &akzeptiere die Bedingungen der Lizenzvereinbarung", "Button3")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Weiter >", "Button5")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Zielordner")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Weiter >", "Button1")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Verknüpfungen konfigurieren")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Weiter >", "Button1")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Setuptyp")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Weiter >", "Button5")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","Bereit das Programm zu installieren")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Installieren", "Button1")

WinWait("Bentley Redline XM Edition - InstallShield Wizard","InstallShield Wizard abgeschlossen")
WinActivate ("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick ("Bentley Redline XM Edition - InstallShield Wizard", "&Fertigstellen", "Button1")

Ist das Programm Freeware ?

Kannst du mir den Link schicken, dann teste ich es heute Abend selbst

Ciao

Schätze es liegt an der falschen Text des Buttons:

So könnte es funktionieren:

ShellExecuteWait("G:\Bentley Redline.msi")
WinWait("Bentley Redline XM Edition - InstallShield Wizard","Willkommen beim InstallShield Wizard")
WinActivate("Bentley Redline XM Edition - InstallShield Wizard")
ControlClick("Bentley Redline XM Edition - InstallShield Wizard","&Weiter >","Button1") ; zieh das Steuerkreutz von Au3Info auf den Button Weiter für den richtigen Text

Danke @ Padmak habe es gelöst

#include <Inet.au3>
#include <String.au3>

$url = 'http://www.picfront.org/d/o6wNMwSJ/tux_kill_msn.jpg'
$link_elemente = StringSplit($url, "/")
$bildnr = ($link_elemente[0])
$bild = ($link_elemente[$bildnr])

$file = (_INetGetSource($url))
$anfang = 'requestURI: "' ;Textfeld davor
$ende = $bild ;Textfeld dahinter
$gesucht = _StringBetween($file, $anfang, $ende)

MsgBox(64,$bild, $gesucht[0] & $ende)

@Stilgar
Deine Lösung schaut auch klasse aus, allerdings will ich mir dann mit allen Links eine Liste erstellen die ich dann mit
meinen Downloadmanger runterlade.

Danke
Ciao

D