Hi All,
den FLV-Player kennt Ihr ? Der kann das abspielen.
Man liest sich...
Euer Ritzelrocker04
Hi All,
den FLV-Player kennt Ihr ? Der kann das abspielen.
Man liest sich...
Euer Ritzelrocker04
Hallo Oscar,
bei Ihm muss AutoIT jetzt wohl Alles machen, selbst die CD-Schubladen öffnen / schließen (Scherz) ?
Speicherkarten werden automatisch erkannt, man muss das richtige LW nicht mehr suchen. Disketten habe ich nicht. USB-Stick´s werden noch nicht erkannt. Die mitgelieferte ini-Datei muss übernommen werden, wenn nicht kommt es zu einer anderen Platzierung der GUI.
PS: langsam kommt man mit den Versionen durcheinander, Vorschlag (SpaceBar2008-01-09.zip)
Weiterhin viel Erfolg !
Man liest sich...
Euer Ritzelrocker04
Hi Greenhorn,
Danke für Sein Interesse und Hinweis, die näheren Umstände habe ich in Scripte>The Stick ausführlicher beschrieben. Dort ist auch das komplette Script hinterlegt. Die anliegenden Zeilen habe ich nochmals entsprechend Seiner Bedenken hin überprüft. Die anliegenden Zeilen funktionieren auch mit extra eingefügter Leerstelle !
; mit Hilfe von Progandy und Greenhorn
#Region ### zweiter Test ###
$src_LW = StringLeft(@ScriptDir,2) & "\"
RunWait('USBsys\7za.exe a -tzip "' & @MyDocumentsDir & '\Neu TestOrdner\Ritzelrocker-0"' & @WDAY & '".zip" "' & $src_LW, @MyDocumentsDir) ;FUNCTIONIERT AUCH
#Endregion
; erster Test
RunWait('USBsys\7za.exe a -tzip "' & @MyDocumentsDir & '\Neu TestOrdner\Ritzelrocker-0"' & @WDAY & '".zip" "' & '"L:\"', @MyDocumentsDir) ;FUNCTIONIERT AUCH
Danke
Man liest sich...
Euer Ritzelrocker04
Hi Oscar, Xeno und Progandy
Alles zusammen, dann nicht mehr als SpaceBar sondern als SideBar zum seitlichen heraus fahren !
Der User kann dann seine Laufwerke von den eingebauten Cardreadern sofort erkennen !
Man liest sich...
Euer Ritzelrocker04
Hi Oscar, Xeno und Progandy
wie währe es etwas moderner (siehe Anhang), wenn schon auf motzen ?
Man liest sich...
Euer Ritzelrocker04
cool Danke, Progandy
mach ich mich dran
Man liest sich...
Euer Ritzelrocker04
Hi Greenhorn,
wie versprochen habe ich mich mit den Zeilen befasst und sie funktionieren. Meine angepasste Lösung ist im Spoiler.
Doch wo Licht, da ist auch Schatten !
Die eigentlich gut funktionierende Zeile verrichtet ihren Dienst auf einem USB-Stick nur bei Vergabe fester Pfade (zB. L:\ ). So bringt die Lösung auch eine neue Frage mit und ich kann es mir aussuchen, ob ich nun gleich mein Eingangsbeispiel nehme oder nach dem LW-Buchstaben suchen lassen will ?
RunWait('RDsys\7za.exe a -tzip "' & @MyDocumentsDir & '\My TestOrdner\Ritzelrocker-0"' & @WDAY & '".zip" "' & _
'"C:\$$"', @MyDocumentsDir) ;FUNCTIONIERT AUCH
Danke
Man liest sich...
Euer Ritzelrocker04
Hi qon,
mein Dank für Seinen Beitrag ist Ihm sicher. Bei der Recherche zum Thema bin ich auf einige Seiner Beiträge aufmerksam geworden. Ganz schön fit ist der qon geworden !
Danke
Man liest sich...
Euer Ritzelrocker04
Hallo Greenhorn ,
der Vorschlag sagt mir schon zu und werde mich mit ihm noch beschäftigen.
Nochmals Danke an Alle
Man liest sich...
Euer Ritzelrocker04
Hi vgun,
auch Ihm meinen Dank, muss ich mal sehen. Eine funktionierende Möglichkeit habe ich ja schon eingangs vorgestellt.
Danke
Man liest sich...
Euer Ritzelrocker04
Hi Micha_he,
leider auch nicht !
Danke
Man liest sich...
Euer Ritzelrocker04
Hi Progandy,
leider funktionieren Beide nicht !
Danke
Man liest sich...
Euer Ritzelrocker04
Hallo Micha_he,
ja es ist das Originale. Mit @MyDocumentsdir will ich sicherstellen, dass es überall funtioniert (im Sinne des Erfinder).
Danke
Man liest sich...
Euer Ritzelrocker04
Hi,
leider nicht ?
RunWait(@ComSpec & ' /c ' & "RDsys/7za.exe a -tzip " & @MyDocumentsdir & "\Test-0" & @WDAY & ".zip " & _
"C:\$$", @ScriptDir, @SW_MINIMIZE) ;FUNCTIONIERT
Danke
Man liest sich...
Euer Ritzelrocker04
Hallo,
mit dem funktionierendem Beispiel wird ein Ordner der Festplatte gepackt (7zip) und mit FileMove/@MyDocumentsdir in die Eigenen Dateien verschoben bzw. kopiert und gelöscht.
Ist es möglich gleich in die Eigenen Dateien (@MyDocumentsdir) packen zulassen ?
RunWait(@ComSpec & ' /c ' & "7za.exe a -tzip " & "C:\Test-0" & @WDAY & ".zip " & _
"C:\AnfangsOrdner", @ScriptDir, @SW_MINIMIZE) ;FUNCTIONIERT
FileMove("C:\Test-0" & @WDAY & ".zip ", @MyDocumentsdir & "\My TestOrdner\", 1+8) ;FUNCTIONIERT AUCH
[/autoit]Danke
Man liest sich...
Euer Ritzelrocker04
Hi,
ich habe es mal aktualisiert, jetzt in Version Rdv2014.
; by Benjamin C. und Ritzelrocker04 ==> RDv2014.au3
#include <GUIConstants.au3>
$GUI = GUICreate("Running Disk v 2.0.14", 315, 150, -1, 180, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$gb_All = GUICtrlCreateGroup("", 8, 1, 300, 112)
$avi = GUICtrlCreateAvi("RDsys\RD.avi", -1, 24, 10, 100, 100, BitOR($ACS_TRANSPARENT,$ACS_AUTOPLAY))
$gb_EigeneDateien = GUICtrlCreateGroup("Eigene Dateien", 144, 13, 145, 90)
$bn_Close = GUICtrlCreateButton("&Beenden", 229, 120, 75, 25, 0)
$bn_OK = GUICtrlCreateButton("&OK", 149, 120, 75, 25, 0)
GUICtrlSetState(-1,$GUI_DEFBUTTON)
$rb_Sichern = GUICtrlCreateRadio("&sichern", 150, 40, 113, 17)
GUICtrlSetState($rb_Sichern, $GUI_CHECKED)
$rb_SichernUaus = GUICtrlCreateRadio("&nach sichern den PC ausschalten", 150, 65, 113, 33, BitOR($BS_AUTORADIOBUTTON,$BS_MULTILINE))
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
If $nMsg <> 0 Then
$Sichern = GUICtrlRead($rb_Sichern)
Select
Case $nMsg = $GUI_EVENT_CLOSE Or $nMsg = $bn_Close
Exit
Case $nMsg = $bn_OK
If $Sichern = 1 Then
$_Userwahlsich = MsgBox(32+4, " Sichern", "Möchten Sie nach der Sicherung weiterarbeiten ? ")
If $_Userwahlsich = 7 Then
MsgBox(48, " Sichern", " ...es wurden keine Daten gesichert ! ")
Exit
EndIf
_SichernFunc1()
MsgBox(64, " Sichern", " Sicherung abgeschlossen ! ")
Exit
Else
$_Userwahlout = MsgBox(32+4, " Sichern & Ausschalten", "Möchten Sie nach der Sicherung den PC automatisch ausschalten ? ")
If $_Userwahlout = 7 Then
MsgBox(48, " Sichern & Ausschalten", " ...es wurden keine Daten gesichert ! ")
Exit
EndIf
_SichernFunc1()
Shutdown(9)
EndIf
ExitLoop
EndSelect
EndIf
WEnd
Func _SichernFunc1()
RunWait(@ComSpec & ' /c ' & "RDsys\7za.exe a -tzip " & "E:\$Backup$\$EigeneDateien$\EigeneDateien-0" & @WDAY & ".zip " & '"C:\Dokumente und Einstellungen\XP-Home\Eigene Dateien"',@ScriptDir ,@SW_MINIMIZE)
SoundSetWaveVolume(50)
SoundPlay("RDsys\Success.wav", 1)
EndFunc
Schönes WE und weiterhin
viel Spaß !
Man liest sich...
Euer Ritzelrocker04
The Stick soll meine Batch-Datei auf dem USB-Stick ersetzen und diesen bei Bedarf auf die Festplatte nach Eigene Dateien\Eigene Sticks sichern. Es ist ein kleines Script und benötigt ca. 1MB Speicherplatz auf dem USB-Stick. Als Packer kommt das Kommandozeilenprogramm "7zA.exe" (Standalone-Vers. von 7Zip) zur Anwendung. Das Open-Source Programm ist im normalen Download nicht enthalten. 7Za wird hier mitgeliefert und kann dem Download entnommen werden. Bei der Sicherung handelt es sich um ein "SystemBackup". Nach 7 Sicherungen, wird die Erste überschrieben die Festplatte wird nicht so schnell voll und die Daten bleiben aktuell.
Sprache: Deutsch
Betriebssysteme: Windows XP, 2003, Vista, Seven
Version: USBv3800_2010-08-11.zip
Dateigröße: 732 K
#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=USBsys\compile.ico
#AutoIt3Wrapper_outfile=USBv3.8.exe
#AutoIt3Wrapper_Res_Description=The Stick
#AutoIt3Wrapper_Res_Fileversion=3.8.0.0
#AutoIt3Wrapper_Res_LegalCopyright=© 2010 by Ritzelrocker04
#AutoIt3Wrapper_Res_Language=1031
#AutoIt3Wrapper_Res_Field=Compiled by|Ritzelrocker04
#AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
#AutoIt3Wrapper_Res_Field=Original Name|USBv3.8.exe
#AutoIt3Wrapper_Run_Tidy=y
#AutoIt3Wrapper_Run_Obfuscator=y
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
#region ### include section ###
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#endregion ### include section ###
#region ### variablen section ###
$src_LW = StringLeft(@ScriptDir, 3); Quelle - The Stick
$dest_LW = StringLeft(@MyDocumentsDir, 2); Ziel - Eigene Dateien
Dim $VOL_Ziel[2], $VOL_Quelle[4]
[/autoit] [autoit][/autoit] [autoit]$title = "The Stick v 3.8"
$build = " Build 2010-08-11 "
$uccess = "USBsound\Success.wav"
#endregion ### variablen section ###
#region ### START The Stick - GUI section ###
$GUI = GUICreate($title, 300, 147, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOPMOST)
GUICtrlCreatePic("USBskin\Yellow3.jpg", 0, 16, 300, 115, 0)
$bn_Up = GUICtrlCreateButton(" J J J J J J J J ", 0, 0, 300, 16)
GUICtrlSetFont(-1, 10, 400, 0, "Wingdings")
$gb_Ziel = GUICtrlCreateGroup("", 66, 24, 224, 70) ; create group $gb_Ziel
$tb_Ziel = GUICtrlCreateInput("", 78, 41, 200, 17, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlSetBkColor(-1, 0xFFFBF0)
$ctrlProgBkgrnd1 = GUICtrlCreateLabel("", 78, 67, 200, 15, BitOR($ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlSetBkColor(-1, 0x00FF00) ; green background
$ctrlProgress1 = GUICtrlCreateLabel("", 78, 67, 1, 15, BitOR($ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlSetBkColor(-1, 0xFF0000) ; Red progress bar
GUICtrlCreateGroup("", -99, -99, 1, 1) ; close group $gb_Ziel
$bn_Pic = GUICtrlCreateButton("PicBn", 10, 30, 55, 64, $BS_BITMAP)
GUICtrlSetImage(-1, "USBsys\img.bmp")
$bn_Sichern = GUICtrlCreateButton("&Sichern", 133, 101, 75, 22, 0)
GUICtrlSetState(-1, $GUI_DEFBUTTON)
$bn_Close = GUICtrlCreateButton("&Beenden", 213, 101, 75, 22, 0)
$bn_Autor = GUICtrlCreateButton("RR04", 10, 111, 34, 16)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetTip(-1, "UpdateCheck")
$bn_Down = GUICtrlCreateButton(" J J J J J J J J ", 0, 131, 300, 16)
GUICtrlSetFont(-1, 10, 400, 0, "Wingdings")
#endregion ### START The Stick - GUI section ###
#region ### The Stick - GUI section ###
$GuiStick = GUICreate($title, 300, 115, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOPMOST)
GUICtrlCreatePic("USBskin\Dialo.jpg", 0, 0, 300, 115, 0)
$tb_src_Total = GUICtrlCreateInput("", 8, 20, 140, 17, $ES_READONLY)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$tb_src_Free = GUICtrlCreateInput("", 152, 20, 140, 17, $ES_READONLY)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$tb_src_Belegt = GUICtrlCreateInput("", 8, 70, 140, 17, $ES_READONLY)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$tb_src_Prozent = GUICtrlCreateInput("", 152, 70, 68, 17, $ES_READONLY)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$ctrlProgBkgrnd2 = GUICtrlCreateLabel("", 8, 45, 284, 15, BitOR($ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlSetBkColor(-1, 0x00FF00) ; green background
$ctrlProgress2 = GUICtrlCreateLabel("", 8, 45, 1, 15, BitOR($ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlSetBkColor(-1, 0xFF0000) ; Red progress bar
$bn_Return = GUICtrlCreateButton("zurück", 225, 85, 65, 22, 0)
GUISetState(@SW_SHOW, $GUI)
GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST") ;i Funktion zum verschieben der Oberfläche
#endregion ### The Stick - GUI section ###
; starten Func _infoLW()
_infoLW()
While 1
$msg = GUIGetMsg(1)
Switch $msg[1] ; window-handle
Case $GUI
Switch $msg[0] ; event/control-handle
Case $bn_Pic
GUISetState(@SW_HIDE, $GUI)
GUISetState(@SW_SHOW, $GuiStick)
Case $bn_Close
Exit
Case $bn_Autor
ShellExecute("http://ritzelrocker04.bplaced.net/thema1.htm")
Case $bn_Up
_About() ; starten Func _About()
Case $bn_Down
_About() ; starten Func _About()
Case $bn_Sichern
If FileExists(@MyDocumentsDir & '\Eigene USB-Sticks\USB-Stick-0' & @WDAY & '.zip') Then
$ExistsFileWahl = MsgBox(262144 + 48 + 4, " Löschen", "Die Datei " & 'USB-Stick-0' & @WDAY & '.zip besteht bereits. ' & @CRLF & ' Möchten Sie sie ersetzen ? ')
If $ExistsFileWahl = 6 Then
FileDelete(@MyDocumentsDir & '\Eigene USB-Sticks\USB-Stick-0' & @WDAY & '.zip')
EndIf
EndIf
$_Userwahlsich = MsgBox(262144 + 32 + 4, " Sichern", $VOL_Ziel[2] & " MB frei " & @CRLF & $VOL_Quelle[4] & " MB ca. nötig " & @CRLF & "Die Daten werden in komprimierter Form abgespeichert." & @CRLF & "Dass kann, je nach Datenmenge des USB-Sticks, einige Minuten dauern." & @CRLF & "Bitte warten Sie die Erfolgsmeldungen ab !" & @CRLF & @CRLF & "Möchten Sie fortfahren ? ")
If $_Userwahlsich = 7 Then
MsgBox(262144 + 48, " Sichern", " ...es wurden keine Daten gesichert ! ")
Exit
EndIf
RunWait('USBsys\7za.exe a -tzip "' & @MyDocumentsDir & '\Eigene USB-Sticks\USB-Stick-0"' & @WDAY & '".zip" "' & $src_LW, @MyDocumentsDir, @SW_HIDE)
_infoLW() ; starten Func _infoLW()
_Log_Write() ; starten Func _Log_Write()
;SoundSetWaveVolume(50) ; optional (50)Lautstärke in %
SoundPlay($uccess, 1) ; 1 = Skript wartet, bis der Sound abgespielt ist.
MsgBox(262144 + 64, " Sicherung fertig", "Sicherung vom " & @CRLF & @CRLF & @MDAY & "-" & @MON & "-" & @YEAR & " um " & @HOUR & ":" & @MIN & " Uhr " & @CRLF & @CRLF & "ist abgeschlossen ! ")
Exit
EndSwitch
Case $GuiStick
Switch $msg[0]
Case $bn_Return
GUISetState(@SW_SHOW, $GUI)
GUISetState(@SW_HIDE, $GuiStick)
Case $GUI_EVENT_CLOSE
GUISetState(@SW_SHOW, $GUI)
GUISetState(@SW_HIDE, $GuiStick)
EndSwitch
EndSwitch
WEnd
; die Funktion _infoLW()
Func _infoLW()
; Quelle
$VOL_Quelle = _drive($src_LW)
$iProg2 = ($VOL_Quelle[0] / 100) * 284
GUICtrlSetPos($ctrlProgress2, 8, 45, $iProg2, 15)
GUICtrlSetData($tb_src_Prozent, "Free: " & 100 - $VOL_Quelle[0] & "%")
GUICtrlSetData($tb_src_Total, "Total: " & $VOL_Quelle[3] & " MB")
GUICtrlSetData($tb_src_Free, "Free: " & $VOL_Quelle[2] & " MB")
GUICtrlSetData($tb_src_Belegt, "Full: " & $VOL_Quelle[4] & " MB")
; Ziel
$VOL_Ziel = _drive($dest_LW)
$iProg1 = ($VOL_Ziel[0] / 100) * 200
GUICtrlSetPos($ctrlProgress1, 78, 67, $iProg1, 15)
GUICtrlSetData($tb_Ziel, "(" & $VOL_Ziel[1] & ")" & " = " & $VOL_Ziel[2] & " MB = " & 100 - $VOL_Ziel[0] & "% free ")
EndFunc ;==>_infoLW
; die Funktion _drive()
Func _drive($LW)
Local $aDrive[5]
$aDrive[1] = $LW
$TOTAL = DriveSpaceTotal($LW)
$FREE = DriveSpaceFree($LW)
$aDrive[2] = _StringAddThousandsSep(StringReplace(Round($FREE, 0), '.', ','), ".", ",")
$aDrive[0] = _StringAddThousandsSep(StringReplace(Round(($TOTAL - $FREE) / ($TOTAL / 100), 0), ".", ","), ".", ",")
$aDrive[3] = _StringAddThousandsSep(StringReplace(Round($TOTAL, 0), '.', ','), ".", ",")
$aDrive[4] = _StringAddThousandsSep(StringReplace(Round($TOTAL - $FREE, 0), '.', ','), ".", ",")
; ^ genauer als $VOL_Quelle[3] - $VOL_Quelle[2]
Return $aDrive
EndFunc ;==>_drive
; die Funktion _Log_Write()
Func _Log_Write()
$logfile = FileOpen("TheStick.log", 2) ;2 = Schreibmodus mit Löschen des vorherigen Inhaltes
If $logfile = -1 Then
MsgBox(262144 + 48, "Error", " Die Datei " & @ScriptDir & "/TheStick.log" & @CRLF & " konnte nicht gefunden werden.", 9)
;Exit
EndIf
FileWriteLine($logfile, @MDAY & "." & @MON & "." & @YEAR & " um " & @HOUR & ":" & @MIN & ":" & @SEC & " Uhr ")
FileClose($logfile)
EndFunc ;==>_Log_Write
; die Funktion _About()
Func _About()
$logfile = FileOpen("TheStick.log", 0) ; 0 = nur Lesemodus (read mode)
If $logfile = -1 Then
MsgBox(262144 + 48, "Error", " Die Datei " & @ScriptDir & "TheStick.log" & @CRLF & " konnte nicht gefunden werden. Diese Datei wird erstmals nach der ersten Sicherung erstellt ! ")
Exit
EndIf
$line = FileReadLine($logfile)
MsgBox(262144 + 64, 'About', $title & $build & @CRLF & '' & @CRLF & 'Copyright: 2010 by Ritzelrocker04 ' & @CRLF & 'Thx an das http://www.Autoit.de - Team ' & @CRLF & '' & @CRLF & 'Die letzte Sicherung war am : ' & @CRLF & $line)
FileClose($logfile)
EndFunc ;==>_About
Func _StringAddThousandsSep($SSTRING, $STHOUSANDS = ",", $SDECIMAL = ".")
Local $SRESULT = ""
Local $ANUMBER = StringRegExp($SSTRING, "(\d+)\D?(\d*)", 1)
If UBound($ANUMBER) = 2 Then
Local $SLEFT = $ANUMBER[0]
While StringLen($SLEFT)
$SRESULT = $STHOUSANDS & StringRight($SLEFT, 3) & $SRESULT
$SLEFT = StringTrimRight($SLEFT, 3)
WEnd
$SRESULT = StringTrimLeft($SRESULT, 1)
If $ANUMBER[1] <> "" Then $SRESULT &= $SDECIMAL & $ANUMBER[1]
EndIf
Return $SRESULT
EndFunc ;ehemals aus AutoIt ==>_StringAddThousandsSep
Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
If ($hWnd = $GUI) And ($iMsg = $WM_NCHITTEST) Or ($hWnd = $GuiStick) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
EndFunc ;==>WM_NCHITTEST
; Ende
Den kompletten Download findet Ihr auf meiner AutoIt-Skriptsammlung!
Viel Spaß mit "The Stick" !
Die aktuelle Version hier:
Hi,
im Grunde gibt es an den Ausführungen der Vorrednern nichts auszusetzen. Am besten mache Er sich selbst ein eigenes Bild. Was will Er und wofür ?
Anbei ein paar Hinweise, wie Andere AutoIT sehen.
Hier mal eine Übersetzung der Beschreibung auf der offiziellen Auto IT-Website:
AutoIT v3 ist eine kostenlose, BASIC-ähnliche Scriptsprache. Sie wurde designed für die Automatisierung der Windows-Oberfläche und für allgemeines Programmieren. AutoIT nutzt eine Kombination aus simulierten Tastatureingaben, Maus Bewegungen und Window/Control Manipulationen um Abläufe zu automatisieren, wie es auf diese Weise mit keiner anderen Sprache möglich ist. Zudem ist die Sprache sehr klein und unterstützt Windows 95, 98, ME, NT4, 2000, XP, 2003 und Vista. Sie benötigt außerdem KEINE Runtime um auf Systemen ausgeführt zu werden.
AutoIT war anfangs designed für große PC-Rollouts, um tausende von PC's zu konfigurieren. Durch die Version v3 von AutoIT wurde es zu einer starken Sprache die die meisten, nötigen Befehle und Funktionen beherrscht.
Auto IT Features:
1. Bietet eine einfache Skriptsprache für alle Windows-Versionen
2. Simulieren von Tastatureingaben
3. Simulieren von Maus-Bewegungen und Klicks
4. Bewegen, Größe ändern und manipulieren von Fenstern
5. Direktes interagieren mit Controls eines Fensters (setzen/auslesen von text aus Edit-Controls, Check-Boxen, Radio-Buttons, usw.)
6. Erstellung komplexer grafischer Benutzerschnittstellen (GUIs)
7. Arbeiten mit der Zwischenablage, um Text auszuschneiden oder zu kopieren
8. Bietet eine skriptbare RunAs-Funktion für Windows 2000/XP/2003/Vista
Pro und Contra:
+ Kostenlos
+ Einfach zu erlernen, da...
+ BASIC-orientierte Skriptsprache
+ Bodenständige Usercommunity (= Schneller, hochwertiger Support)
+ Spezialisiert für Windows-Plattformen
+ Für PC-Rollouts und Automatisierung prädestiniert
- Funktionalität nur für Windows gegeben
- Begrenzungen für Dateitypen / Funktionen
- Nicht Multithreading-fähig
- Kein Objektorientierter Syntax
(Quelle: https://autoit.de/www.weilichskann.de)
Ein Gesundes Neues und weiterhin viel Erfolg !
Man liest sich...
Euer Ritzelrocker04
Hi qon,
keine schlechte Idee diese Funktion. Auf jeden Fall bemerkenswert !
RunWait(@ComSpec & ' /c ' & "7za.exe a -tzip " & "E:\$Backup$\$EigeneDateien$\EigeneDateien-0" & @WDAY & ".zip " & '"C:\Dokumente und Einstellungen\XP-Home\Eigene Dateien"',@ScriptDir ,@SW_MINIMIZE)
Guten Rutsch und weiterhin
viel Erfolg !
Man liest sich...
Euer Ritzelrocker04
Hi Pinguin,
dann versuche Er mal die Optionen zu ändern und anschließend auf „Ok+Neustart“ klicken.
Schöne Feiertage und herzlich Willkommen
sowie weiterhin viel Erfolg !
Man liest sich...
Euer Ritzelrocker04