Rückgabewerte von Inputboxen sind Strings.
Schreib so:
[autoit]$Zahl1 = Number(InputBox("", "Gib deine Zahl ein!"))
[/autoit]So werden deine Eingaben direkt in Zahlen konvertiert.
Beiträge von PenGuin
-
-
Alles Gute!
PS: In 8 Tagen isses auch bei mir soweit :>
-
So also, nach testen kann ich sagen, dss es an der Firewall nicht liegt.
Admin Rechte hab ich auch.
Du meintest es liegt daran, dass eine Einstellung beim Zielclient nicht getroffen wurde, welche könnte das sein? -
Achtung Schleimbatzen, in Deckung!
Ne Spaß beiseite, Willkommen
-
[autoit]
_GUICtrlListBox_GetCurSel()
[/autoit]
dürfts sein, schau mal in der Hilfe nach.EDIT: Das oben war ListBox, ich glaube für ListView ist es das:
[autoit]_GUICtrlListView_GetItemText
[/autoit] -
Da er Fehler 1 ausgibt, liegt es daran, dass er kein Objekt von WMIServic erstellen bzw. bekommen kann, liegt es also nahe, dass ich zu wenig Rechte besitze?
-
Schau mal in der Hilfe unter:
ProgressOn
ProgressOff
ProgressSet
-
Ich würds so machen, spart Codezeilen und umgeht diese doofe While...WEnd Schleife:
Spoiler anzeigen
[autoit]$cbo_box1 = GUICtrlCreatecombo ("", 8, 80, 265, 25)
[/autoit] [autoit][/autoit] [autoit]
_PfadeAusINI()Func _PfadeAusINI()
[/autoit]
Local $sIni = @ScriptDir & "\" & "\test.ini" ;$sSettingsName
$aData1 = IniReadSection($sIni,"Profil")
;~ _ArrayDisplay($aData1)
If Not @error Then
For $i = 1 To $aData1[0][0]
GUICtrlSetData($cbo_box1, $aData1[$i][0]
Next
EndIf
EndFuncPS: Ich habs ausm Kopf geschrieben, kann sein, dass ein Fehler drin ist.
-
Alles, was die Funktion, die ich in den Spoiler getan hab, auch tut.
Also:Hersteller
Name
Adapter-Typ
Kennung
MAC-Adresse
Adresstyp(IP, DHCP, Gateway etc. wurden rausgenommen)
MfG
-
Wenn ich richtig sehe, bzw. getestet habe, dann kann ich abe nicht mit dieser Funktion auch Netzwerkkarten von meinem PC aus von anderen PCs auslesen oder?
Also indem ich die IP angebe.Er schreibt als Fehler 1 rein und ich nutze Vista^^
Spoiler anzeigen
[autoit]#include <Array.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$iTimer = TimerInit()
$aAdapter = _Win32NetworkAdapter()
ConsoleWrite('Fehler: ' & @error & @CR & 'Zeit: ' & Int(TimerDiff($iTimer)) & ' ms' & @CR)
_ArrayDisplay($aAdapter)Func _Win32NetworkAdapter($strComputer = 'Localhost')
[/autoit] [autoit][/autoit] [autoit]
Local $aReturn[1][12] = [[ _
'Hersteller:', 'Name:', 'Adapter-Typ:', 'Kennung:', _
'MAC-Adresse:', 'Adresstyp:', 'DHCP-Server:', 'IP erhalten:', _
'IP läuft ab:', 'IP-Adresse:', 'Subnetzmaske:', 'Standardgateway:']]
Local $x = 0, $objWMIService, $colItems
$objWMIService = ObjGet('winmgmts:\\' & $strComputer & '\')
If Not IsObj($objWMIService) Then Return SetError(1, 0, 0)
$colItems = $objWMIService.ExecQuery('SELECT * FROM Win32_NetworkAdapter WHERE Netconnectionstatus = 2', 'WQL', 0x30)
If Not IsObj($colItems) Then Return SetError(2, 0, 0)
For $objItem In $colItems
$x += 1
ReDim $aReturn[$x + 1][12]
$aReturn[$x][0] = $objItem.Manufacturer
$aReturn[$x][1] = $objItem.Name
$aReturn[$x][2] = $objItem.AdapterType
$aReturn[$x][3] = $objItem.NetConnectionID
$aReturn[$x][4] = $objItem.MACAddress
$colItems2 = $objWMIService.ExecQuery('SELECT * FROM Win32_NetworkAdapterConfiguration', 'WQL', 0x30)
If IsObj($colItems2) Then
For $objItem2 In $colItems2
If $objItem.Caption = $objItem2.Caption Then
If $objItem2.IPEnabled = -1 Then
If $objItem2.DHCPEnabled = -1 Then
$aReturn[$x][5] = 'von DHCP zugewiesen'
$aReturn[$x][6] = $objItem2.DHCPServer
$aReturn[$x][7] = _WMIDateStringToDate($objItem2.DHCPLeaseObtained)
$aReturn[$x][8] = _WMIDateStringToDate($objItem2.DHCPLeaseExpires)
Else
$aReturn[$x][5] = 'Manuell konfiguriert'
EndIf
$aReturn[$x][9] = $objItem2.IPAddress(0)
$aReturn[$x][10] = $objItem2.IPSubnet(0)
$aReturn[$x][11] = $objItem2.DefaultIPGateway(0)
EndIf
EndIf
Next
EndIf
Next
Return $aReturn
EndFunc ;==>_Win32NetworkAdapterFunc _WMIDateStringToDate($dtmDate)
[/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 ;==>_WMIDateStringToDate -
Hallo,
ich hab mir eine Funktion gebaut, die alle Netzwerk-IPs von den PCs anzeigt, die sich im Netzwerk angemeldet haben.
Nun möchte ich aber mit diesen IPs auch die sich dahinter befindliche ( dummes Wort ) Netzwerkkarte herausfinden, ist das möglich?MFG
-
Ich spiel das Spiel auch und bei mir blockt oder IMMER -.-
-
Nein, Makros immer ohne ' ' !
[autoit]FileCopy (@ScriptDir, "C:\Neuer Ordner")
[/autoit] -
@Pinguin94 warum benutzt du nicht gleich _ProcessGetName? Man muß doch das Rad nicht neu erfinden
Da wollte ich mir mal schön eine Funktion bauen und dann das ~.~ -
Um den Namen eines Programmes herauszufinden, das per Run gestartet wurde, kann man diese Funktion benutzen:
Spoiler anzeigen
[autoit]; #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _GetProcessByFile
; Description ...: Get Process Name by PID of Process
; Parameters ....: $PID = PID of Process
; Return values .: On Success - Returns the name of the running process
; Author.........: pinguin94
; Remarks .......: http://www.autoit.de
; ===============================================================================================================================Func _GetProcessByFile($PID)
[/autoit]
Local $PList = ProcessList()
For $i = 1 To $PList[0][0]
If $PID = $PList[$i][1] Then
Return $PList[$i][0]
EndIf
Next
EndFuncBeispiel:
Spoiler anzeigen
[autoit]$Process = Run("notepad.exe")
[/autoit] [autoit][/autoit] [autoit]
$Name = _GetProcessByFile($Process)ConsoleWrite($Name & @CRLF)
[/autoit] [autoit][/autoit] [autoit]; #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _GetProcessByFile
; Description ...: Get Process Name by PID of Process
; Parameters ....: $PID = PID of Process
; Return values .: On Success - Returns the name of the running process
; Author.........: pinguin94
; Remarks .......: http://www.autoit.de
; ===============================================================================================================================Func _GetProcessByFile($PID)
[/autoit]
Local $PList = ProcessList()
For $i = 1 To $PList[0][0]
If $PID = $PList[$i][1] Then
Return $PList[$i][0]
EndIf
Next
EndFuncMfG
EDIT: Bitte um Nachsicht, ich weiß, es ist nur eine kleine Funktion, aber ich möcht als Anfänger, auch eine Funktin haben, die ich gebaut hab
-
Der Style $ES_NUMBER, lässt eine Pop-Up Blase aufploppen, wenn man keine Zahl eintippt.
-
Ich glaube nicht, dass es ein Spiel zulässt sich einen Vorteil anderen Spielern gegenüber zu verschaffen, indem die Person ncihts tut...
-
Leider nicht immer
-
Oder aber du lernst besser AutoIt und kannst das für dich selber machen
-
Frag das nicht uns, frag das den Leuten von Aion, die diese Regelung getroffen haben.
