Send Key Problem "@"

  • Hallo zusammen,

    vielleicht könnt Ihr mir auf die Schnelle helfen.
    Ich schreibe gerade ein kleines Script, welches E-Mails automatisiert versenden soll.
    Ich habe in einer Variablen eine E-Mail Adresse aus einer Excelzelle ausgelesen. Wenn ich mir die Variable per Messagebox anzeigen lassen, sehe ich die richtige E-Mail Adresse.
    Nutze ich jetzt den Befehel Send($Variablenname) gibt er mir den kompletten String nur ohne das "@"-Zeichen in der Mitte des Stings einfach weg. Wie kann das sein?Ich brauche bitte Eure Hilfe.

    Vielen Dank

    Gruß
    Shark1071

  • Hi K4z,

    merkwürdig... Das Problem ist dann müsste ich die Zellen in Excel wieder teilen und Variable1 & {@} und Variable2 per Send Key übergeben...
    Ich habe eine Zelle die ich auslese, z.B. abcdxyz@abcdxyz. Das packt er mir auch wunderbar in die Variable. Wenn ich die Variable per MSGBOX ausgebe zeigt er mir auch den kompletten Text an. Wenn ich allerdings per Send($Variable1) die Ausgabe mache, dann kommt folgendes raus: abcdxyzabcdxyz. Quasi alles außer das @Zeichen.
    Vielleicht als kleine ZusatzInfo:
    - Windows 7
    - Auslesen aus Excel 2010
    - Eingabe in Outlook 2010

    MFG
    Shark1071

    EDIT: Habe gerade mal folgendes probiert:
    send("{@}") --> wird auch nicht gesendet.

  • [autoit]

    $test = "rb@bytelink.ch"
    send($test)

    [/autoit]

    das funktioniert einwandfrei...

    zeig uns doch mal dein skript =)

  • So, hier mein Skript aber nicht lachen :)

    Spoiler anzeigen

    $xlsdir= "c:\Test\test.xls"
    $zaehlen=0
    $i=0
    ;Excel öffnen
    $app = ObjCreate("Excel.application")
    $app.Visible = true
    $open = $app.Workbooks.Open _
    ($xlsdir)


    $answer= inputbox("Mailanzahl", "Bitte Anzahl an Mails eingeben","","",-1,-1,0,0)


    For $i = 1 to $answer
    $zaehlen = $zaehlen + 1
    $RENR=$app.Cells($zaehlen,1).Value
    $Bestellnummer=$app.Cells($zaehlen,2).Value
    $Mail=$app.Cells($zaehlen,3).Value
    $Kundenname=$app.Cells($zaehlen,4).Value


    WinActivate("Posteingang")
    sleep(500)
    Send("!3")
    sleep(500)
    msgbox(4096, "mailadresse", $Mail)
    Send($Mail)
    Send("{@}")
    sleep(500)
    Send("{TAB 2}")
    Send($Bestellnummer)
    Send("!i")
    Send("a")
    Send("f")
    sleep(800)
    Send("C:\Test2\Rechnung "&$RENR)
    sleep(800)
    Send("{enter}")
    sleep(500)
    Send("!s")
    sleep(500)

    Next

  • verwende StringReplace!

    [autoit]


    $Mail = StringReplace ( $Mail, "@", "{@}")

    [/autoit]


    Das ersetzt den Klammeraffen durch {@} in der mailadressen-variable
    PS: für Skripte verwende doch zur besseren Übersicht folgenden code:

    Code
    [spoiler][autoit][/autoit][/spoiler]

    MfG. tobi_girst

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »tobi_girst« (Morgen, 25:63)

  • Hi tobi_girst,

    vielen Dank, aber wie es aussieht scheint es ein Systemproblem zu sein.
    Selbst mit dem Stringreplace keine Chance.
    Ich kann nicht mal über nen normalen send befehl ein @-Zeichen irgendwo hin senden :(

    MFG
    Shark1071

  • das geht :)
    dann muss i mir wohl eine Zwischenlösung bauen, bis jemand drauf gekommen ist, warum ich eine Zelle, die ein @Zeichen enthält, nur ohne das @Zeichen senden kann :(

    Aber danke dir erstmal.

    Gruß
    Shark1071

  • So wie das Script aussieht ist das ein automatischer mail sender , bitte nutze ihn anständig und nicht für spam weil alles was mit bots und co zu tun hat unterstützen wir hier nicht ;D , ansonsten , speicher deine scripte und tu mal autoit neu instalieren
    <--- hier neben unter downloads ;D

    MFG Jeahaha

  • Hi,
    ggf ein UTF8 / Ansi /UTF16 Problem?

    [autoit]

    stringtobinary()

    [/autoit]


    Btw, wieso überhaupt Send, wenn es eine Outlook-UDF gibt