proxy

    Hey, ich möchte das der Proxy im Script gesetzt wird. Bloß hab ich keine Ahnung wie ich das anstellen soll.
    den proxy speichert der in $p.

    jetzt möchte ich das noch aufrufen.
    Jemand ne ahnung wie?

    in der proxy.txt steht

    Zitat

    Httpsetproxy(2,"Proxyname:Proxyport","Username","Password")

    [autoit]

    func proxy()
    $msgboxp = msgbox(4,"Achtung","Proxy muss in der Proxy.txt gesetzt sein,falls getan bitte die JA drücken, falls nicht: Nein")
    If $msgboxp = 6 Then
    $p = fileread(@scriptdir & "\proxy.txt")
    msgbox(0,"Status","Proxy erfolgreich eingelesen")
    logfile("Proxy enabled")
    msgbox(0,"",$p)
    Else
    MsgBox(0,"Status","Es wurde kein Proxy ausgewählt")
    logfile("Proxy disabled")
    EndIf
    Endfunc

    [/autoit]

    sprich ich brauch sowas wie..add im script die var $p

    damit am anfang vom ganzen script der proxy steht

    Ich würde das Auslesen mittels Interpretation durch eine Funktion tätigen.
    In meinem Beispiel ist die Ausführung nochmals in einer anderen Funktion,
    sodass du mehrere Eingaben einlesen kannst, aber nur gewisse auch wirklich ausführst.
    Du kannst sie aber trotzdem (wenn du das nicht willst) beide Funktionen zu einer machen.

    Naja, wie dem auch sei, hier mein Ansatz:

    [autoit]

    $Eingelesen = 'Httpsetproxy(2,"Proxyname:Proxyport","Username","Password")';Steht normalerweise in deiner Datei
    ;aber der Auslesenprozess ist ja klar

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

    Einlesen($Eingelesen)

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

    Func Einlesen($String)
    $rex = StringRegExp($String, 'Httpsetproxy\((\d),"(.+)","(.+)","(.+)"\)', 3)
    If IsArray($rex) And UBound($rex) = 4 Then
    Ausfuehren($rex)
    EndIf
    EndFunc ;==>Einlesen

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

    Func Ausfuehren($aParam)
    ;Test Anfang:
    ;Die Schleife dient NUR zur Kontrolle, obs klappt (bei Verwendung löschen!)
    For $i = 0 To UBound($aParam) - 1
    MsgBox(0, 0, $aParam[$i])
    Next

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

    ;Test Ende!
    HttpSetProxy($aParam[0], $aParam[1], $aParam[2], $aParam[3])
    EndFunc ;==>Ausfuehren

    [/autoit]

    Wer immer nur das tut, was er bereits kann - wird auch immer nur das bleiben, was er bereits ist!