Beiträge von EIZO

Den Pfad habe ich gerade im Explorer auf dem Domino-Server kopiert:
E:\Lotus\Domino\Data\xxxAllgemein

Darunter liegt die LandmaschinenKunden.txt :-?

Hab´s gerade nochmal x-ten mal kontrolliert - Pfad stimmt ! :-?

Also im Agent hat "2. Beschränkte Operation zulassen".
Im Serverdokument steht unter "Beschränkte LotusScript/Java-Agenten ausführen:" der Server selbst und unter anderem meine Wenigkeit.
Und signiert ist dei DB mit der Server-ID.

Hallo zusammen,

habe mir unter
http://www-10.lotus.com/ldd/sa…6df2006561e9?OpenDocument
die DB für den .csv bzw. .txt Import (geht ja beides) angepaßt und funktioniert auch einwandfrei, solange ich es lokal auf meinem PC ausführe.
Dabei liegen meine NotesDB und die .txt im selben Verz. E:\Programme\lotus\notes\data\Test-Abteilung.
Pfad im Script:
fileName$ = "E:\Programme\lotus\notes\data\Test-Abteilung\LandmaschinenKunden.txt" ' Location of your file

Jetzt möchte ich das ganze auf dem Server ausführen. Hier liegen die NotesDB und die .txt ebenfalls im selben Verz.

Sub Initialize
Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim fileNum As Integer, cells As Integer, k As Integer
Dim fileName As String
Dim InputStr As String, delimiter As String
Dim FieldArray As Variant

fileNum% = Freefile()
fileName$ = "E:\Lotus\Domino\Data\xxxAllgemein\LandmaschinenKunden.txt" ' Location of your file
delimiter = ";" ' Delimiter of your file
cells = 8 ' How many cells + 1
k = 0

Open fileName$ For Input As fileNum%
Do While Not Eof(fileNum%)
Line Input #1, InputStr$
FieldArray = parseall(InputStr$, delimiter, cells)
response% = CreateDocument(FieldArray)
k = k + 1
Print "Document Created: " + Cstr(k)
Loop
Close fileNum%
End Sub

Hier kommt aber der Fehler „Unable to open file“

Ich nehme mal an, daß die Pfadangabe auf dem Server anders lauten muß ?
Hab´s auch schon versucht, funktioniert aber nicht.

Kann mir bitte einer sagen wie ?

Vielen Dank schon mal im voraus.

Gruß Siggi

So, ich muß noch mein Ergebniss posten.
Hat etwas gedauert, da ich leider für einige Zeit nicht im Einsatz war.

Danke erstmal für Deinen Tipp.

Habe es aber leider nicht so hinbekommen, wie´s jetzt funzt. Deshalb habe ich mich an unseren externen Programmierer gewendet.
Und ich bin überzeugt, daß war auch besser so

Hier also der Code für @Picklist und @DbLookup:

_FieldList :="KDNR":"Name30":"Name2":"Strass":"PLZ":"Ort":"Telef1":"Telef2";
_server := @Subset(@DbName; 1);
_Addressstring := @PickList ([Custom]:[Single]; _server:"xxxAllgemein\\ksrdblkd.nsf";"AdressLookup";"Adressen";"Bitte Wählen Sie aus";9);
@For (i:=1;i<=@Elements(_FieldList);i:=i+1;

@SetDocField (@Text(@DocumentUniqueID);_FieldList[i];@Word(_Addressstring;"~~";i))
)

________________________________

_FieldList :="KDNR":"Name30":"Name2":"Strass":"PLZ":"Ort":"Telef1":"Telef2";
_server := @Subset(@DbName; 1);
REM {@Prompt([Ok];"";_server);};
_Addressstring := @DbLookup ("":"";_server:"xxxAllgemein\\ksrdblkd.nsf";"AdressLookup";@Text(KDNR);9;[FailSilent]);
REM {@Prompt([Ok];"";_Addressstring);};
@For (i:=1;i<=@Elements(_FieldList);i:=i+1;

@SetDocField (@Text(@DocumentUniqueID);_FieldList[i];@Word(_Addressstring;"~~";i))
)

Gruß Siggi

Hallo zusammen,

ich beschäftige mich zum erstenmal mit DECS und daraus resultierend mit DbLookup, DbColumn, @Picklist.

Mit DECS hole ich mir aus einer Access-DB die Daten in eine Notes-DB (DECSTest.nsf)

Name: Text
Vorname: Text
Strasse: Text
PLZ: Text
Ort: Text

Name der Ansicht = Knr

In einer anderen Notes-DB (DECSTest_dblookup) gibt es die selben Felder.

Name: Dialogliste
Vorname: Text
Strasse: Text
PLZ: Text
Ort: Text

Name der Ansicht = Knr

Ich möcht nun in der DECSTest_dblookup mit dem Feld „Name“ (Dialogliste) die Werte aus DECSTest.nsf auslesen und alle andern Felder sollen automatisch gefüllt werden.

Die Werte anzeigen habe ich mal mit diesen beiden Formeln versucht und es funktioniert auch:
@PickList ( [Custom]; „Server" : "Allgemein\\DECSTest.nsf"; "Knr"; ""; "Adresse"; 2 )

@DbColumn ( "" : "No Cache"; "Server" : "Allgemein\\DECSTest.nsf"; "Knr"; 2)

Was muß ich aber tun, wenn ich nun einen Namen aus der Liste auswähle und dann die anderen Felder automatisch mit den dazugehörigen Werten ausgefüllt werden sollen?

In der Designerhelp finde ich dazu nichts.

Wäre nett, wenn Ihr mir dazu helfen würdet.

Vielen Dank schon mal im voraus.

Gruß Siggi

Bernhard:

Hallo Bernhard,

nein mir stellt es nicht die Nackenhaare auf. Der Ton macht die Musik ! Und diese Töne klingen doch schon ganz anders

Also:

Den Code hat unser externer Programmierer geschrieben, der aber momentan nicht erreichbar ist (der gute Mann hat sicher auch mal Urlaub verdient).
Deshalb habe ich versucht das evtl. hier zu klären.

Der Agent mit @MailSend incl. DocLink funktioniert und ich habe ihn in der selben DB geschrieben.
Aber erst als, wie Du richtig vermutest hast, ich wieder eine Default View definiert habe.

Ich hatte im log dazu folgende Meldung gefunden:
Couldn't get default View id for database

Dazu folgenden Thread:
http://atnotes.de/index.php/to….msg111553.html#msg111553

Warum diese plötzlich nicht mehr definiert war ....... keine Ahnung.

Ich hielt dies nicht für erwähnenswert, da ich ja den eigentlichen Fehler gefunden habe ( so dachte ich zumindest).

Trotzdem - nachdem es jetzt wieder eine Default View gibt, funktioniert das Script immer noch nicht ?????

Ich habe jetzt noch folgendes festgestellt:

Stelle ich den Script-Agent auf "Vor Eingang neuer Mail" um, erhält der User einen DocLink. Klickt er darauf, kommt die Meldung "Dokument wurde gelöscht".
Die Fehlermeldung wäre mir ja noch klar, aber der DocLink???

Wenn Ihr einverstanden seit, warte ich bis unser Programmierer wieder zurück ist ?

Ich kann mit meinem @MailSend incl. DocLink-Agent auch gut leben.
Der Unterschied ist, daß beim Script Agent dem User als Absender die Mail-DB angezeigt wird (dürfte wohl daran liegen: doc.principal="xxx").
Beim @Formula-Agent steht der Server drin.

Außerdem würde es mich schon interessieren, warum der Agent plötzlich nicht mehr mag.

Ich bedanke mich trotzdem für Eure Hilfe und wünsche allen einen guten Rutsch ins neue Jahr.

Gruß Siggi

Die Mail gibt folgendes ohne DocLink aus:

Bitte klicken Sie auf die Verknüpfung !Kein Document gefunden

Die Live-Konsole gibt folgendes aus:

29.12.2008 17:26:38 Router: Message 0036CD42 delivered to xxx
29.12.2008 17:26:56 AMgr: Agent 'MailWeiterleitung' in 'fschemiet.nsf' added as a new mail triggered task
29.12.2008 17:26:56 AMgr: Agent 'MailWeiterleitung' is scheduled to run next at: 29.12.2008 17:27:56

29.12.2008 17:27:57 AMgr: Start executing agent 'MailWeiterleitung' in 'fschemiet.nsf' by Executive '2'
29.12.2008 17:27:57 AMgr: 'xxx' is the agent signer of agent 'MailWeiterleitung' in 'fschemiet.nsf'
29.12.2008 17:27:57 AMgr: 'Agent 'MailWeiterleitung' in 'fschemiet.nsf' will run on behalf of 'xxx'
29.12.2008 17:27:58 Router: Message 005A7360 delivered to xxx
29.12.2008 17:27:59 Router: Message 005A7360 delivered to xxx
29.12.2008 17:27:59 Router: Message 005A73D5 delivered to xxx

Die Mail ist also bei der "Weiterleitung" definitiv vorhanden, was ich ja auch in der entsprechenden DB im Eingang sehe.

Gruß

Zitat

Woher kommen denn diese Documente? Sind das Maildocumente und werden in diese Application geschickt?

Ja, das sind ganz normale externe Mails, die an diese DB gesendet werden und dann eben mit DocLink an die User weitergeleitet werden.

Kannst ja mal folgendes Testweise bauen:

if nOrgDoc is nothing then


Call nRTI.AppendText("Kein Document gefunden") 


else


Call nRTI.AppendDocLink(nOrgDoc,"Bitte klicken Sie auf die Verknüpfung !") 


end if

Wo muß ich denn den Code reinschreiben od. mit einfügen?
Wie schon erwähnt - ich kenne mich mit Script Null aus :-?

Hallo zusammen,

der folgende Agent (ist nicht von mir, da ich kein Lotus Script kann) hat bis jetzt immer funktioniert:

Sub Initialize
Dim session As New notessession
Dim db As notesDatabase
Dim nOrgDoc As notesdocument
Dim doc As notesdocument
Dim nRTI As NotesRichTextItem
Dim res As Boolean

Set db= session.currentdatabase
Set doc = New notesDocument (db)

Set nOrgDoc = session.DocumentContext

Set nRTI = New NotesRichTextItem( doc, "Body" )

doc.form = "Memo"
doc.SendTo="xxx"
doc.recipient="xxx"
doc.CopyTo="xxx"
doc.principal="xxx"
doc.subject = "Mailweiterleitung von xxx"

Call nRTI.AppendText("Bitte klicken Sie auf die Verknüpfung !")
Call nRTI.AppendDocLink(nOrgDoc,"Bitte klicken Sie auf die Verknüpfung !")


Call doc.send( False)
End Sub

Die Mails werden "Nach Eingang neuer Mail" zugestellt, jedoch seit neuestem ohne DocLink.

Geändert wurde meines wissens nichts am Agent.

Habe zum Test folgenden Agent erstellt (ebenfalls "Nach Eingang neuer Mail"):

@MailSend("xxx";"xxx";"";"Mailweiterleitung von xxx";"Bitte klicken Sie auf die Verknüpfung!";"";[IncludeDoclink]);

Damit funktionierts wieder:

Vielen Dank schon mal im voraus für Eure Hilfe.

Gruß Siggi

So, hat ein wenig gedauert, bis die Sachlage geklärt war.

Die Anforderung läßt sich mit einfachen Aktionen nicht machen. Laut unserm externen Programierer, der das ganze mit Script machen würde (mit @Formula würde es zu unübersichtlich werden), benötigt er ca. 4 Stunden.

Das ganze wurde vom zuständigen Abteilungsleiter erstmal gestoppt, da ihm nicht bewußt war, wie groß der Aufwand ist.
Jetzt wird erstmal das Mailverhalten des Users beobachtet und dann nochmal neu entschieden.

Trotzdem Danke für Eure Infos.

Gruß Siggi

Hallo zusammen,

ich muß nochmal auf meinen Thread
http://www.dominoforum.de/modu…id=110899#forumpost110899
zurückkommen:

Wie dort schon erwähnt, wird jeder User der extern Mailen darf, im Konfigurationsdok unter "Nur Mail zulassen, die von diesen Notes Adressen an das Internet gesendet wird:" eingetragen.

Da ein bestimmter User bis jetzt nur intern Mailen durfte, habe ich ihn dort gar nicht erst eingetragen. Soweit auch alles in Ordnung.

Dieser User soll aber jetzt zusätzl. das Recht erhalter, extern nur ! an die @xxx.com Mails zu senden und von dieser empfangen zu können.

Ich habe mir die ganze SMTP-Ein und Ausgagsst. angesehen, aber nichts gefunden, wie ich das lösen könnte.

Läßt sich das überhaupt im Domino bewerkstelligen?

Gruß Siggi

taurec, Diali:

Erstmal danke für Eure Geduld und Hilfe.
Tut mir Leid, wenn ich´s nicht kapiert habe.
Es war auch nicht meine Absicht, mich über Einwände hinwegzusetzen (wie von Koehlerbv behauptet).
Mittlerweile läuft´s auch. War ja nach dem Beispiel von Diali auch nicht mehr so schwer.

Ich hatte es ja schon mal erklärt:
Wenn Du 1-2x im Jahr ein paar Zeilen programmieren darfst (außer für Mail wird Notes zu fast nichts genutzt), wird wohl niemand nur annähernd ein wenig Erfahrung bekommen.
Die beiden Grundkurse, welche ich vor Jahren belegt hatte: Davon ist nichts mehr übrig. Ich fange immer von vorne an.

Ich versuche halt kleinere Aufgaben selbst, od. mit Hilfe zu lösen.
Falls doch mal etwas größeres Ansteht, lassen wir das eh Programmieren.

Es ist nur seltsam, daß z.B Ihr beide trotz meiner "Dummheit wie eine Maschine" immer noch sachlich und freundlich bleibt und nicht gleich beleidigend werdet wie Koehlerbv. Ich nehme an, es liegt wohl am Anstand. Es gibt ja auch eine sogennante "Netikette". Das sich an diese Koehlerbv nicht immer hält, kennt man ja schon aus http://atnotes.de. Auch dort wurde er schon beleidigend, wenn andere immer noch höflich sind. Die Beschwerden kamen auch dementsprechend.
Hätte ich gewußt, daß er auch in diesem Forum tätig ist, hätte ich es mir wohl 2x überlegt, so blöd zu fragen, od. mich überhaupt hier zu registrieren. Vielleicht lasse ich es ja in Zukunft (Da freut sich jetzt vermutl. schon jemand).

koehlerbv:
Es steht außer Zweifel, daß Du ein Profi bist.
Aber wenn es Dir auf den Senkel geht, dümmeren mit Gefrickel zu helfen, dann laß es einfach und behalte Deine "harschen Worte" für Dich.
Bis jetzt habe ich noch nie Schaden angerichtet und ob ich Geld meines Arbeitgebers verbrenne, geht Dich nichts an.

Ansonsten an alle mit Anstand:

Gruß

Warum vergleiche ich Äpfel mit Birnen?
Eigentlich läuft der Agent so wie er soll - "nach Eingang neuer Mail".
Der User bekommt diese auch mit dem richtigen Betreff.

Ich habe nur ein Problem:

Die Mail soll an 2 User gehen, je nachdem welcher betroffen ist.
Dafür habe ich auch 2 Agenten erstellt.

Agent 1:
@If (Body = "Sehr geehrter Hr. Huber";
@Text (Body);
@MailSend ("Hans Huber/Domäne/DE" ; "" ; "" ; "Es liegt eine neue Mail im Eingang von CO-Support" ; "" ; ""))

Agent 2:

@If (Body = "Sehr geehrter Hr. Meier";
@Text (Body);
@MailSend ("Hans Meier/Domäne/DE" ; "" ; "" ; "Es liegt eine neue Mail im Eingang von CO-Support" ; "" ; ""))

Also sollte doch bei Eingang der entsprechenden Mail auch nur der entsprechende User informiert werden.
Es werden aber immer beide informiert. Wieso ?

Ist nur ein Agent aktiviert, bekommt auch nur der entsprechende User eine Info.

Mit der Designerhelp stehe ich schon immer auf Kriegsfuß

Hab´s aber mittlerweile dank deines letzten Tipps gefunden und es läuft.

@If (Body = "Sehr geehrter Hr. xxxx";
@Text (Body);
@MailSend ("xxxxxxxx" ; "" ; "" ; "Es liegt eine neue Mail im Eingang von CO-Support" ; "" ; ""))

Vielen Dank

Es gibt ja jede Mengen dazu, aber eigentlich alles nur in Bezug auf Script.
Wie ich das mit @Formula hinbekommen könnte, habe ich nicht gefunden

Hallo zusammen,

wie heißt denn das Richtextfeld in der Memo Maske (also das Feld, in der ich meine eigentliche Nachricht schreibe)?

Ich dachte, das wäre das Feld "Body".

Agent:
@If (Body = "Sehr geehrter Hr. xxxx";
@MailSend ("xxxxxxxx" ; "" ; "" ; "Es liegt eine neue Mail im Eingang von CO-Support" ; "" ; ""); "");

Vielen Dank schon mal im voraus für Eure Hilfe.

Gruß Siggi

Hallo zusammen,

ich muß noch meine Lösung posten:

Das Feld "DaysOut" , in dem der statische Text geändert wird, wird nur im OutOfOffice Profil benutzt.
In der Dialogbox wird das "DaysoutDisplay" angezeigt, welches in der Maske genau darunter steht.
Der Wert für dieses Feld wird aber nicht dort gesetzt, sondern im Event "Postrecalc". Hier muß noch einmal der Wunschtext eintragen werden.
Wenn der Designer das neue Design in den Mailfiles aktualisiert hat ,dann kann man die Displayfelder sofort in der Dialogbox prüfen. Die Einträge in das Outofoffice Profil erfolgen erst ,wenn man das Dokument neu speichert bzw. den Agenten aktiviert.

Das Mastertemplate sollte nach der Änderung unbedingt wieder mit dem Server signiert werden, da sonst die User für diverse Aktionen immer 2x einen Sicherheitsalarm bekommen !

Gruß

Wir machens so:
"Nur Mail zulassen, die von diesen Notes Adressen an das Internet gesendet wird:"

Gruß

%EDIT BY WARSN:
POST AUF ERLEDIGT GESETZT. BITTE DARAUF ACHTEN. DANKE

Da hast Du schon recht.
Aber da er sowieso nur an interne User aus dem Domino Directory mailen darf, brauche ich doch gar nichts zu machen.
Da habe ich einfach nicht daran gedacht.

Gruß