Hi,
6...setzen....
Ausgabe: 0.
schau dir mal an, was ein DllCall() zurückgibt... 
Das allereinfachste Debuggingwerkzeug in Autoit besteht aus der Tastenkombination ALT+d
Wenn man sich angewöht, damit die Variablen zu checken, fallen 90% aller Fehler auf!
Weiterhin finde ich weder mit IDA noch mit Raptor´s Werkzeug in einer deiner Dll´s die Funktion....
Hi,
sowohl Tool und Methode funktionieren noch einwandfrei...jedenfalls bei mir.
hi,
gut zu wissen allerdings habe ich mit "$CMDLINE[]" noch nie gearbeitet und weiß auch nicht wie das geht
If $cmdline[0] = 0 Then;keine Dateien ausgewählt
$dateien="Es wurden keine Dateien markiert!"
Else
$dateien = ""
For $i = 1 To $cmdline[0]
$dateien &= $cmdline[$i] & @CRLF;alle ausgewählten Dateien anzeigen
Next
EndIf
MsgBox(0, "cmdline[] test", $dateien)
Script zu einer EXE compilieren und diese EXE in das Verzeichnis "Send To" kopieren.
Im Explorer einige Dateien markieren und im Kontextmenü bei "Senden an" die EXE auswählen.
Hi,
eine weitere Möglichkeit wäre, dein Programm in den "Send to" Ordner zu legen, es erscheint dann automatisch als Ziel im Kontextmenü unter "Senden an..."
Das macht vor allem bei Dateioperationen Sinn, da man die so übergebenen Dateien einfach im AutoItscript per
$CMDLINE[]
[/autoit]auswerten kann.
Auf diese Art könne aber nur bis zu 63 Dateien gleichzeitig übergeben werden (Win32).
Glücklichen Herzwunsch und alles Gute!
Und immer schön entspannt bleiben.... 
Glücklichen Herzwunsch und alles Gute an Xenobiologist und die rosa Schachmuschi 
Haut rein und lasst es richtig krachen!
1 guter Post in einem alten Thread ist übrigens besser als 5 unnötige, die man eh ignorieren kann ...
fullack....
So finden sich auch komprimiert in wenigen Threads die Lösungen zu Problemen und (imho viel wichtiger) die cracks und Spezialisten zu einem bestimmten Thema posten dort.
Im gefühlten 300 Millionsten "Quiiiieeekkk, meine selbstgebastelten Client/Server-Scripte funktionieren nicht"-Thread postet kaum jemand mit Know-How.
Wozu auch, das meiste an Infos wird sowieso ignoriert! Wer zu faul/blöd/unfähig zum Suchen ist, dem ist auch alles an Hintergrundwissen egal, der möchte eben nur schnell seinen Arm aus der Sonne gelegt bekommen
Zitat von Alina"Spaß mit Kurven"?
Ich dachte schon, ihr denkt da an was ganz anderes.
Echte Männer denken da nur an eins....
....an eine Carrerabahn 
Hi,
ein Geschwindigkeitsvergleich zwischen einzelnen Programmiersprachen ist imho nicht verkehrt.
Allerdings sollte man dabei darauf achten, dass im inner loop auch Funktionen verwendet werden, bei denen man nicht davon ausgehen kann, dass die neueren Compiler sie einfach wegoptimieren.
Wie im vorliegenden Beispiel könnte ich darauf wetten, dass zumindest die Java und C++ - Compiler das Programm analysieren und für den Programmablauf nicht benötigte Teile einfach weglassen...
Daher sollte man dem inner loop etwas zu tun geben. Mathematische Funktionen, Stringfunktionen, Grafik-Gedöns und bissl Speichergeschiebe hätten das Programm 5 Zeilen länger, aber dafür die Ergebnisse wenigstens in diesem Bereich vergleichbar gemacht.
Und dann sieht auch AutoIt plötzlich garnicht mehr so langsam aus!
Sobald nämlich "Standard"-Funktionen (WinAPI) aufgerufen werden, ist deren Laufzeit in allen Sprachen identisch!
Darum macht nur eine Geschwindigkeitstest sinn, wie schnell kommen ich in welche Sprache zur Lösung meines Problems und ob die Berechnung 1000ms oder 30ms dauert, spielt keine Rolle, soweit ich es 10x Tag brauche
Genau darauf kommts an...
Wenn ich erst mal Minuten für den Start eines Compilers und später dann wieder Minuten für (Test)-Compilerläufe verbrate um dann ein Tool zu haben, bei dem es nicht darauf ankommt, ob es 30, 300 oder 1000ms braucht, dann wähle ich natürlich die für mich einfachste (Script)- Sprache!
Wenn man neu im Forum ist, werden die Threads ja noch moderiert.
Generell ist es auch so, dass diese neuen User die "Leichenschänder" sind, über die wir gerade reden.
Ja, genau DAS ist ja das Problem.
Ein neuer User bzw. ein AutoIt-Anfänger durchsucht natürlich die Foren nach allen möglichen Lösungen zu seinem Problem.
Und da etliche Themen bereits abgehandelt sind, findet er natürlicherweise auch ältere Threads.
Mit welchem Grund sollte jetzt ein posten in diese Threads nicht erlaubt sein?
Gerade dem, der die Hilfe am nötigsten braucht, bleibt sie verwehrt?!
Die Alternative für diese User ist dann, einen neuen Thread zu eröffnen, in dem dann "nutz die SuFu" u.ä. in den ersten 5 Antworten stehen....
DAS fände ich wiederum kontraproduktiv.
Weiterhin hat das Leichenschänden den netten Nebeneffekt, dass einige " Probleme" mit neueren AutoItversionen besser oder einfacher zu lösen sind. Da nutzt es allen Beteiligten, wenn am Ende eines solchen Threads steht, wie die Lösung mit einer modernen AutoIt-Version aussehen könnte!
Mir jedenfalls ist ein Forum lieber, in dem die Anzahl der Threads zu einem Thema so klein wie möglich bleibt. Da findet man dann auch die relevanten Antworten. Ich wette, es geht euch genauso, wenn ihr im Internet zu einem bestimmten Thema in Foren Antworten sucht. Die Anzahl der Threads mit überflüssigem weil nicht informellem Inghalt überwiegen deutlich!
Hi,
_WinAPI_BitBlt() hab ich mir durchgelesen und irgendwie versteh ich es nicht ganz.
_WinAPI_BitBlt() verschiebt einen Speicherbereich in einen anderen, mit den Parametern wie z.B. $SRCAND werden Quelle (Source) und Ziel (Destination) - Inhalte des Speichers miteinander verknüpft.
"Normalerweise" verwendet man BitBlt() als schnelle und einfache Möglichkeit, Grafiken oder Bilder (oder Teile davon) darzustellen.
Dabei arbeitet BitBlt() mit (Anzeige-)Geräten, sog. Devices. Das können Bildschirme, Drucker usw. sein. Benötigt wird ein DeviceContext, also im Groben eine Beschreibung des Gerätes.
Diesen Context erhält man in AutoIt entweder über
$hDC = _GDIPlus_GraphicsGetDC($hGraphic) ;DC holen aus dem GDI-Grafikobjekt
;oder
$hDC = _WinAPI_GetDC($hGui) ;DC holen aus dem Fensterhandle
Einfaches Beispiel:
Es werden 3 Fenster erstellt. In die ersten beiden Fenster wird jeweils ein Teil des aktuellen Desktops "geblittet". Als Parameter dient SRCCOPY, es wird also kopiert.
Im dritten Fenster wird nun die Verknüpfung von Source (Fenster1) und Destination(Fenster2) anhand der verschiedenen Parameter gezeigt.
#include <WinAPI.au3>
#include <WindowsConstants.au3>
;Parameter fürs blitten
Dim $iRop[20]
$iRop[0] = $BLACKNESS ;- Füllt das Ziel-Rechteck mit der Farbe, die mit dem Paletten-Index 0 verknüpft ist
$iRop[1] = $CAPTUREBLT ;- Inkludiert jegliche Fenster, die das eigene Fenster überlagern in das resultierende Bild
$iRop[2] = $DSTINVERT ;- Invertiert die Farben des Ziel-Rechtecks (umkehren)
$iRop[3] = $MERGECOPY ;- Mischt die Farben des Quell-Rechtecks mit dem in hDest aktuell gewähltem Füllmuster (Brush), unterVerwendung des AND Operators.
$iRop[4] = $MERGEPAINT ;- Mischt die invertierten Farben des Quell-Rechtecks mit den Farben des Ziel-Rechtecks unter Verwendung des OR Operators.
$iRop[5] = $NOMIRRORBITMAP ;- Verhindert das spiegeln der Bitmap
$iRop[6] = $NOTSRCCOPY ;- Kopiert das invertierte Quell-Rechteck ins Ziel-Rechteck
$iRop[7] = $NOTSRCERASE ;- Kombiniert die Farben des Quell- und Ziel-Rechtecks unter Verwendung des OR Operators undinvertiert dann die daraus resultierenden Farben.
$iRop[8] = $PATCOPY ;- Kopiert das in hdcDest gewählte Füllmuster in die Ziel-Bitmap
$iRop[9] = $PATINVERT ;- Kombiniert die Farben des Quell-Rechtecks mit dem in hDest aktuell gewähltem Füllmuster, mit den Farben desZiel-Rechtecks unter Verwendung des XOR Operators.
$iRop[10] = $PATPAINT ;- Kombiniert die Farben des in hDest aktuell gewähltem Füllmusters, mit den Farben des invertiertem Quell-Rechtecks unter Verwendung des OR Operators. Das Resultat dieser Operation wird wiederum mit den Farbendes Ziel-Rechtecks kombiniert, unter Verwendung des OR Operators.
$iRop[11] = $SRCAND ;- Kombiniert die Farben des Quell- und Ziel-Rechtecks unter Verwendung des AND Operators
$iRop[12] = $SRCCOPY ;- Kopiert das Quell-Rechteck direkt ins Ziel-Rechteck
$iRop[13] = $SRCERASE ;- Kombiniert die invertierten Farben des Ziel-Rechtecks mit den Farben des Quell-Rechtecks unter Verwendung des AND Operators.
$iRop[14] = $SRCINVERT ;- Kombiniert die Farben des Quell- und Ziel-Rechtecks unter Verwendung des XOR Operators
$iRop[15] = $SRCPAINT ;- Kombiniert die Farben des Quell- und Ziel-Rechtecks unter Verwendung des OR Operators
$iRop[16] = $WHITENESS ;- Füllt das Ziel-Rechteck mit der Farbe, die mit dem Index 1 in der PhysikalischenPalette verknüpft ist.
;3 Fenster erstellen und anzeigen
$hGUI_source = GUICreate("SOURCE", 300, 300, 400, 400)
GUISetState()
$hGUI_dest = GUICreate("DESTINATION", 300, 300, 710, 400)
GUISetState()
$hGUI_bitblt = GUICreate("BitBlt() Para: ", 300, 300, 1020, 400)
GUISetState()
;DC der Fenster und des Desktops holen
$hDC_source = _WinAPI_GetDC($hGUI_source)
$hDC_dest = _WinAPI_GetDC($hGUI_dest)
$hDC_bitblt = _WinAPI_GetDC($hGUI_bitblt)
$hDC_screen = _WinAPI_GetDC(0) ;desktop
;Teile des Desktops in die Fenster blitten
_WinAPI_BitBlt($hDC_source, 0, 0, 300, 300, $hDC_screen, 0, 0, $SRCCOPY) ;obere linke Ecke vom Desktop nach SOURCE
_WinAPI_BitBlt($hDC_dest, 0, 0, 300, 300, $hDC_screen, 0, @DesktopHeight - 300, $SRCCOPY) ;untere linke Ecke vom Desktop nach DESTINATION
For $i = 0 To 16 ;alle Parameter anwenden
_WinAPI_BitBlt($hDC_bitblt, 0, 0, 300, 300, $hDC_dest, 0, 0, $SRCCOPY) ;Destination ins BitBlt-Fenster kopieren
_WinAPI_BitBlt($hDC_bitblt, 0, 0, 300, 300, $hDC_source, 0, 0, $iRop[$i]);BitBlt-Fenster verknüpfen mit Source
WinSetTitle($hGUI_bitblt, "", "BitBlt() Para: $iRop[" & $i & "]");Arrayindex Verknüpfung anzeigen
Sleep(2000) ;warten....^^
Next
Do ;solange, bis eines der Fenster geschlossen wird
Until GUIGetMsg() = -3
;aufräumen
_WinAPI_ReleaseDC($hGUI_bitblt, $hDC_bitblt)
_WinAPI_ReleaseDC($hGUI_source, $hDC_source)
_WinAPI_ReleaseDC($hGUI_dest, $hDC_dest)
_WinAPI_DeleteDC($hDC_bitblt)
_WinAPI_DeleteDC($hDC_source)
_WinAPI_DeleteDC($hDC_dest)
Möchte man nur alle Pixel einer bestimmten Farbe darstellen, dann verknüpft man das Ursprungsbild mit einem Bild mit ausschliesslich dieser Farbe und Verknüpft es per SRCAND. Dann werden nur "gleiche Farben" dargestellt, also die gesuchten Pixel.
Als Anwendung könnte man z.B.einen Farbfilter (vgl. Farbsehtest) erstellen, oder ein "Wasserzeichen" in einem Bild sichtbar machen oder Geheimschrift in einem Bilkd sichtbar machen oder oder oder^^
Hi,
ich bin nicht dafür, Threads nach einer bestimmten Zeit automatisch zu schließen.
Im Falle einer "Kaperung" durch einen Frischling bin ich wie gehabt für eine restriktive Maßnahme. Wer meint, Forenregeln durch irgendwelche Tricks (s. autoBert´s Beispiel) umgehen zu müssen, der sollte einige Tage Zeit bekommen darüber nachzudenken....
Wer allerdings ein berechtigtes Interesse an einem "alten" Thema hat, der soll auch (wegen mir nach Jahren) in diesen Thread posten können (dürfen).
Viel schlimmer als diese "Leichenschänderei" finde ich allerdings die eeeewig neuen Anfragen nach schon 1000x behandelten Themen!
"Client/Server" schlägt doch schon fast täglich auf..., von "Pixelgedöns" mal ganz abgesehen.
@Gun & Pee, vielleicht solltet ihr für Neulinge die Forensuche freischalten , zumindest die "TOP TEN THEMEN für Forenneulinge" sollten "sticky" sein!
Hi,
ändere mal die Grösse der Controls...z.B.
$TMPGRAPHIC=GUICtrlCreateGraphic($i_x-1,$i_y-1,2,2)
[/autoit]Hi,
allererste Anlaufstelle ist das AutoIt Scriptomatic Tool. Ohne das kein WMI 
Ich hab mir in Scriptomatic einen Filter eingebaut, um z.B. nach "Network" zu filtern und so nur die Network-Classes angezeigt zu bekommen....
Beispiele generiert von Scriptomatic:
; Generated by AutoIt Scriptomatic
[/autoit] [autoit][/autoit] [autoit]$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"
$Output=""
$Output = $Output & "Computer: " & $strComputer & @CRLF
$Output = $Output & "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration", "WQL", _
$wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) then
For $objItem In $colItems
$Output = $Output & "ArpAlwaysSourceRoute: " & $objItem.ArpAlwaysSourceRoute & @CRLF
$Output = $Output & "ArpUseEtherSNAP: " & $objItem.ArpUseEtherSNAP & @CRLF
$Output = $Output & "Caption: " & $objItem.Caption & @CRLF
$Output = $Output & "DatabasePath: " & $objItem.DatabasePath & @CRLF
$Output = $Output & "DeadGWDetectEnabled: " & $objItem.DeadGWDetectEnabled & @CRLF
$strDefaultIPGateway = $objItem.DefaultIPGateway(0)
$Output = $Output & "DefaultIPGateway: " & $strDefaultIPGateway & @CRLF
$Output = $Output & "DefaultTOS: " & $objItem.DefaultTOS & @CRLF
$Output = $Output & "DefaultTTL: " & $objItem.DefaultTTL & @CRLF
$Output = $Output & "Description: " & $objItem.Description & @CRLF
$Output = $Output & "DHCPEnabled: " & $objItem.DHCPEnabled & @CRLF
$Output = $Output & "DHCPLeaseExpires: " & WMIDateStringToDate($objItem.DHCPLeaseExpires) & @CRLF
$Output = $Output & "DHCPLeaseObtained: " & WMIDateStringToDate($objItem.DHCPLeaseObtained) & @CRLF
$Output = $Output & "DHCPServer: " & $objItem.DHCPServer & @CRLF
$Output = $Output & "DNSDomain: " & $objItem.DNSDomain & @CRLF
$strDNSDomainSuffixSearchOrder = $objItem.DNSDomainSuffixSearchOrder(0)
$Output = $Output & "DNSDomainSuffixSearchOrder: " & $strDNSDomainSuffixSearchOrder & @CRLF
$Output = $Output & "DNSEnabledForWINSResolution: " & $objItem.DNSEnabledForWINSResolution & @CRLF
$Output = $Output & "DNSHostName: " & $objItem.DNSHostName & @CRLF
$strDNSServerSearchOrder = $objItem.DNSServerSearchOrder(0)
$Output = $Output & "DNSServerSearchOrder: " & $strDNSServerSearchOrder & @CRLF
$Output = $Output & "DomainDNSRegistrationEnabled: " & $objItem.DomainDNSRegistrationEnabled & @CRLF
$Output = $Output & "ForwardBufferMemory: " & $objItem.ForwardBufferMemory & @CRLF
$Output = $Output & "FullDNSRegistrationEnabled: " & $objItem.FullDNSRegistrationEnabled & @CRLF
$strGatewayCostMetric = $objItem.GatewayCostMetric(0)
$Output = $Output & "GatewayCostMetric: " & $strGatewayCostMetric & @CRLF
$Output = $Output & "IGMPLevel: " & $objItem.IGMPLevel & @CRLF
$Output = $Output & "Index: " & $objItem.Index & @CRLF
$strIPAddress = $objItem.IPAddress(0)
$Output = $Output & "IPAddress: " & $strIPAddress & @CRLF
$Output = $Output & "IPConnectionMetric: " & $objItem.IPConnectionMetric & @CRLF
$Output = $Output & "IPEnabled: " & $objItem.IPEnabled & @CRLF
$Output = $Output & "IPFilterSecurityEnabled: " & $objItem.IPFilterSecurityEnabled & @CRLF
$Output = $Output & "IPPortSecurityEnabled: " & $objItem.IPPortSecurityEnabled & @CRLF
$strIPSecPermitIPProtocols = $objItem.IPSecPermitIPProtocols(0)
$Output = $Output & "IPSecPermitIPProtocols: " & $strIPSecPermitIPProtocols & @CRLF
$strIPSecPermitTCPPorts = $objItem.IPSecPermitTCPPorts(0)
$Output = $Output & "IPSecPermitTCPPorts: " & $strIPSecPermitTCPPorts & @CRLF
$strIPSecPermitUDPPorts = $objItem.IPSecPermitUDPPorts(0)
$Output = $Output & "IPSecPermitUDPPorts: " & $strIPSecPermitUDPPorts & @CRLF
$strIPSubnet = $objItem.IPSubnet(0)
$Output = $Output & "IPSubnet: " & $strIPSubnet & @CRLF
$Output = $Output & "IPUseZeroBroadcast: " & $objItem.IPUseZeroBroadcast & @CRLF
$Output = $Output & "IPXAddress: " & $objItem.IPXAddress & @CRLF
$Output = $Output & "IPXEnabled: " & $objItem.IPXEnabled & @CRLF
$strIPXFrameType = $objItem.IPXFrameType(0)
$Output = $Output & "IPXFrameType: " & $strIPXFrameType & @CRLF
$Output = $Output & "IPXMediaType: " & $objItem.IPXMediaType & @CRLF
$strIPXNetworkNumber = $objItem.IPXNetworkNumber(0)
$Output = $Output & "IPXNetworkNumber: " & $strIPXNetworkNumber & @CRLF
$Output = $Output & "IPXVirtualNetNumber: " & $objItem.IPXVirtualNetNumber & @CRLF
$Output = $Output & "KeepAliveInterval: " & $objItem.KeepAliveInterval & @CRLF
$Output = $Output & "KeepAliveTime: " & $objItem.KeepAliveTime & @CRLF
$Output = $Output & "MACAddress: " & $objItem.MACAddress & @CRLF
$Output = $Output & "MTU: " & $objItem.MTU & @CRLF
$Output = $Output & "NumForwardPackets: " & $objItem.NumForwardPackets & @CRLF
$Output = $Output & "PMTUBHDetectEnabled: " & $objItem.PMTUBHDetectEnabled & @CRLF
$Output = $Output & "PMTUDiscoveryEnabled: " & $objItem.PMTUDiscoveryEnabled & @CRLF
$Output = $Output & "ServiceName: " & $objItem.ServiceName & @CRLF
$Output = $Output & "SettingID: " & $objItem.SettingID & @CRLF
$Output = $Output & "TcpipNetbiosOptions: " & $objItem.TcpipNetbiosOptions & @CRLF
$Output = $Output & "TcpMaxConnectRetransmissions: " & $objItem.TcpMaxConnectRetransmissions & @CRLF
$Output = $Output & "TcpMaxDataRetransmissions: " & $objItem.TcpMaxDataRetransmissions & @CRLF
$Output = $Output & "TcpNumConnections: " & $objItem.TcpNumConnections & @CRLF
$Output = $Output & "TcpUseRFC1122UrgentPointer: " & $objItem.TcpUseRFC1122UrgentPointer & @CRLF
$Output = $Output & "TcpWindowSize: " & $objItem.TcpWindowSize & @CRLF
$Output = $Output & "WINSEnableLMHostsLookup: " & $objItem.WINSEnableLMHostsLookup & @CRLF
$Output = $Output & "WINSHostLookupFile: " & $objItem.WINSHostLookupFile & @CRLF
$Output = $Output & "WINSPrimaryServer: " & $objItem.WINSPrimaryServer & @CRLF
$Output = $Output & "WINSScopeID: " & $objItem.WINSScopeID & @CRLF
$Output = $Output & "WINSSecondaryServer: " & $objItem.WINSSecondaryServer & @CRLF
if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
$Output=""
Next
Else
Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_NetworkAdapterConfiguration" )
Endif
Func WMIDateStringToDate($dtmDate)
[/autoit] [autoit][/autoit] [autoit]Return (StringMid($dtmDate, 5, 2) & "/" & _
StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
& " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc
; Generated by AutoIt Scriptomatic
[/autoit] [autoit][/autoit] [autoit]$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"
$Output=""
$Output = $Output & "Computer: " & $strComputer & @CRLF
$Output = $Output & "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapter", "WQL", _
$wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) then
For $objItem In $colItems
$Output = $Output & "AdapterType: " & $objItem.AdapterType & @CRLF
$Output = $Output & "AdapterTypeId: " & $objItem.AdapterTypeId & @CRLF
$Output = $Output & "AutoSense: " & $objItem.AutoSense & @CRLF
$Output = $Output & "Availability: " & $objItem.Availability & @CRLF
$Output = $Output & "Caption: " & $objItem.Caption & @CRLF
$Output = $Output & "ConfigManagerErrorCode: " & $objItem.ConfigManagerErrorCode & @CRLF
$Output = $Output & "ConfigManagerUserConfig: " & $objItem.ConfigManagerUserConfig & @CRLF
$Output = $Output & "CreationClassName: " & $objItem.CreationClassName & @CRLF
$Output = $Output & "Description: " & $objItem.Description & @CRLF
$Output = $Output & "DeviceID: " & $objItem.DeviceID & @CRLF
$Output = $Output & "ErrorCleared: " & $objItem.ErrorCleared & @CRLF
$Output = $Output & "ErrorDescription: " & $objItem.ErrorDescription & @CRLF
$Output = $Output & "Index: " & $objItem.Index & @CRLF
$Output = $Output & "InstallDate: " & WMIDateStringToDate($objItem.InstallDate) & @CRLF
$Output = $Output & "Installed: " & $objItem.Installed & @CRLF
$Output = $Output & "LastErrorCode: " & $objItem.LastErrorCode & @CRLF
$Output = $Output & "MACAddress: " & $objItem.MACAddress & @CRLF
$Output = $Output & "Manufacturer: " & $objItem.Manufacturer & @CRLF
$Output = $Output & "MaxNumberControlled: " & $objItem.MaxNumberControlled & @CRLF
$Output = $Output & "MaxSpeed: " & $objItem.MaxSpeed & @CRLF
$Output = $Output & "Name: " & $objItem.Name & @CRLF
$Output = $Output & "NetConnectionID: " & $objItem.NetConnectionID & @CRLF
$Output = $Output & "NetConnectionStatus: " & $objItem.NetConnectionStatus & @CRLF
$strNetworkAddresses = $objItem.NetworkAddresses(0)
$Output = $Output & "NetworkAddresses: " & $strNetworkAddresses & @CRLF
$Output = $Output & "PermanentAddress: " & $objItem.PermanentAddress & @CRLF
$Output = $Output & "PNPDeviceID: " & $objItem.PNPDeviceID & @CRLF
$strPowerManagementCapabilities = $objItem.PowerManagementCapabilities(0)
$Output = $Output & "PowerManagementCapabilities: " & $strPowerManagementCapabilities & @CRLF
$Output = $Output & "PowerManagementSupported: " & $objItem.PowerManagementSupported & @CRLF
$Output = $Output & "ProductName: " & $objItem.ProductName & @CRLF
$Output = $Output & "ServiceName: " & $objItem.ServiceName & @CRLF
$Output = $Output & "Speed: " & $objItem.Speed & @CRLF
$Output = $Output & "Status: " & $objItem.Status & @CRLF
$Output = $Output & "StatusInfo: " & $objItem.StatusInfo & @CRLF
$Output = $Output & "SystemCreationClassName: " & $objItem.SystemCreationClassName & @CRLF
$Output = $Output & "SystemName: " & $objItem.SystemName & @CRLF
$Output = $Output & "TimeOfLastReset: " & WMIDateStringToDate($objItem.TimeOfLastReset) & @CRLF
if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
$Output=""
Next
Else
Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_NetworkAdapter" )
Endif
Func WMIDateStringToDate($dtmDate)
[/autoit] [autoit][/autoit] [autoit]Return (StringMid($dtmDate, 5, 2) & "/" & _
StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
& " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc
Hi,
Ich suche nicht nach dem einfachsten Ergebnis das zu programmieren, sondern nach der einfachsten Bedienung
Dateien markieren, rechtsklick, und dein Programm anklicken (das dann natürlich ins Explorer-Kontextmenü muss^^, was aber kein Problem darstellt ).
Geht ohne Hotkey (den du tunlichst vor jeder "Datei Markieren"-Aktion ausschalten solltest! ) und macht den geringsten Aufwand.
Weiterhin kannst du im Kontextmenu dein Programm ans "Senden an" anfügen. Das ist der SENDTO-Ordner im Verzeichnis C:\Dokumente und Einstellungen\Administrator(oder der Username)\SendTo
Die übergebenen Dateien lassen sich in AutoIt in $cmdline[] auslesen
Hi,
Werte kommen raus (vermutlich noch falsch aber das kommt noch) aber dargestellt werden sie nicht.
Was wird nicht dargestellt? Der Farbverlauf wird bei mir mit XP32 dargestellt
Parameter:
112233
667788
100
ergibt ein Fenster mit einem Farbverlauf
Huhu,
Ist nicht die schnellste Lösung... Eigentlich was für ASM
Schlawiner^^
Geht aber auch einfacher...
BitBlt() mit Maske der gesuchten Pixelfarbe und Parameter $SRCAND
Glücklichen Herzwunsch und alles Gute nachträglich!
Kaum ist man mal ein Wochenende weg, da hagelt es Geburtstagskinder
Hi,
zunächst mal braucht sich NIEMAND, am allerwenigsten JaneDoe als Threadersteller, zu beschweren, hier im Forum gäbe es kaum bzw. zu wenig Unterstützung bzw. Feedback zu Threads, wenn diese nach gerade mal einem Tag GESCHLOSSEN (seit wann gibts denn DAS in diesem Zusammenhang?) werden!
Nächster Punkt, ich benutze Opera seit der ersten kostenpflichtigen Version, muss wohl Ende Achziger oder Anfang Neunziger gewesen sein.
Und ja, einige Male habe ich mich seitdem über diesen Browser geärgert, allerdings selten. Für mich überwiegen die Vorteile gegenüber den anderen Browsern.
Ich erinnere mich an einen Thread hier im Forum, als WoltLab eine neue, nicht "Opera-kompatible" Forensoftware-Version unter die Menschheit brachte, die wohl mit der "heissen Nadel" gestrickt worden war. Bugfixes kamen dann irgendwann, Thema erledigt.
Seitdem, und auch heute noch, habe ich absolut kein Problem Threads zu erstellen und diese angemessen zu formatieren und nachträglich zu editieren.
Ich schreibe grundsätzlich immer meine Beiträge im Quellcode-Reiter, nie im Editor, vielleicht hängts daran.....
Daher kann ich die Probleme der Opera-User, welche doppelten Zeilenabstand und "fehlerhafte" Formatierung beklagen, nicht nachvollziehen.
WoltLab steht nicht sonderlich auf Opera, das ist bekannt. Aber die Forensoftware ist auch für Opera-User benutzbar, ich hatte jedenfalls in der letzten Zeit keine Einschränkungen bemerkt.
Den im "Forum und Opera" verlinkten Thread ins Woltlab-Forum hab ich überflogen, und dann nur noch kopfschüttelnd ins NUL-Device geschoben.
Denn letztendlich stellt sich mir die Frage, wieso ein Mensch mehrfach zwischen Editor- und Quellcode-Ansicht wechselt, wenn er weiß (und da spätestens stellt sich mir die Frage nach geistiger Reife) dass dieses mehrmalige Wechseln (wieso überhaupt? ) zu einer fehlerhaften Darstellung führt.
In meiner liebreizenden Art hätte ich nämlich das "Opera-Problem" mit dem Hinweis gelöst:" Hört auf rumzuklickern und konzentriert euch auf ordentliche Inhalte!"
In diesem Sinne, viel Spass mit dem Opera-Browser, auch in diesem Forum!
