Zahlwert aus String auslesen

  • btw: Warum funzt mein script ned? xD

    edit: pee hat mir geholfen...xD

    da es ja mehrere ergebnisse geben könnte isses nen array und deshalb wäre der richtige code:

    [autoit]

    #include <String.au3>
    #include <Array.au3>
    $Blub = "Sie haben $100.00 gewonnen"
    $amount = _StringBetween($Blub, "$", " " )
    _ArrayDisplay($amount, "Gewinn")

    [/autoit]

    Dieser Beitrag wurde 9521 mal editiert, zum letzten Mal von Blubkuh: Morgen, 02:28.

    [autoit]

    If Not $Elephant Then $Irelephant = True

    [/autoit]

    Einmal editiert, zuletzt von Blubkuh (21. Februar 2007 um 21:12)

  • Hallo!

    hier ist meine Lösung, sicher nicht so brilliant, aber auch immer ne Frage, wie oft und wieviele Daten werden da "konvertiert".

    Hier ne einfache und ausbaufähige Anfängerlösung, die bei mir im Kundeneinsatz ist und Buchungsstellen säubern muß (falls da wieder so ein Äggsberde Text drin erfasst hat, war bei meiner Integration aber nicht kommen darf).

    ; test_31.au3
    ; Beispiel fuer Usergroup

    $Variable = "Sie haben $0,37 gewonnen"

    $cleanit=StringToNum($Variable)
    msgbox(0,"Sauber sieht dess so aus",$cleanit)


    Func StringToNum($stringtoconv)

    Local $Hilf, $i, $convString
    $aryChar = StringSplit($stringtoconv, "")
    ; jetzt hab ich das Teil im array

    For $i = 1 To $aryChar[0]
    ; nur Ausgabe wenn Integer Wert
    $checkstring=StringIsInt($aryChar[$i])
    if $checkstring=1 then
    $convString = $convString & $aryChar[$i]
    EndIf
    if $aryChar[$i]='.' then
    ;msgbox(0,"Punkt gefunden","HUHU")
    $convString = $convString & $aryChar[$i]
    EndIf
    if $aryChar[$i]=',' then
    ;msgbox(0,"Komma gefunden","HUHU")
    $convString = $convString & $aryChar[$i]
    EndIf


    Next

    Return $convString

    EndFunc

    ===========================================

    es grüßt Euch

    German