Beiträge von kesandal

Hallo,
ich habe leider ein Problem mit einem 2dim. Array.

Fehler:

==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
ConsoleWrite($rees[1][$k] & @CRLF)
ConsoleWrite(^ ERROR

Mein Quelltext:

While $j <= UBound($rees)-1

; String-Anfänge säubern
If StringInStr($rees[$j],'"odd"') = 0 Then
$rees[$j] = StringMid($rees[$j],8)
Else
$rees[$j] = StringMid($rees[$j],7)
EndIf

; Aktuellen Array-Eintrag nochmals nach <td> splitten
; <tr><td>xx</td><td>yy</td></tr>
; =>
; <td>xx</td>
; <td>yy</td></tr>

$rees[$j] = StringSplit($rees[$j],'<td>',1)

$k=1
ConsoleWrite("===========================" & @CRLF)
While $k <= UBound($rees[$j])-1
ConsoleWrite($rees[$j][$k] & @CRLF)
$k+=1
WEnd

$j+=1
WEnd

Hat jemand eine Idee woran es liegen kann?

Danke
Kesandal

Besten Dank.

Damit klappt es super

Hallo,

leider habe ich ein Problem mit der oben beschriebenen Funktion.

Ich möchte eine Liste mit Mehrfachauswahl haben. Dabei soll Eintrag X vorausgewählt sein.

Mein Ansatz:

$o = GUICtrlCreateList("", 320, 120, 177, 84, BitOR($GUI_SS_DEFAULT_LIST,$LBS_MULTIPLESEL))
GUICtrlSetData(-1, "A|B|X|Y", "X")

Leider ist aber nichts ausgewählt.
wenn ich das BitOR entferne, also die Mehrfachauswahl daktiviere, klappt es.

Hat jemand eine Idee?

Danke
Kesandal

Hallo,

zunächst mein Code:

$file = FileOpen(@ScriptDir & "\test.txt", 1)

while..........
$arr = StringRegExp($Nachricht.Body,"[0-9\-_]?[a-z0-9.\-_]+[a-z0-9\-_]?@[a-z.-]+\.[a-z]{2,}",3)
_FileWriteFromArray($file,$arr)
wend

FileClose($file)

Ich gehe E-Mails durch und möchte alle Adressen in meine Text-Datei abspeichern.
Die Text-Datei wird zwar angelegt aber bleibt leer.

Mit _ArrayDisplay($arr,"test") bekome ich das Array angezeigt welches auch gefüllt ist. Hier solte der Fehler also nicht sein.

Hat jemand von Euch eine Idee?

Danke im Voraus,
Kesandal

den thread meinst du .. achsooo

Ja, das klappt(e) auch super

Ich weiß aber nicht wie ich das $Message.Copy anwenden soll, das ist mein Problem.
Die ganzen Prüfungen drumrum wann sie verschoben wird usw. krieg ich hin.

Ich weiß halt nicht wie ich ihm sage Verschiebe aktuelle Mail (an die komme ich ja durch meine For-schleife) in Ordner "123".

Hm... Habe vorhin die ganze Zeit im Forum gesucht aber nix gefunden.
Ich schaue nochmal. sollte ich es finden poste ich den link rein

Edit: Ich glaub ich bin blind.. bis jetzt gesucht, aber nix gefunden was mit kopieren von emails über COM zu tun hat

Hallo zusammen,

was ich machen möchte:
bestimmte E-Mails aus dem Standard-Outlook Ordner in einen anderen Kopieren z.B. Ordner_Neu.
Danach soll die Mail aus dem Standard-Ordner gelöscht werden.

Mein Problem ist das Kopieren. Das kriege ich leider nicht richtig hin.
Das löschen mache ich mit $Nachricht.Delete().

Durch ein wenig googlen habe ich herausgefunden, dass $Nachricht.Copy.... mich weiterbringen könnte.
Jedoch weiß ich nicht wie ich dies anwende

Kann mir jemand von Euch helfen ?
Habe hier folgendes Konstrukt:

$oOutlook = ObjCreate("Outlook.Application") ;Starte das Outlook Com Objekt
$oMAPI = $oOutlook.GetNameSpace ("MAPI")
$InboxItems = $oMAPI.GetDefaultFolder ($oOutlookFolderInBox).Items ;Lese alle daten aus der "Inbox"

For $Pos = $InboxItems.Count To 1 Step - 1
$Nachricht = $InboxItems.Item ($Pos)
$SenderDomain= StringTrimLeft($Nachricht.SenderEmailAddress, StringinStr($Nachricht.SenderEmailAddress, "@"))
...

Gruß,
Kesandal

mein Konstrukt zu begin war:

If $Active = 1 Then
; bla
Endif

nur das hat der liebe Herr Compiler mir nicht angenommen... Bzw. angenommen schon nur der Code lief nicht so wie er sollte...

Edit: gelöst mit int()

Zitat

Original von peethebee
Wie schon in der Shoutbox gesagt: Er liest einen String ein, der "0" ist - und eben kein Int. Testen kannst du es mit den StringIs...-Funktionen...

peethebee

War 10min nach meiner Frage off daher nicht mehr gelesen

@Antwort: Aaah okey...

ob mir aber vllt.

int()
; bzw.
number()

hilft ?

Brauche am Ende eine "richtige" Zahl um mit If's arbeiten zu können

Hallo zusammen,
ich versuche mich mal kurz zu fassen

Aus einer Ini-Datei lese ich ein:

Local $configLoad= IniReadSection($AppPath &"\config\general.ini","bla")
$Active = $configLoadf[1][1]

Der Inhalt der ini-File ist folgender:

[bla]
active=1

oder auch active = 0

......

In meiner $Active habe ich dann auch dementsprechend die 1 oder 0.. .Das klappt...

Wenn ich jedoch nun IsInt($Active) ausführe bekomme ich ein "false" zurück....

Nun meine Frage, ist das generell so beim einlesen von "anscheinend-Zahlen" aus Ini-Files ?

Gruß,
k

Danke Alina.
Habe nen riesen Denkfehler gemacht *schäm*...

%temp% = c:\temp....

kein Wunder das sich die Konsole gleich schließt...
Da war ja auch nix drinnen

Dennoch vielen Dank,

K

Hallo zusammen,
versuche gerade verzweifelt folgenden Befehl auszuführen

RunWait(@ComSpec & ' /c del /F /S /Q "%temp%"', "")

Es öffnet sich einfach nur das CMD-Fenster und schließt sich. Gelöscht aus dem Ordner wird jedoch nichts

Hat jemand von Euch eine Idee wo der Fehler liegt ?
Und kriege ich auch mehrere Dos-Befehle hin ? Z.B. 5 weitere....

Gruß,
K

Ich glaub ich mache etwas falsch

Wenn ich es starte kommt nen paar Mal "Zugriffsversuch auf Outlook-Daten bla bla..."
Ich klicke auf ja und nichts geschieht.... Nach ner min (glaube das sind deine sleep(60000) kommt wieder das gleiche und nix geschieht

// €dit: Es klappt ! Mein Fehler, hehe

Merci Spider !

WinActivate ("Posteingang - Microsoft Outlook", "")
$var = ControlGetText("Posteingang - Microsoft Outlook", "", "2748")
Msgbox (4096, "Test", $var)

Liefert mir nichts zurück ....

Hallo zusammen,
ich suche eine Möglichkeit, dass Autoit bei einer Mail nach bestimmten Wörtern sucht..

Z.B. Kommt eine E-Mail an in Outlook 2003, Autoit sieht in in der rechten Spalte und schaut ob da ein Wort drin vorkommt (z.B. Fritz)...
Wenn ja, soll Funktion xyz ausgeführt werden...

Nun dachte ich mein erster Schritt wäre, in eine Variable den E-Mail Inhalt zu speichern. - Hier scheiter ich jedoch

- Die Mails sind alle im Textformat ! Keine Html-Mail ist dabei.

Hat jemand von Euch eine Lösung?

Auf autoitscript.com habe ich im Forum ein Script gefunden. Es tut genau das was ich will, aber mit dem Notepad...

Const $Applhandle = WinGetHandle("classname=rctrl_renwnd32")
Const $Ctrlhandle = ControlGetHandle("","",2748)

habe ich selber angepasst.

Wenn ich mit Au3Info auf das Vorschaufenster in Outlook zeige erhalte ich folgende Informationen:

>>>> Window <<<<
Title:	Posteingang - Microsoft Outlook
Class:	rctrl_renwnd32
Position:	-4, -4
Size:	1288, 1004
Style:	0x17CF0000
ExStyle:	0x00040100


>>>> Control <<<<
Class:	RichEdit20W
Instance:	4
ID:	8224
Text:	
Position:	600, 224
Size:	663, 732
ControlClick Coords:	101, 28
Style:	0x51201844
ExStyle:	0x00000000


>>>> Mouse <<<<
Position:	701, 252
Cursor ID:	5
Color:	0xFFFFFF


>>>> StatusBar <<<<
1:	3 Elemente
2:	


>>>> Visible Text <<<<
MsoDockTop
Standard
Kontaktnamen eingeben
Menüleiste
Frage hier eingeben
WunderBar
NUIDocumentWindow
3 Elemente
Tabellenansicht
Betreff
Willkommen bei Microsoft Office Outlook 2003
Von
Outlook 2003-Team [olteam@microsoft.com]
An:
Neuer Outlook-Benutzer
Anlagen:
Anlagen
 ;  ;  ;  ;  ;  ;  ;  ;  ;  ;  
Nachricht
Nachricht
Nachricht
 	Herzlich willkommen bei Microsoft® Office Outlook® 2003! [....]
Vielen Dank!
Ihr Outlook-Team 	


>>>> Hidden Text <<<<
MsoDockLeft
MsoDockRight
Aufgabenbereich
Web
outlook:today
MsoDockBottom
Cc:
DAL=on
MsoWorkPane
Alle Nachschlagewerke

Zitat

Original von gtaspider
Hallo!

Meinst du soetwas?:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

$guio = GUICreate("")
GUISetState()
$guic = GUICreate("",100,100,5,5,$WS_POPUP,$WS_EX_MDICHILD,$guio)
ConsoleWrite(WinSetTrans($guic,"",50) & @CRLF)
GUICtrlCreateEdit("BlaBla",0,0,100,100)
GUISetState()

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

[/autoit]

Mfg Spider

Alles anzeigen

Momment bitte, das muss ich mir genauer anschauen

Ich möchte aber, dass durch die Transparenz der Editbox ein dahinter liegendes Bild leicht sichtbar wird

Hallo zusammen, gibt es eine Möglichkeit eine Editbox transparent zu machen ?
Oder notfalls ein Hintergrundbild für meine Editbox setzen....
Gruß,

kesa

Ja

Vielen Dank !

Kesa

Ja

Denn er soll die m_Global() so lange ausführen, bis das Programm beendet wird