1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Mahagon

Beiträge von Mahagon

  • AD Gruppenmitglieder in eine andere bestehende Gruppe einpflegen

    • Mahagon
    • 10. Juni 2010 um 16:33

    https://autoit.de/index.php?page…39&pageNo=1

    Das sollte dir helfen :)

    JuraX

    AD = Active Directory
    OU = organisation unit

  • Grafikfehler bei _GDIPlus_GraphicsFillRect

    • Mahagon
    • 10. Juni 2010 um 14:33

    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.

  • Anzahl der CPUs ermitteln

    • Mahagon
    • 10. Juni 2010 um 11:36
    Zitat von Antispeed

    Hmm

    Ich bin ja kein Prof. aber ich denke mal das würde funktionieren:
    Was passiert wenn man die Anzahl der CPUs die zurückgegeben werden mal durch vier teilt?

    [autoit]


    $ergebnis=$ergebnis/4

    [/autoit]

    :rolleyes: Also 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 32Bit

    Ich denke es liegt daran das deiner eine neue Technologie hat. Dann teilt man durch 4 sonst nicht.

    Alles anzeigen

    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 ^^

  • Anzahl der CPUs ermitteln

    • Mahagon
    • 10. Juni 2010 um 09:55

    Hm also unter Windows 7 wird es bei mir korrekt dargestellt (ohne Hyperthreading)

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_UseX64=n
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

    [/autoit] [autoit][/autoit] [autoit]

    Local Const $wbemFlagReturnImmediately = 0x10
    Local Const $wbemFlagForwardOnly = 0x20

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit]

    [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

    Spoiler anzeigen
    [autoit]

    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_UseX64=n
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

    [/autoit] [autoit][/autoit] [autoit]

    Local Const $wbemFlagReturnImmediately = 0x10
    Local Const $wbemFlagForwardOnly = 0x20

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit]
  • Anzahl der CPUs ermitteln

    • Mahagon
    • 9. Juni 2010 um 22:56

    So ich glaub ich habe es (hoffentlich :D)

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_UseX64=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

    [/autoit] [autoit][/autoit] [autoit]

    Local Const $wbemFlagReturnImmediately = 0x10
    Local Const $wbemFlagForwardOnly = 0x20

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit]

    Habe es unter Win7 x64 (QuadCore) und unter XPSP3 (Dual Core) in ner VM getestet

  • Array2String2Array

    • Mahagon
    • 9. Juni 2010 um 20:38

    vergiss nicht das Arrays bei 0 anfangen, also musste ein runter zählen ;)

  • Anzahl der CPUs ermitteln

    • Mahagon
    • 9. Juni 2010 um 20:29

    Hmm echt problematisch unter XP...


    Man könnte es eventuell noch folgendermaßen machen:

    Spoiler anzeigen
    [autoit]

    Local Const $wbemFlagReturnImmediately = 0x10
    Local Const $wbemFlagForwardOnly = 0x20

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit]

    Ist nur ziemlich unglücklich da man es pflegen müsste :S

  • [Frage] virtueller Pc

    • Mahagon
    • 9. Juni 2010 um 19:25

    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)

  • VIP Account

    • Mahagon
    • 9. Juni 2010 um 18:38

    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 ;)

  • [Frage] virtueller Pc

    • Mahagon
    • 9. Juni 2010 um 18:25

    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 )

  • [Frage] virtueller Pc

    • Mahagon
    • 9. Juni 2010 um 18:11

    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 ;)

  • Samba-Freigabe mit USER & PW

    • Mahagon
    • 9. Juni 2010 um 16:23

    Hm das ist glaub ich über einen Registryschlüssel möglich
    Du kannst aber auch nach dem Kopiervorgang das Laufwerk mit DriveMapDel löschen

  • Samba-Freigabe mit USER & PW

    • Mahagon
    • 9. Juni 2010 um 16:13

    Jop die Benutzerdaten hinterlegen ;)

    http://www.autoitscript.com/autoit3/docs/f…DriveMapAdd.htm

  • Informatik lernen, nur wo?

    • Mahagon
    • 9. Juni 2010 um 13:57

    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.

  • Pixel Farbe (n)

    • Mahagon
    • 5. Juni 2010 um 23:20

    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 ;)

  • Listview klicken

    • Mahagon
    • 5. Juni 2010 um 22:14

    Habs hinbekommen
    Danke ;)

  • Listview klicken

    • Mahagon
    • 5. Juni 2010 um 20:40

    Nein ich möchte das Item auslesen, wenn es angeklickt wurde.
    Das Auslesen ist nicht das Problem, aber das Klicken bringt mich zur Verweifelung.

  • Listview klicken

    • Mahagon
    • 5. Juni 2010 um 20:35

    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 :D
    Betroffen ist das Listview $cServerliste. Hoffe ihr könnt mir da fix auf die Sprünge helfen...^^

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #AutoIt3Wrapper_UseX64=n
    ;#####################################################################################################
    ;Includes;############################################################################################
    ;#####################################################################################################

    [/autoit] [autoit][/autoit] [autoit]

    ;~ #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>

    [/autoit] [autoit][/autoit] [autoit]

    AutoItSetOption('TrayAutoPause', 0)
    AutoItSetOption('TrayMenuMode', 1)

    [/autoit] [autoit][/autoit] [autoit]

    ;#####################################################################################################
    ;Konstanten;##########################################################################################
    ;#####################################################################################################

    [/autoit] [autoit][/autoit] [autoit]

    ;~ Global Const $sDbserver = 'localhost'
    ;~ Global Const $sDbuser = 'root'
    ;~ Global Const $sDbpassword = ''
    ;~ Global Const $sDbname = 'technik'

    [/autoit] [autoit][/autoit] [autoit]

    ;#####################################################################################################
    ;Herstellen der Verbindung;###########################################################################
    ;#####################################################################################################

    [/autoit] [autoit][/autoit] [autoit]

    ;~ _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

    [/autoit] [autoit][/autoit] [autoit]

    ;#####################################################################################################
    ;Grafische Oberflächen werden erstellt;###############################################################
    ;#####################################################################################################

    [/autoit] [autoit][/autoit] [autoit]

    $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)

    [/autoit] [autoit][/autoit] [autoit]

    ; ==> $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)

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    ;~ 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

    [/autoit] [autoit][/autoit] [autoit]

    ;~ 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

    [/autoit] [autoit][/autoit] [autoit]

    ;~ 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

    [/autoit]
  • Problem mit DLL Funktion

    • Mahagon
    • 5. Juni 2010 um 20:29

    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 ;)

  • WMPlayer.OCX ohne Video?

    • Mahagon
    • 5. Juni 2010 um 13:20

    Ich denke es ist dein Script?

    Kenne die Objekte leider nicht auswendig ;)

    http://msdn.microsoft.com/en-us/library/…v=VS.85%29.aspx

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™