Problem mit MSC Console Computer Management / IIS / FTP Server

  • Hallo, ich möchte die Computer Management MSC Console öffnen und dann automatisch auf die Default FTP Site springen.
    Ich hab ein den Befehl dafür schon gefunden, aber dabei ein Problem festgestellt.

    Wenn ich wie im folgenden Code angegeben automatisch auf die Default FTP Site gehen möchte geht es nicht

    [autoit]

    ShellExecuteWait(@SystemDir & "\compmgmt.msc")
    WinWait("Computer Management", "")
    WinActivate("Computer Management", "")
    ControlTreeView("Computer Management", "", "[Class:SysTreeView32; Instance:1]", "Select", "Computer Management (Local)|Services and Applications|Internet Information Services (IIS) Manager|FTP Sites|Default FTP Site")

    [/autoit]

    Wenn ich aber dann die Computer Management Console manuell öffne, einmal auf die Default FTP Site klicke und dann auf einen beliebigen Punkt wie Disk Management. Dann führt er den ControlTreeView Befehl richtig aus

    [autoit]

    WinWait("Computer Management", "")
    WinActivate("Computer Management", "")
    ControlTreeView("Computer Management", "", "[Class:SysTreeView32; Instance:1]", "Select", "Computer Management (Local)|Services and Applications|Internet Information Services (IIS) Manager|FTP Sites|Default FTP Site")

    [/autoit]

    Anbei noch, es handelt sich um einen Windows Server 2003 Standard Englisch!
    Kennnt jemand dieses Problem und gibt es dafür eine Lösung?

    Danke schon mal im vorraus!

    Gruß,
    Stefan

  • hab ich versucht und hat nicht funktioniert.
    Selbst wenn ich die Computer Management Console manuell öffne und dann

    [autoit]

    WinWait("Computer Management", "")
    WinActivate("Computer Management", "")
    ControlTreeView("Computer Management", "", "[Class:SysTreeView32; Instance:1]", "Select", "Computer Management (Local)|Services and Applications|Internet Information Services (IIS) Manager|FTP Sites|Default FTP Site")

    [/autoit]

    ausführe geht es nicht.
    Erst wenn ich einmal manuell auf Default FTP Site geklickt habe.
    Dann kann ich irgendwo hin navigieren oder die Baumstruktur wieder schließen und er springt nach dem ausführen des Scipts automatisch hin...
    Ich verstehe dieses Verhalten der MSC nicht :cursing:

  • msc ? So wird es nix mit den MOC Kursen :)
    MMC heissen die Dinger Microsoft Managment Console

    Du kannst auch eine reine IIS MMC, gib mal unter Start Ausführen das hier ein: iis.msc

    weitere hier http://www.wintotal.de/Tipps/index.php?id=875

    Man kann sich auch eine MMC individuell anpassen, vielleicht trifft er dann besser ;)

    Achtung Anfänger! :whistling:

    Betrachten des Quellcodes auf eigene Gefahr, bei Übelkeit,Erbrechen,Kopfschmerzen übernehme ich keine Haftung. 8o

    Einmal editiert, zuletzt von Dietmar (2. Dezember 2008 um 19:21)

  • Hi,
    ja das die Microsoft Management Console heißen weis ich schon :D

    Mit der MMC für den IIS habe zuvor mit der gleichen Methode versucht und das gleicher Ergebnis erziehlt.
    Daher hab ich gedacht ich versuchs mal mit der MMC vom Computer Management, da ich darauf später sowieso zugreifen muss.
    Ich habe so das Gefühl, es liegt an den ganzen MMC selbst.
    Auch das AutoIt Window Info Tool kann meistens nur "Hidden Text" herauslesen und wenig brauchbares für die Control******* Methoden.

    Leider kann man den IIS bzw. den FTP nicht per Command Line konfigurieren.
    Zumindest konnte ich nach vielem Googeln nur WSH oder VB Scripte dazu finden...

    Da ich aber alles andere schon mit AutoIt gelöst habe, möchte ich weitgehend ohne Fremdapplikationen Scripte arbeiten.

    Gruß,
    Stefan

  • Was hast Du denn konkret vor, auch bei Windows brauch man nicht immer eine Maus.

    Achtung Anfänger! :whistling:

    Betrachten des Quellcodes auf eigene Gefahr, bei Übelkeit,Erbrechen,Kopfschmerzen übernehme ich keine Haftung. 8o

  • Ich möchte den FTP vom IIS vorkonfigurieren und für gewisse Partitionen virtuelle Drives erstellen.
    Jetzt habe ich fürs erste, eine Lösung gefunden, aber wie man es gleich im Code sieht, nicht gerade die sauberste.
    Ich hab von einem Kollegen einen Tip bezüglich WMI und dementsprechende Referenzen im MSDN Portal bekommen.
    Da muss ich mich dann erst noch einlesen, wie das genau funktioniert.
    Als Anfänger, kann dauert dies wohl länger :evil:

    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=GELogo.ico
    #AutoIt3Wrapper_Res_Fileversion=1.0
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

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

    ;Ordner temp unter C:\ erstellen
    DirCreate ("C:\temp")

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

    ;IIS Manager starten
    ShellExecute(@SystemDir & "\inetsrv\iis.msc")
    WinWait("Internet Information Services (IIS) Manager", "")
    WinActivate("Internet Information Services (IIS) Manager", "")
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "{DOWN}{RIGHT}{DOWN}")
    Sleep(1000)
    Send("ftp")
    Sleep(1000)
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "{RIGHT}")
    Send("default")
    Sleep(1000)
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!ar")

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

    ;FTP konfigurieren
    WinWait("Default FTP Site Properties")
    WinActivate("Default FTP Site Properties")
    Sleep(1000)
    Send("!m{DEL}2!e")
    Sleep(1000)
    ControlCommand("Default FTP Site Properties", "", "SysTabControl321", "TabRight", "")
    Sleep(1000)
    send("!o")
    WinWait("IIS Manager")
    WinActivate("IIS Manager")
    send("!y")
    WinWait("Default FTP Site Properties")
    WinActivate("Default FTP Site Properties")
    ControlCommand("Default FTP Site Properties", "", "SysTabControl321", "TabRight", "")
    Sleep(1000)
    ControlSend("Default FTP Site Properties", "", "RichEdit20A2", "Hello (ftp on " & @ComputerName & ")")
    ControlSend("Default FTP Site Properties", "", "Edit1", "Bye")
    ControlSend("Default FTP Site Properties", "", "Edit2", "Max. Connections Reached")
    ControlCommand("Default FTP Site Properties", "", "SysTabControl321", "TabRight", "")
    Sleep(1000)
    Send("!oc:\temp{ENTER}")
    Sleep(1000)

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

    ;virtuelle Drives erstellen
    WinActivate("Internet Information Services (IIS) Manager", "")

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

    $drive_c = DriveStatus( "c:\" )
    If $drive_c = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveC")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "c:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinActivate("Internet Information Services (IIS) Manager", "")
    Send("Default")
    Sleep(2000)

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

    $drive_e = DriveStatus( "e:\" )
    If $drive_e = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveE")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "e:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinActivate("Internet Information Services (IIS) Manager", "")
    Send("Default")
    Sleep(2000)

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

    $drive_h = DriveStatus( "h:\" )
    If $drive_h = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveH")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "h:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinActivate("Internet Information Services (IIS) Manager", "")
    Send("Default")
    Sleep(2000)

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

    $drive_i = DriveStatus( "i:\" )
    If $drive_i = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveI")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "i:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinActivate("Internet Information Services (IIS) Manager", "")
    Send("Default")
    Sleep(2000)

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

    $drive_r = DriveStatus( "r:\" )
    If $drive_r = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveR")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "r:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinActivate("Internet Information Services (IIS) Manager", "")
    Send("Default")
    Sleep(2000)

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

    $drive_f = DriveStatus( "f:\" )
    If $drive_f = "READY" Then
    ControlSend("Internet Information Services (IIS) Manager", "", "SysTreeView321", "!anv")
    WinWaitActive("Virtual Directory Creation Wizard", "")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "DriveF")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button2")
    ControlSend("Virtual Directory Creation Wizard", "", "Edit1", "f:\")
    ControlClick("Virtual Directory Creation Wizard", "&Next", "Button3")
    Send("!w!n")
    ControlClick("Virtual Directory Creation Wizard", "Finish", "Button9")
    Sleep(1000)
    EndIf

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

    WinClose("Internet Information Services (IIS) Manager", "")

    [/autoit]