Schau mal hier rein. Vieleicht hilft's dir ja.
https://autoit.de/index.php?page=Thread&postID=193554
Beiträge von i2c
-
-
Tut's das für dich?
Spoiler anzeigen
[autoit]#Region - Timestamp
[/autoit]
;2011-07-05 12:22:54
#EndRegion - Timestamp
$szDevicePath = "c:"
$res = DllCall("kernel32.dll", "dword", "QueryDosDeviceW", "wstr", $szDevicePath, "wstr", "", "dword", 250)
If $res[0] Then
Local $szDosDeviceName = $res[2]
ConsoleWrite("DosDeviceName: " & $szDosDeviceName & @CRLF)
EndIf -
Spoiler anzeigen
[autoit]#Region - Timestamp
[/autoit]
;2011-07-05 04:21:09
#EndRegion
Opt("WinTitleMatchMode", 2)
#include <ie.au3>
_IECreate("www.google.de")
Send("Hello world")
Sleep(2000)
WinSetState("Internet Explorer", "", @SW_MINIMIZE)
Sleep(2000)
WinSetState("Internet Explorer", "", @SW_RESTORE)
Sleep(2000)
WinActivate("Internet Explorer")
Du bist vlt. einfach nur zu genau bei der Angabe des Fenstertitels. So geht's bei mir. -
Auch dir nochmal nachträglich alles Gute und viel Glück, Erfolg und Gesundheit Schnuffel.
-
uijuijui ... etwas spät.
Alles Gute nachträglich Blümchen.
Für die nächste Party hab ich dir noch was mitgebracht.
[Blockierte Grafik: http://farm3.static.flickr.com/2088/2193304375_a27ed9b90a.jpg] -
Also - FTP ist echt easy !
Allerdings würde ich das ganze über PHP-Script absichern
FTP über PHP absichern?
Hier steig ich ein und würde gerne mehr erfahren. -
Spoiler anzeigen
[autoit]#region - Timestamp
[/autoit] [autoit][/autoit] [autoit]
;2011-07-04 13:08:58
#endregion - Timestamp#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#region ### START Koda GUI section ### Form=G:\Koda form designer\Forms\Stahlbarren.kxf
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Test Rechner", 633, 165, 193, 125)
$Stahlbarren = GUICtrlCreateButton("Stahlbarren", 40, 56, 193, 33, 0)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Stahlbarren
_stahlbarren()
EndSwitch
WEndFunc _stahlbarren()
[/autoit] [autoit][/autoit] [autoit]
$Anzahl = InputBox("Stahlbarren Herstellung", "Bitte gib hier ein, wieviel Stahlbarren du herstellen möchtest!")
Local $Holzkohle = 5, $Feineseisenerz = 10, $Steinkohle = 20MsgBox(0, "Ergebnisse", _
[/autoit]
'Holzkohle: ' & $Holzkohle * $Anzahl & @CRLF & _
'Feines Eisenerz: ' & $Feineseisenerz * $Anzahl & @CRLF & _
'Steinkohle: ' & $Steinkohle * $Anzahl)
EndFunc ;==>_stahlbarren -
Zum erklären ist's schon etwas spät aber ich kann dir zeigen, wie es geht. Du machst es dir da etwas zu kompliziert
Spoiler anzeigen
[autoit]#Region - Timestamp
[/autoit] [autoit][/autoit] [autoit]
;2011-06-25 02:54:45
#EndRegion - Timestamp#include <String.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <array.au3>
#include<ArrayMore.au3>
Dim $aResult[1][6]
$sFile = FileRead(@ScriptDir & "\test.html")$aTr = _StringBetween($sFile, "<tr>", "</tr>")
[/autoit] [autoit][/autoit] [autoit]For $i = 2 To UBound($aTr) - 1
[/autoit] [autoit][/autoit] [autoit]
$aWunsch = StringRegExp($aTr[$i], "<font.*>(.*?)</font>", 3, 1)
_ArrayDisplay($aWunsch)
If IsArray($aWunsch) Then
_Array2DAdd($aResult, _ArrayToString($aWunsch))
EndIf
Next_ArrayDisplay($aResult)
[/autoit] -
Oben? Ich tippe mal auf RocketDock.
ObjectDock mit diesem Stack Docklet
-
Das Iconpack, das du da im Dock verwendest, würde mich insteressieren (letzter Screen). Sind das die normalen Awoken Icons oder ein komplettes Paket für WIndows?
-
Reicht dir das als kleiner Ansatz?
Spoiler anzeigen
[autoit]#region - Timestamp
[/autoit] [autoit][/autoit] [autoit]
;2011-06-22 22:45:45
#endregion - Timestamp#include <String.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <array.au3>
$sFile = FileRead(@ScriptDir & "\test.html")$aTr = _StringBetween($sFile, "<tr>", "</tr>")
[/autoit] [autoit][/autoit] [autoit]
_ArrayDisplay($aTr)For $i = 2 To UBound($aTr) - 1
[/autoit]
$aWunsch = StringRegExp($aTr[$i], "<font.*>(.*?)</font>", 3, 1)
_ArrayDisplay($aWunsch)
Next
Wenn du alle Zeilen in einem einzigen Array haben willst, kannst du sie mit _Array2DAdd() in der Schleife zusammensetzen. -
Kein Grund gleich den Gong zu schlagen. Du sollst dich ja um Gottes Willen nicht rechtfertigen. Die Sinnhaftigkeit des obfuscaten (Schreibkrampf) sei mal dahingestellt. Wenn du meinst, das es dir was bringt ....
Sollte ja lediglich eine Anregung sein, die dir ermöglichen würde, den von XovoxKingdom vorgeschlagenen Weg zu gehen.
-
Ich habe auch schon an diese Methode gedacht mit Call, aber der Obfuscator verträgt sich mit dem Befehl ja nicht...
Dann würde ich darüber nachdenken, auf diesen unglaublich sinnlosen Vorgang zu verzichten.
Warum auf ein Sprachfeature verzichten nur um einen Schutz zu geniessen, der garkeiner ist? -
Welche Animation i2c wohl macht ???
Nichts aufwändiges. Hab noch mit den Nachwirkungen des gestrigen Abends zu kämpfen. :wacko:Externer Inhalt www.youtube.comInhalte von externen Seiten werden ohne deine Zustimmung nicht automatisch geladen und angezeigt.Durch die Aktivierung der externen Inhalte erklärst du dich damit einverstanden, dass personenbezogene Daten an Drittplattformen übermittelt werden. Mehr Informationen dazu haben wir in unserer Datenschutzerklärung zur Verfügung gestellt. -
Gib bitte nicht zu viele Informationen preis.
Wie/womit verschlüsselst du? Code? -
Ich habe zwar in der datei etwas zu stehen,...
Darf man fragen, was in der INI steht? Allein der Text für die Buttons oder noch weitere Informationen? Ich seh grad den Sinn der INI nicht. -
Wenn du ein Array in einer FOR-Schleife durchläufst und dabei ein Element löschst, dann musst du das Array rückwärts durchlaufen. nsonsten stimmt der von UBound() ermittelte Wert nicht mehr und das Skript bricht ab.
Spoiler anzeigen
[autoit]#Region - Timestamp
[/autoit] [autoit][/autoit] [autoit]
;2011-06-17 16:54:00
#EndRegion - Timestamp
#include <String.au3>
#include <Array.au3>$sc = '-ljh+hg.-'
[/autoit]
$newsc = _DeleteSonder($sc)
MsgBox(0,0,$newsc)
Func _DeleteSonder($string)
$string = _StringExplode($string, "")
_ArrayDisplay($string)
For $i = UBound($string) - 1 To 0 Step -1
$strisal = StringIsAlpha($string[$i])
ConsoleWrite($i & @CRLF)
If $strisal = 0 Then
_ArrayDelete($string, $i)
EndIf
Next
$retStr = _ArrayToString($string, "", 0, UBound($string))
Return $retStr
EndFunc ;==>_DeleteSonder -
Externer Inhalt www.youtube.comInhalte von externen Seiten werden ohne deine Zustimmung nicht automatisch geladen und angezeigt.Durch die Aktivierung der externen Inhalte erklärst du dich damit einverstanden, dass personenbezogene Daten an Drittplattformen übermittelt werden. Mehr Informationen dazu haben wir in unserer Datenschutzerklärung zur Verfügung gestellt.
-
[autoit]
_GUICtrlRichEdit_GetSel()
[/autoit]
Wenn beide Werte im Array gleich sind, ist kein Text markiert und die Werte entsprechen der aktuellen Cursorposition. -
ungetestet
[autoit]#region - Timestamp
[/autoit] [autoit][/autoit] [autoit]
;2011-06-16 02:19:45
#endregion - Timestamp#include <inet.au3>
[/autoit] [autoit][/autoit] [autoit]$delay = 5000
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit]
$oldSource = InetRead("http://autoit.de/index.php", 1)
$timer = TimerInit()
If TimerDiff($timer) >= $delay Then
$newSource = InetRead("http://autoit.de/index.php", 1)
If $newSource <> $oldSource Then
MsgBox(0, 0, "Da hat sich was verändert")
$oldSource = $newSource
Else
ContinueLoop
EndIf
EndIf
WEnd
Über irgendeine festgelegte Dateigrösse zu gehen halte ich auch für unpassend. Zumal du ja nur in eine Richtung prüfst. Die Datei könnte ja aber auch kleiner werden ;).