Beiträge von BugFix

Ich habe hier etwas gefunden. Allerdings funktioniert es bei meinem Laptop nicht.

Und schon wieder Bot.
Bitte Forenregeln beachten und auch die AGB des Spiels lesen:

Zitat von Auszug AGB

§ 13 Es ist verboten jegliche Seiten von Freewar mit anderen Programmen außer dem Browser abzurufen. Dies bezieht sich insbesondere auf sogenannte Bots oder auch andere Tools die das Webinterface ersetzen oder ändern sollen. Eine Ausnahme gilt für Tools, die von einem Admin bestätigt und dann der Allgemeinheit zur Verfügung gestellt wurden.

§ 14 Programme, die Zugriffe automatisieren, die Spieloberfläche verändern oder übermäßig viele Zugriffe generieren, sind auf allen Seiten von Freewar verboten.

Da du intern mit GUIGetMsg( ) arbeitest, solltest du in deine Funktion noch einfügen:

$oldOpt = Opt('GUIOnEventMode', 0)
;..
;..
; und am Ende:
Opt('GUIOnEventMode', $oldOpt)

Auf soviel Dreistigkeit stößt man selten!
Aber wenn du nach einer Verwarnung schreist, bekommst du sie auch. Und dazu gibts gratis einen Platz auf der Blacklist für supportunwürdige User.

Einige werden sich vielleicht erinnern, ich hatte euch mal zum Spielen von Carom3D animiert (ein super Billard Spiel).
Neben der Onlinevariante über einen Server mit Punktegewinn und -verlust beim Spiel läßt sich das auch über LAN spielen. Wäre somit auch ein Kandidat. Ist ein gratis Spiel.

Zitat von kleiner27

Nachtrag: Druckbar solles am ende auch werden = zu verteilen an die mitarbeiter o. zu aushängen am büro!!

Wenn du es öffentlich aushängst, dürfen keine Auswertungen enthalten sein. Datenschutz! Würde sowieso vorher den DS-Beauftragten das absegnen lassen.

Zitat von kleiner27

Hallo leute kein Feedback von eich?

Dein Projekt ist eine ganz spezifische Lösung zu einem spezifischen Problem. Da liegt es in der Natur der Dinge, dass nicht allzu viel Leute damit etwas anfangen können.

Zitat von MatthiasG.

Ich fände es schön, wenn Organize-Includes auch vor dem Kompilieren ausgeführt werden könnte...

Ich führe es ausschließlich vor dem Kompilieren aus, dadrin liegt ja der Sinn, zu sehen, welche Includes ich zum Ausführen des Skriptes noch benötige. Wüßte auch gar nicht, wie man das nach dem Kompilieren anwenden sollte. Oder was meinst du genau?

Sollte so gehen:

$oldLetter = 'D:'
$newLetter = 'Q:'

$strComputer = "."
$objWMIService = ObjGet("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & $strComputer & "\root\cimv2")

$colVolumes = $objWMIService.ExecQuery _
("Select * from Win32_Volume Where Name = '" & $oldLetter & "\\'")

For $objVolume In $colVolumes
$objVolume.DriveLetter = $newLetter
$objVolume.Put_
Next

Zitat von H1tsugaya

Je mehr Datein desti mehr Tabs.

Bevor ich mir das im Detail anschaue eine Anmerkung.
Das Konzept ist unglücklich gewählt. Für eine dynamische Anzahl von Dateien Tabs zu erstellen wird sehr unübersichtlich.
Ich schlage dir vor, verwende lieber ein Listview mit Checkbox. (Checkbox nicht zwingend, kannst auch Klick auf Eintrag auswerten)
- alle Dateinamen in Listview laden
- wenn du eine Checkbox aktivierst (auf Eintrag klickst) wird die Datei zur Bearbeitung geladen
- die Checkbox anschließend disablen, damit keine Doppelbearbeitung möglich ist (alternativ: Datei nach Bearbeitung aus dem Listview entfernen)
- zur Bearbeitung der einzelnen Files kannst du wiederum mit einem Listview arbeiten
- dort setzt du die ersten Teile des Splits als Einträge
- klickst du auf einen dieser Einträge, kannst du den zugehörigen Part z.B. in einem Edit od. einer MsgBox od. was auch immer anzeigen lassen

Zitat von Aquaplant

Das geht leider nicht. Manchmal ist bei dem Programm noch ein Fehler, dann benutze ich

Da baust du dir selbst einen Stolperstein ein. Was veranlasst dich, bei einem Fehler die gesamte Sektion zu löschen? Es reicht doch völlig den betreffenden Key zu kicken, bzw. noch besser: erst in die INI zu schreiben, wenn KEIN Fehler vorliegt. Du solltest also dein Konzept umstellen. Das ist besser als einer unklaren Voraussetzung das Programm anpassen zu wollen.

funkey: Ich hab die gleichen Werte wie du, entspricht auch meinem WLAN-Durchsatz.
Also ist nun klar:
- Erreichbarkeit wird auf die übergebene Adresse getestet
- Datendurchsatz bezieht sich ausschließlich auf den Netzwerkadapter

Dabei war die Funktionsbeschreibung eindeutig anders:

Zitat

Determines if the specified destination can be reached and provides Quality of Connection (QOC) information for the destination.

Danke fürs Testen.

Sorry, aber mit deiner Erklärung kann ich leider nicht viel anfangen. Versuche mal, die Aufgabenstellung Schritt für Schritt darzustellen.
- Situation vor Start (wie sieht der Text aus)
- Schritt 1 (was hat/soll sich wie verändern)
- Schritt 2..n (dito)
- wie soll das Endergebnis aussehen

http://www.youtube.com/watch?v=FegJ-RJTa04
Übrigens: Guter Suchbegriff ist Bundestagswahl 1976

Laut Funktionsbeschreibung wird die maximale Datenrate für Incoming (Download) und Outgoing (Upload) zum angegebenen Host ermittelt. Der Wert wird in b/s angegeben, deshalb noch meine Umrechnung auf Kb/s.
Ich brauch es nicht zwingend, da ich aber über die Funktion gestolpert bin, dachte ich, dass es ganz praktisch wär.

Zitat von chip

so dass es an einer bestimmte Position in der GUI angezeigt wird.

Geht es dir nur darum, das Fenster an einer bestimmten Position zuhaben? - Dann verschiebe es einfach mit WinMove().

Zitat von ojo

P.S:If IsArray($ret) Then
sollte wohl
If IsArray($aRet) Then
sein?!?

Ähh,.. ja klar. Hatte es geändert, aber nicht überall.

Da ihr auch so bekloppte Werte erhaltet, kann man wohl davon ausgehen, dass die Funktion nicht tut, was sie soll. Auch wenn man aus der Struktur das dwFlag abfragt kommt seltsamerweise '0' raus. Das ist auch völlig daneben. Hier sollte für LAN = 1 oder für WAN = 2 rauskommen.
Na gut, dann kann man das wohl nicht verwerten - schade.

Das Problem ist i.d.R. nicht Windows, sondern das USB-Gerät. Die Initialisierung funktioniert bei vielen Geräten ausschließlich, wenn sie an ein 'alive' System angedockt werden.

Du kannst ja mal versuchen, ob dir das Manage USB-Drives per devcon.exe weiter hilft. Aber beachten: damit nimmst du die USB-Verwaltung in die eigene Hand. Wenn du zwischendurch doch über die Windowsverwaltung (Taskleiste-USB-Device) abkoppelst, kann das zu Irritationen führen. Ist zwar nach einem Neustart erledigt, aber unschön.

Verstehe den Aufwand nicht. Du möchtest doch jeweils nur protokollmäßig eine neue Zeile ins Edit schreiben?
Soll dann also etwa so werden:

...starte Installation Adobe Reader
Installation Reader OK
...starte Installation FireFox
Installation FireFox OK
usw.

Dann schau dir mal _GUICtrlEdit_AppendText($hWnd, $sText) an.

Hallo,
ich wollte mit IsDestinationReachable die Verbindungsgeschwindigkeiten (In/Out) zu Url's ermitteln, aber da die Funktion aberwitzige Werte ausgibt, gehe ich davon aus, dass dieser Part der Funktion fehlschlägt. Die Überprüfung auf Erreichbarkeit dagegen funktioniert.
Ist das bei Euch ebenso?

If IsDestinationReachable('www.autoit.de') Then ; AutoIt erreichbar?
MsgBox(0, '', 'Erreichbar')
Else
MsgBox(0, '', 'Nicht Erreichbar')
EndIf

$aRet = IsDestinationReachable('www.autoit.de', 1)
If IsArray($aRet) Then MsgBox(0, 'Erreichbar mit Speed:', _
'InSpeed: ' & $aRet[0] & ' Kb/s' & @CRLF & _
'OutSpeed: ' & $aRet[1] & ' Kb/s' & @CRLF)

#cs - bei mir für alle Adressen:
InSpeed: 52734.4 Kb/s
OutSpeed: 52734.4 Kb/s
#ce

Func IsDestinationReachable($sDestination, $fSpeed=0) ; destination can be an IP address, a UNC name, or an URL
Local $tQOCINFO = DllStructCreate('long dwSize;long dwFlags;long dwInSpeed;long dwOutSpeed') ; dwIn/OutSpeed in bytes/second
DllStructSetData($tQOCINFO, 'dwSize', DllStructGetSize($tQOCINFO))
Local $ret = DllCall("SENSAPI.DLL", "long", "IsDestinationReachableA", _
"str", $sDestination, _
"ptr", DllStructGetPtr($tQOCINFO))
Select
Case @error
Return SetError(@error,0,0)
Case $ret[0] = 0 ; Destination nicht erreichbar
Return 0
Case Else ; Destination erreichbar
If $fSpeed Then
Local $aOut[2] = [Round(DllStructGetData($tQOCINFO, 'dwInSpeed')/1024, 1), _
Round(DllStructGetData($tQOCINFO, 'dwOutSpeed')/1024, 1)]
Return $aOut ; speed in Kb/s
Else
Return 1
EndIf
EndSelect
EndFunc

Ich will dir nicht den Mut nehmen, aber ich habs auch mal getestet: mIRC läßt sich nicht vernünftig automatisieren.
Da ist es wesentlich einfacher über eine eigene IRC-Schnittstelle einzugreifen.
Schau es dir mal an: Basis-Client für IRC-Chat