Hallo
Du kannst z.B. für alle dateitypen mit *.rsdf ein gleiches Icon machen. Einfach mal googln.
Zu 2.: FileOpenDialog ( "title", "", "RSDF Dateien (*.rsdf)|HTML Dateien (*.html;htm)|Alle Dateien (*.*)")
Steht auch in der Hilfe...
Mfg Spider
Hallo
Du kannst z.B. für alle dateitypen mit *.rsdf ein gleiches Icon machen. Einfach mal googln.
Zu 2.: FileOpenDialog ( "title", "", "RSDF Dateien (*.rsdf)|HTML Dateien (*.html;htm)|Alle Dateien (*.*)")
Steht auch in der Hilfe...
Mfg Spider
Hallo
Neben den meisten Links bei Google steht "Im Chache". Klick mal darauf:
[Blockierte Grafik: http://img-up.net/thumbs/Unbenannt-6bo5XvPt.jpg]
Mfg Spider
Hallo
Hier ist es wirklich seine Sache wenn er etwas nicht Legales (warum schreib ich eig nich Illegales? oO) macht. Ich hab ihm nur gesagt wie man String in Hex umwandelt^^
Mfg Spider
Hallo
Die Zahlen könnten alles mögliche sein.
Wenn es einfach nur unverschlüsselte HEX daten sind dann müsste es so gehen:
#include <GUIConstants.au3>
#include <string.au3>
$Form1 = GUICreate("RSDF Encrypter", 520, 308, 193, 125)
$Button1 = GUICtrlCreateButton("RSDF File Erstellen", 16, 272, 107, 25, 0)
$Button2 = GUICtrlCreateButton("Link Liste Löschen", 200, 272, 107, 25, 0)
$Button3 = GUICtrlCreateButton("Programm beenden", 384, 272, 115, 25, 0)
$Group1 = GUICtrlCreateGroup("Deine Links", 8, 8, 497, 249)
$Edit1 = GUICtrlCreateEdit("", 16, 24, 481, 225)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
$FileSave = FileSaveDialog ( "RSDF Erstellen", @DesktopDir , "RSDF File (*.rsdf)" );@DesktopDir ohne anführungszeichen ( " )
If StringRight($FileSave,5) <> ".rsdf" Then $FileSave &= ".rsdf";Wenn hinten kein rsdf stehen, hintenrann ein .rsdf machen
FileWrite($FileSave,_StringToHex(GUICtrlRead($Edit1)));Schreibt den inhalt von Edit1
Case $Button2
GUICtrlSetData($Edit1,'');Löscht den inhalt von edit1..
Case $Button3
Exit
EndSwitch
WEnd
Mfg Spider
Hallo
Hilfe hilft. [Blockierte Grafik: http://smileys.sur-la-toile.com/repository/Messages/rtfm2.gif]
#include <GUIConstants.au3>
$Form1 = GUICreate("RSDF Encrypter", 520, 308, 193, 125)
$Button1 = GUICtrlCreateButton("RSDF File Erstellen", 16, 272, 107, 25, 0)
$Button2 = GUICtrlCreateButton("Link Liste Löschen", 200, 272, 107, 25, 0)
$Button3 = GUICtrlCreateButton("Programm beenden", 384, 272, 115, 25, 0)
$Group1 = GUICtrlCreateGroup("Deine Links", 8, 8, 497, 249)
$Edit1 = GUICtrlCreateEdit("", 16, 24, 481, 225)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
$FileSave = FileSaveDialog ( "RSDF Erstellen", @DesktopDir , "RSDF File (*.rsdf)" );@DesktopDir ohne anführungszeichen ( " )
If StringRight($FileSave,5) <> ".rsdf" Then $FileSave &= ".rsdf";Wenn hinten kein rsdf stehen, hintenrann ein .rsdf machen
FileWrite($FileSave,GUICtrlRead($Edit1));Schreibt den inhalt von Edit1
Case $Button2
GUICtrlSetData($Edit1,'');Löscht den inhalt von edit1..
Case $Button3
Exit
EndSwitch
WEnd
Mfg Spider
Hallo
Argh - Ein Edit pusht das Thema auch...
@Thema: Kann sein, dass das Programm "ehshell.exe" mehr als ein mal gestartet wird.
Probier das mal aus:
HotKeySet("^+e", "ende")
[/autoit] [autoit][/autoit] [autoit]RunWait("C:\companie of heroes opposing fronts\RelicCOH.exe -relaunchmce")
[/autoit] [autoit][/autoit] [autoit]While 1
If ProcessExists("ehshell.exe") Then
While ProcessExists("ehshell.exe")
ProcessClose("ehshell.exe")
WEnd
Exit
EndIf
Sleep(100)
WEnd
;-----------------------------------------------------------Func
Func ende () ;
MsgBox(0, "", "Programm beendet")
Exit
EndFunc ;==>ende
Mfg Spider
Hallo
Einzigste Möglichkeit wie es annähernd legal bleibt: Man brauch eine Windows XP CD um das Script zu starten. Das Script holt sich dann alle Daten von der XP CD wie z.B. Windows-unattended es auch macht.
Und dann natürlich nur Freeware Programme benutzen, oder wenn schon sowas wie Nero oder so, dann den Benutzer nach einer Seriennummer fragen.
Naja. Ich wünsche euch viel Spaß und Geduld (die ihr brauchen werdet..) dabei ein Windows Installer selbst nachzuprogrammieren^^
Mfg Spider
Hallo
Sieht gut aus, BugFix. Interessant wie AutoIt arbeitet, komm lass uns ein eigenes AutoIt machen mit AutoIt^^
Interessant ist aber auch das die AutoIt Funktionen mehr auf der Festplatte machen als die Funktionen von FSObj.. Also mehr Schreibzugriffe macht AutoIt.
Ich sehe es schon kommen: BugFix: King Of Array and Objects
Mfg Spider
Hallo
Funktioniert dass?:
GUICreate("",100,40)
GUISetBkColor(0xffff00) ;Setzt Hintergrund von der GUI
$Button = GUICtrlCreateButton("TestButton",10,10,80,20)
GUICtrlSetBkColor(-1,0xff0000);Setzt Hintergrundfarbe von dem Button (0xff0000 = Rot)
GUICtrlSetColor(-1,0x00ffff);Setzt Vordergrundfarbe von dem Button (0x00ffff = Türkies)
GUISetState();Zeige die GUI, am besten immer erst NACH dem erstellen der GuiControls setzen. (@SW_SHOW ist der Standartwert, desswegen reicht auch GuiSetState(), ist das gleiche wie GuiSetState(@SW_SHOW))
While 1
If GUIGetMsg() = -3 Then Exit ; Wenn GuiGetMsg() gleich $GUI_EVENT_CLOSE (-3) Dann Beende Skript
WEnd
Mfg Spider
Hallo
Naja, aber Capatchas haben ja einen Sinn. Nämlich hauptsächlich den, dass man es eben nicht Automatisiert. Ich glaube das Serienjunkies da nicht allzu Streng ist, aber bei Rapidshare wird es dann doch schon etwas brenzlicher. Ich meine wenn schon ein Administrator von ner kleinen Seite die SMS versendet kommt, wie sieht es denn erst bei Rapidshare aus?
Mfg Spider
Hallo
Ich will nur mal daran erinnern, dass Capatchas zu automatisieren illegal ist.
Aber warum machst du es nicht einfach mit _IECreate und dann mit _IEBodyReadHTML?
Mfg Spider
Hallo
Wie gesagt, noch BETA Ich hab es nur mit IE 6 Ausprobiert, du hast aber 7, richtig?
Hab grad kein Vista hier (Festplatte geschrottet :/) kannst du mir bitte sagen was hier bei dir in der MsgBox steht?:
[autoit]#include <IE.au3>
$aVersion = _IE_VersionInfo ()
MsgBox(0, "", $aVersion[5])
Mfg Spider
Hallo
Welches OS hast du? XP?
Mfg Spider
Hallo
Jo, RouterControl hab ich früher auch benutzt ging aber jedes 2te mal nicht Ausserdem ist es einfach praktischer wenn ich bei meiner G15 einfach nur auf G11 drücke und er dann Automatisch mein Router Wiederverbindet..
Mfg Spider
Hallo
Bei Multichat server sieht es nochmal etwas anders aus mit dem TCP. Als erstes musst du in der Funktion die "MaxPendingConnection" eingeben. Max Pending Connection ist die Anzahl der Clients die auf den Server verbinden können. (Siehe Hilfe)
Dazu kommt das du TCPAccept nicht einfach als eine Variable Declarieren kannst sondern da brauchst du ein Array, weil es ja mehr als 1 "ConnectedSocket" gibt.
HIER gibt es ein Beispiel im englischen Forum und HIER hab ich auch mal ein etwas Komplexeren Multichat mit peethebee's RSA Verschlüsselung Programmiert.
Hoffe das hilft
Mfg Spider
Hallo
Beim ersten start (und ausschließlich da) musst du deine Kontaktdaten eingeben. Dann Reconnected er! Wenn du ihn danach nochmal startest Reconnectet er Automatisch, ohne das du auf Weiter oder so klicken musst.
Mfg Spider
Hallo
@sigma: du musst die Daten nur einmal eingeben, dann werden sie teils verschlüsselt in die Registry geschrieben und er fragt dich nicht bei jeden programmstart!
teh_hahn: Ja, hatte ich zuerst auch ohne GUI. Wollt es hier aber nicht ohne GUI reinstellen
Mfg Spider
Hallo
Capatcha Code, ich sag nur SMS Sender
Für alle nicht eingeweihten: Versucht es erst garnicht. es ist Illegal, den Capatcha Code (Die buchstaben in dem Bild die man selbst nochmal eingeben muss) zu Automatisieren und darüber hinaus mit AutoIt auch nahezu unmöglich.
Mfg Spider
Hallo
peethebee : Ich weiß und normalerweise achte ich auch peinlichst genau drauf, aber du weißt ja, Zeit ist Geld und Geld regiert die Welt^^
Also werde nie wider "wider" ohne e schreiben wenn es mit e gehört
BugFix : Naja.. ich würde nicht von mir behaupten das ich 100% weiß.. Diese Prozentzahl war auch nicht auf meinem Momentanen Wissensstand ( > als 0, sondern jetzt 0,003% ) gerichtet, sondern auf das 100%ige Wissen (macht der Satz Sinn?)
Mfg Spider
Hallo
Wie meinst du das? Ich find sowas wichtig^^ Schade nur das es bisher nimand gedownloadet hat, haben anscheinend doch nicht so viele netgearrouter zuhause wie ich gedacht habe
Mfg Spider
Edit: 5 Minuten im Englischen Forum, und schon 25 Downloads =)