https://autoit.de/index.php?page…39&pageNo=1
Das sollte dir helfen
AD = Active Directory
OU = organisation unit
https://autoit.de/index.php?page…39&pageNo=1
Das sollte dir helfen
AD = Active Directory
OU = organisation unit
Voller MS Support kostet ne ganze menge
Habe den Fehler ebenfalls unter Win7x64
Es tritt bei mir nur bei der unteren Leiste auf und das auch nur immer für einen Bruchteil einer Sekunde.
Alles anzeigenHmm
Ich bin ja kein Prof. aber ich denke mal das würde funktionieren:
[autoit]
Was passiert wenn man die Anzahl der CPUs die zurückgegeben werden mal durch vier teilt?[/autoit]
$ergebnis=$ergebnis/4Also vieleicht nicht die beste Lösung (vieleicht sogar die falsche aber denke mal das das so richtig ist...
Edit: Bei mir
Anzahl CPUs: 1
Anzahl der Kerne: 2
Na ok ich denke ich habe keine 1/4 CPUs.
Ich habe Win7 32BitIch denke es liegt daran das deiner eine neue Technologie hat. Dann teilt man durch 4 sonst nicht.
Er hat bei beiden anscheinend 4 Kern Prozessoren drin und Hyperthreading aktiviert.. einfach durch 4 teilen wird nicht funktionieren
Aber es scheint so als würde unter XP/2003 jeder Kern eine Device ID zu bekommen... schade eigentlich
Hm also unter Windows 7 wird es bei mir korrekt dargestellt (ohne Hyperthreading)
#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=n
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
Local Const $wbemFlagReturnImmediately = 0x10
Local Const $wbemFlagForwardOnly = 0x20
MsgBox(64, "Prozessor", "Anzahl CPUs: " & _GetCPUCount() & @CRLF & "Anzahl der Kerne: " & _GetCoreCount())
[/autoit] [autoit][/autoit] [autoit]Func _GetCoreCount(Const $Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then Return SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_PerfRawData_PerfOS_Processor', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If Not IsObj($ObjList) Then Return SetError(-2, @error, 0)
$iReturn = 0
For $ObjItem In $ObjList
If StringInStr($ObjItem.Name, "_Total") = 0 Then $iReturn += 1
Next
Return $iReturn
EndFunc ;==>_GetCoreCount
Func _GetCPUCount(Const $Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then Return SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_Processor', 'WQL', $wbemFlagReturnImmediately)
If Not IsObj($ObjList) Then Return SetError(-2, @error, 0)
Return $ObjList.Count
EndFunc ;==>_GetCPUCount
[Blockierte Grafik: http://img819.imageshack.us/img819/1443/cpucount.png]
Es ist ja scheinbar so, dass HT nur Einfluss auf die CPU Anzahl hat, die Anzahl der Cores stimmt ja bei dir soweit.
EDIT : Eventuell kann man es ja an der Device ID erkennen. Bin nicht in der Firma deshalb kann ichs leider nicht testen
#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=n
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
Local Const $wbemFlagReturnImmediately = 0x10
Local Const $wbemFlagForwardOnly = 0x20
MsgBox(64, "Prozessor", "Anzahl CPUs: " & _GetCPUCount() & @CRLF & "Anzahl der Kerne: " & _GetCoreCount())
[/autoit] [autoit][/autoit] [autoit]Func _GetCoreCount(Const $Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then Return SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_PerfRawData_PerfOS_Processor', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If Not IsObj($ObjList) Then Return SetError(-2, @error, 0)
$iReturn = 0
For $ObjItem In $ObjList
If StringInStr($ObjItem.Name, "_Total") = 0 Then $iReturn += 1
Next
Return $iReturn
EndFunc ;==>_GetCoreCount
Func _GetCPUCount(Const $Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then Return SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_Processor', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If Not IsObj($ObjList) Then Return SetError(-2, @error, 0)
$iReturn = 0
For $ObjItem In $ObjList
If $ObjItem.DeviceID = "CPU" & $iReturn Then $iReturn += 1
Next
Return $iReturn
EndFunc ;==>_GetCPUCount
So ich glaub ich habe es (hoffentlich :D)
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Local Const $wbemFlagReturnImmediately = 0x10
Local Const $wbemFlagForwardOnly = 0x20
MsgBox(64,"Prozessor","Anzahl der Kerne: " & _Processor())
[/autoit] [autoit][/autoit] [autoit]Func _Processor($Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then Return SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_PerfRawData_PerfOS_Processor', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If Not IsObj($ObjList) Then Return SetError(-2, @error, 0)
$iReturn = 0
For $ObjItem In $ObjList
If StringInStr($ObjItem.Name,"_Total") = 0 Then $iReturn +=1
Next
Return $iReturn
EndFunc ;==>_Processor
Habe es unter Win7 x64 (QuadCore) und unter XPSP3 (Dual Core) in ner VM getestet
vergiss nicht das Arrays bei 0 anfangen, also musste ein runter zählen
Hmm echt problematisch unter XP...
Man könnte es eventuell noch folgendermaßen machen:
Local Const $wbemFlagReturnImmediately = 0x10
Local Const $wbemFlagForwardOnly = 0x20
MsgBox(64,"Prozessor","Anzahl der Kerne: " & _Processor())
[/autoit] [autoit][/autoit] [autoit]Func _Processor($Computer = "127.0.0.1")
$WMIConnect = ObjGet('winmgmts:{impersonationLevel=impersonate}!\\' & $Computer & '\root\CIMV2')
If Not IsObj($WMIConnect) Then SetError(-1, @error, 0)
$ObjList = $WMIConnect.ExecQuery('SELECT Name FROM Win32_Processor', 'WQL', $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If Not IsObj($ObjList) Then SetError(-2, @error, 0)
For $ObjItem In $ObjList
Select
Case StringInStr($ObjItem.Name,"Duo") <> 0
$sReturn = 2
Case StringInStr($ObjItem.Name,"Quad") <> 0
$sReturn = 4
EndSelect
Next
Return $sReturn
EndFunc ;==>_Processor
Ist nur ziemlich unglücklich da man es pflegen müsste
Du brauchst nur den Server
Der player kann nur "Abspielen" aber keine virtuellen Computer erstellen.
Beim Server kannst du dich mit nem Webinterface aufschalten (da gibts nen mitgeliefertes Plugin für Firefox/IExplorer)
Eine If Abfrage, ob das Passwort korrekt ist oder wenns größer ist machst z.B. eine MySQL DB wo du die Daten verschlüsselt abfragst
VmWare Server 2.0 ist Freeware und lässt sich über ein Webinterface steuern. Esxi ist auch sehr interessant (Eine Distribution gemacht für die Virtualisierng ^^, braucht man aber eben einen extra PC dafür )
Wenns um Virtualisierung geht würde ich an deiner Stelle auf vmware setzen.
HyperV ist ja leider kostenpflichtig und VirtualPC 2007 naja.. ^^. Virtual Box gibts auch, aber da gibts nicht grade viel Freiheit.
Vmware hat auch einen netten Konverter zum virtualisieren deiner aktuellen Umgebung
http://www.vmware.com/de/products/converter/
Aber AchtunG! viel Zeit einplanen, je nach Datenmenge kann das mehrere Stunden dauern
Hm das ist glaub ich über einen Registryschlüssel möglich
Du kannst aber auch nach dem Kopiervorgang das Laufwerk mit DriveMapDel löschen
Jop die Benutzerdaten hinterlegen
An eine zweite Fachhochschule zu kommen ist meist nicht so einfach, da die anderen Bevorzugt werden. Ich war selbst auch auf einer höheren Handelsschule und bin nicht angenommen worden, da meine Noten von der Handelsschule gut genug für das Berufsleben waren (so haben die es mir tatsächlich verkauft....). Da ich aber absolut nichts kaufmännisches machen wollte (Handelsschule hat mich abgeschreckt :D) bin ich gleich ne Ausbildung bei einer größeren Firma als IT-Systemelektroniker angefangen. Am Anfang musste ich zwar etwas mehr lernen, aber es war nicht sehr schwer reinzukommen, wenn man die Grundlagen drauf hat und die kaufmännischen Fächer hab ich mit links erledigt ;). Wie es mit dem Programmieren ist kann ich dir natürlich nicht sagen, aber Java hab ich auch hinbekommen, auch wenn wie auf der HH in Informatik Excel und Frontpage hatten (kein Kommentar dazu :D).
Ich würde sagen es kommt stark drauf an wie du dich einschätzt und wo du angenommen wirst.
Leute die bei PC-Läden arbeiten habens meist schwerer als leute die in einer großen IT Firma arbeiten, da sie eben nicht so viel in der Praxis sehen (z.B. Blade Server, VPN, Domänestrukturen etc) habs zumindest so in meiner alten Klasse feststellen können.
Das sieht für mich wie ein Bot für ein Pokerspiel o.ä. aus (Table, Buyin etc)
Bitte einmal oben in der Leiste die Forenregeln durchlesen
Habs hinbekommen
Danke
Nein ich möchte das Item auslesen, wenn es angeklickt wurde.
Das Auslesen ist nicht das Problem, aber das Klicken bringt mich zur Verweifelung.
Hi
Ich versuche im Moment verzweifelt einen klick auf nen Listviewitem festzustellen.
Habe es bereits mit WM_Notify versucht (eventuell falsch angewandt, weil noch nie benutzt)
Und ich bin ziemlich GUI unerfahren.. wenns nach mir ginge würd ich was für die Konsole basteln... aber der Abteilungsleiter braucht immer was zum rumklickern
Betroffen ist das Listview $cServerliste. Hoffe ihr könnt mir da fix auf die Sprünge helfen...^^
#RequireAdmin
#AutoIt3Wrapper_UseX64=n
;#####################################################################################################
;Includes;############################################################################################
;#####################################################################################################
;~ #include <mysql.au3>
;~ #include "WinWMI_UserAccount.au3"
#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
AutoItSetOption('TrayAutoPause', 0)
AutoItSetOption('TrayMenuMode', 1)
;#####################################################################################################
;Konstanten;##########################################################################################
;#####################################################################################################
;~ Global Const $sDbserver = 'localhost'
;~ Global Const $sDbuser = 'root'
;~ Global Const $sDbpassword = ''
;~ Global Const $sDbname = 'technik'
;#####################################################################################################
;Herstellen der Verbindung;###########################################################################
;#####################################################################################################
;~ _MySQL_InitLibrary()
;~ If @error Then
;~ TrayTip('Error', 'libmysql.dll konnte nicht gefunden werden', 10, 3)
;~ Sleep(10000)
;~ Exit (1)
;~ EndIf
;~ $MysqlConn = _MySQL_Init()
;~ $Connected = _MySQL_Real_Connect($MysqlConn, $sDbserver, $sDbuser, $sDbpassword, $sDbname)
;~ $hSQLping = _MySQL_Ping($MysqlConn)
;~ If $hSQLping = 1 Or $hSQLping = 3 Then
;~ TrayTip('Error', 'Verbindung zur Datenbank konnte nicht hergestellt werden', 10, 3)
;~ Sleep(10000)
;~ Exit (1)
;~ EndIf
;#####################################################################################################
;Grafische Oberflächen werden erstellt;###############################################################
;#####################################################################################################
$cTechnikTool = GUICreate("Techniktool", 1025, 741, 193, 123)
; Menüleiste
$MenuItem1 = GUICtrlCreateMenu("&MenuItem1")
$MenuItem2 = GUICtrlCreateMenuItem("MenuItem2", $MenuItem1)
; ==> Menüleiste
; $cServerliste
$cServerliste = GUICtrlCreateListView("", 8, 8, 234, 702,$GUI_DROPACCEPTED+$LVS_SINGLESEL+$LVS_NOSORTHEADER+$LVS_SHOWSELALWAYS)
$hServerliste = GUICtrlGetHandle($cServerliste)
_GUICtrlListView_AddColumn($hServerliste, "Server", 110)
_GUICtrlListView_AddColumn($hServerliste, "IP-Adresse", 110)
;~ $aReturn = _mysql_serverread($MysqlConn)
Local $aReturn[2][2] = [["Server1","192.168.0.1"],["Server2","192.168.0.2"]]
_GUICtrlListView_AddArray($hServerliste, $aReturn)
; ==> $cServerliste
$Tab1 = GUICtrlCreateTab(256, 8, 761, 705)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Systeminformationen")
$cGroupNetwork = GUICtrlCreateGroup("Netzwerkkonfiguration", 528, 40, 233, 129)
$cIpadressename = GUICtrlCreateLabel("IP-Adresse", 536, 64, 55, 17)
$cIpadresse = GUICtrlCreateLabel(@IPAddress1, 632, 64, 85, 17)
$Label4 = GUICtrlCreateLabel("Subnetzmaske", 536, 88, 74, 17)
$Label3 = GUICtrlCreateLabel("Gateway", 536, 112, 46, 17)
$Label5 = GUICtrlCreateLabel("DNS-Server", 536, 136, 61, 17)
$Label6 = GUICtrlCreateLabel("test", 632, 88, 85, 17)
$Label7 = GUICtrlCreateLabel("192.168.100.200", 632, 112, 85, 17)
$Label8 = GUICtrlCreateLabel("192.168.100.200", 632, 136, 85, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group1 = GUICtrlCreateGroup("Allgemein", 264, 40, 257, 129)
$Label1 = GUICtrlCreateLabel("Computername", 272, 64, 75, 17)
$Label2 = GUICtrlCreateLabel("192.168.100.100", 368, 64, 85, 17)
$Label10 = GUICtrlCreateLabel("Domäne", 272, 88, 44, 17)
$Label9 = GUICtrlCreateLabel("Betriebssystem", 272, 112, 74, 17)
$Label11 = GUICtrlCreateLabel("Servicepack", 272, 136, 64, 17)
$Label12 = GUICtrlCreateLabel("255.255.255.255", 368, 88, 85, 17)
$Label13 = GUICtrlCreateLabel("192.168.100.200", 368, 112, 85, 17)
$Label14 = GUICtrlCreateLabel("192.168.100.200", 368, 136, 85, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Servermodell", 768, 40, 233, 129)
$Label15 = GUICtrlCreateLabel("Mainboard", 776, 64, 54, 17)
$Label16 = GUICtrlCreateLabel("192.168.100.100", 872, 64, 85, 17)
$Label17 = GUICtrlCreateLabel("BIOS-Version", 776, 112, 67, 17)
$Label20 = GUICtrlCreateLabel("255.255.255.255", 872, 88, 85, 17)
$Label21 = GUICtrlCreateLabel("192.168.100.200", 872, 112, 85, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Leistung", 264, 176, 257, 145)
$Label18 = GUICtrlCreateLabel("Prozessor", 272, 200, 50, 17)
$Label19 = GUICtrlCreateLabel("192.168.100.100", 368, 200, 85, 17)
$Label23 = GUICtrlCreateLabel("Arbeitsspeicher", 272, 248, 76, 17)
$Label22 = GUICtrlCreateLabel("Speicherplatz", 272, 272, 68, 17)
$Label25 = GUICtrlCreateLabel("255.255.255.255", 368, 224, 85, 17)
$Label26 = GUICtrlCreateLabel("192.168.100.200", 368, 248, 85, 17)
$Label27 = GUICtrlCreateLabel("192.168.100.200", 368, 272, 85, 17)
$Label24 = GUICtrlCreateLabel("Hyperthreading", 272, 224, 76, 17)
$Label28 = GUICtrlCreateLabel("Label28", 368, 296, 42, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Programme = GUICtrlCreateTabItem("Programme")
$ListView2 = GUICtrlCreateListView("", 264, 40, 746, 662,$GUI_DROPACCEPTED+$LVS_SINGLESEL+$LVS_NOSORTHEADER)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView2), "Programm", 250)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView2), "Version", 140)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView2), "Publisher", 160)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView2), "Pfad", 170)
;~ $aReturn = _mysql_programsread($MysqlConn)
;~ _GUICtrlListView_AddArray(GUICtrlGetHandle($ListView2), $aReturn)
$Benutzer = GUICtrlCreateTabItem("Benutzer")
$ListView3 = GUICtrlCreateListView("", 264, 40, 746, 662,$GUI_DROPACCEPTED+$LVS_SINGLESEL+$LVS_NOSORTHEADER)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView3), "Benutername", 300)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView3), "Voller Name", 150)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView3), "Deaktiviert", 160)
_GUICtrlListView_AddColumn(GUICtrlGetHandle($ListView3), "Lokaler Benutzer", 120)
;~ $aBenutzer = _WinWMI_UserAccount_GetInformation("Name,Fullname,Disabled,LocalAccount")
;~ _GUICtrlListView_AddArray(GUICtrlGetHandle($ListView3), $aBenutzer)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
;~ _Exit()
Exit
Case $cServerliste
$sSelected = _GUICtrlListView_GetSelectedIndices($hServerliste)
If $sSelected <> "" Then
MsgBox(0,"",_GUICtrlListView_GetItemText($hServerliste,$sSelected,1) )
EndIf
EndSwitch
WEnd
;~ Func _mysql_serverread(Const $MysqlVerbindung)
;~ _MySQL_Real_Query($MysqlVerbindung, "SELECT `server`.`server_name`, `server`.`server_ip` FROM `technik`.`server` Order by `server`.`server_name` asc;")
;~ If @error Then
;~ Return SetError(-1, @error, 0)
;~ Else
;~ $sResult = _MySQL_Store_Result($MysqlVerbindung)
;~ $aResult = _MySQL_Fetch_Result_StringArray($sResult)
;~ _MySQL_Free_Result($sResult)
;~ _ArrayDelete($aResult,0)
;~ Return $aResult
;~ EndIf
;~ EndFunc ;==>_mysql_serverread
;~ Func _mysql_programsread(Const $MysqlVerbindung)
;~ _MySQL_Real_Query($MysqlVerbindung, "SELECT `programme`.`programme_name`, `programme`.`programme_version`, `programme`.`programme_publisher`, `programme`.`programme_path` FROM `technik`.`programme` WHERE `programme`.`server_id` = (SELECT `server`.`server_id` FROM `technik`.`server` WHERE `server`.`server_ip` = '192.168.1.1') ORDER BY `programme`.`programme_name` ASC;")
;~ If @error Then
;~ Return SetError(-1, @error, 0)
;~ Else
;~ $sResult = _MySQL_Store_Result($MysqlVerbindung)
;~ $aResult = _MySQL_Fetch_Result_StringArray($sResult)
;~ _MySQL_Free_Result($sResult)
;~ _ArrayDelete($aResult,0)
;~ Return $aResult
;~ EndIf
;~ EndFunc ;==>_mysql_programsread
;~ Func _Exit()
;~ $iReturn = MsgBox(4 + 48, "Achtung", "Soll das Programm wirklich beendet werden?")
;~ If $iReturn = 6 Then
;~ ; Verbindung beenden
;~ _MySQL_Close($MysqlConn)
;~ Sleep(300)
;~ ; MYSQL beenden
;~ _MySQL_EndLibrary()
;~ Exit
;~ EndIf
;~ EndFunc ;==>_Exit
Versuch es mal mit
DllCall("usb2.dll", "str", "UsbInit","int",0,"int",0)
oder
DllCall("usb2.dll", "wchar", "UsbInit","int",0,"int",0)
Denke das hat Sprenger damit gemeint
Ich denke es ist dein Script?
Kenne die Objekte leider nicht auswendig