Einsteiger braucht hilfe!

  • Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Guten morgen!

    Ich bin neu einsteiger und spiele gerade rum, und habe mir gedacht das ich mir eine eigene befehlzeileninterpreter bastell! ich bin soweit gekommen das ich ein inputbox genommen habe und eine Bat und es klapt leider nur mit einer zeile! Ich dachte mir das ich in weiter ferne mal sowas wie ein admin tool machen möchte! So zu dem problem ich habe eine schnell starter gebastellt nichts aufregenes nur ein fenster mit buttons wo c:\ , c:\Programme, oder c:\dokume..\username mit schnell aufgerufen werden.

    Ich wollte in der gui ein input oder edit einbauen, doch komm ich da nicht weiter, denn wenn ich das so mache wie bei der inputbox klapt es nicht.

    Beispiel ich nehme GUICtrlCreateEdit und las durch

    If Not _FileCreate("lc")Then
    MsgBox(4096, "Fehler", "Fehler beim Erstellen/Zurücksetzen der log.-Datei: " & @error)
    EndIf

    Sleep(1)
    filewrite("lc", $in)
    in die datei lc schreiben kommt da nur ein 8 rein und nicht das was ich geschrieben habe!

    So leute ich würde mich über hilfe sehr freuen!

    Ich habe großes interesse an prog nur leider haben ich noch wenig erfahrung! vierlen dank schon mal und ich hoffe das ich die datei im anhang mit dabei ist!

    Einmal editiert, zuletzt von kleiner27 (10. September 2009 um 11:06)

  • Vielen dank L3viathan2142 für deine schnelle antwort und das willkommen! :)


    Und ich habe es geschaft, als neulig weiß man ja noch nicht wie alles miteinander zusammenhängt!


    Das ist das Ergebniss!

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <GuiButton.au3>
    #include <WindowsConstants.au3>
    #include <GuiMenu.au3>
    #include <Process.au3>
    #include <GUIConstants.au3>
    #include <Date.au3>
    #include <GuiEdit.au3>
    #include <EditConstants.au3>
    #include <StaticConstants.au3>
    #include <File.au3>
    #include<ButtonConstants.au3>
    #include<Guilistview.au3>

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

    Opt("TrayMenuMode", 1)

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

    _Main()

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

    Func _Main()
    Local $hGUI
    Local $b1, $b2, $b3, $b4, $msg, $About, $Exit, $in, $bo, $al

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

    $hGUI = GUICreate("Sarter",401, 73, 875, 0, $WS_POPUP, $WS_EX_TOOLWINDOW)

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

    GUISetBkColor (0xbbfb15)

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

    $b1 = GUICtrlCreateButton("C:\Programme", 81, 2, 79, 20)
    $b2 = GUICtrlCreateButton("C:\", 1, 2, 79, 20)
    $b3 = GUICtrlCreateButton("User-Ordner",161, 2, 79, 20)
    $b4 = GUICtrlCreateButton("Anwen-Ordner",241, 2, 79, 20)
    $b5 = GUICtrlCreateButton("Tmp", 321, 2, 79, 20)
    $in = GUICtrlCreateInput("", 2, 50, 250, 20)
    $bo = GUICtrlCreateButton("OK", 260, 50, 79, 20)

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

    $widthCell = 70
    GUICtrlCreateLabel("Befehlzeile", 10, 28, $widthCell)

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

    TraySetClick("9")
    $About = TrayCreateItem("About")
    $Exit = TrayCreateItem("Exit")
    TrayTip("» Schnell-Starter « © by Siomon ", ">>>>>>>>>>> Zum Beenden <<<<<<<<<<<<" , 5, 1)

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

    GUISetState(@SW_SHOW)

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

    While 1

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

    $msg = GUIGetMsg()

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

    Select

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

    Case $msg = $b1
    _RunDOS("start c:\Programme")

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

    Case $msg = $b2
    _RunDOS("start c:\")

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

    Case $msg = $b3
    _RunDOS("start c:\dokume~1\%username%")

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

    case $msg = $b4
    _RunDOS("start c:\dokume~1\%username%\Anwendungsdaten")

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

    Case $msg = $b5
    _RunDOS("start c:\dokume~1\%username%\Lokale~1\Temp")

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

    Case $msg = $bo
    If $msg = $bo Then
    $al = GUICtrlRead($in, 1)
    EndIf
    If Not _FileCreate("lc")Then
    MsgBox(4096, "Fehler", "Fehler beim Erstellen/Zurücksetzen der log.-Datei: " & @error)
    EndIf

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

    Sleep(1)
    filewrite("lc", $al)
    Run("CS.exe", "", @SW_MINIMIZE)

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

    EndSelect

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

    $msg = TrayGetMsg()
    Select

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

    Case $msg = $Exit
    ExitLoop
    Exit

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

    Case $msg = $About
    MsgBox(64,"About","» Schnell-Starter «" & @CRLF & @CRLF &"© 2009 by Simon")

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

    EndSelect

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

    WEnd

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

    EndFunc

    [/autoit]


    Das es am ende doch einfacher wa als ich zuvor dachte hat mich sehr überrascht!8o

  • Danke für den tip L3viathan2142!


    Nach meiner meinung startet durch

    [autoit]

    ShellExecute("C:\Programme")

    [/autoit]

    schneller!

    Ich habe noch ein Problem mit der bat wenn man den dir befehl eingibt und es in ein verzeichniss vom user schicken will z.b c:\dokume~1\%username%\desktop klapt es nicht aber wenn ich z.b start c:\dokume~1\%username%\desktop dann übernimt er %username% mal sehen ich werde mal schaun! ?(


    Nachtrag!

    Ich habe das mit ( ShellExecute ) anders gelöst mit makros!


    [autoit]

    ShellExecute(@ProgramFilesDir)

    [/autoit]


    Nachtrag2!

    Habe es geschaft das problem mit der .bat datei zu lösen!


    bei ( call %send% )


    so geht es ( call | %send% )


    fals sie einer haben will habe ich beide ( CS.bat - CS.exe ) in den anhang geschoben !


    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.


    _

    2 Mal editiert, zuletzt von kleiner27 (10. September 2009 um 13:12)