Das Notes Forum
Domino 9 und frühere Versionen => ND7: Administration & Userprobleme => Thema gestartet von: Vitality am 20.01.12 - 09:53:28
-
Hallo,
ich benutze die Lotus Notes Version 7.0.30.7269 und bräuchte dringend ein Script das beim Ausführen ein neues Memo erstellt.
Kann mir hier jemand weiter helfen?
Gruß
Vitality
-
Fertigen Code wirst Du wohl hier eher nicht bekommen.
Wir leisten mehr Hilfe zur Selbsthilfe.
Kennst Du dich überhaupt in Script aus ?
Was hast Du bisher unternommen, das Script zu erstellen ?
Wenn es da Probleme geben sollte, helfen wir gerne weiter !
-
Bei der kurzen Beschreibung reicht sicher auch ein @Formula, oder?
@Command([Compose];"MASKENNAME")
-
Bei der kurzen Beschreibung reicht sicher auch ein @Formula, oder?
Im Prinzip hätte auch ein "Ja" gereicht :-X
-
Hey,
danke für die schnellen Antworten :)
Ich kenne mich leider garnicht aus mit Scripten :(
Bisher habe ich nur in Internet nach fertig Lösungen gesucht.
Dieses Script soll anscheinend funktionieren, aber das tut es bei mir nicht, da ich keine Ahnung habe wäre es ja möglich das nur ein paar Kleinigkeiten geändert werden müssen das ich es zum laufen bekomme?
...... cut of code ....
Private Sub Notes()
Dim oSess As Object
Dim oMailDB As Object
Dim oMailDoc As Object
Dim oBody As Object
Dim ws As Object
Dim uidoc
Dim mailsvr
Dim mailfile
Set oSess = CreateObject("Notes.NotesSession")
mailsvr = oSess.GetEnvironmentString("MailServer", True)
mailfile = LCase(oSess.GetEnvironmentString("MailFile", True))
Set oMailDB = oSess.GETDATABASE("", "")
Call oMailDB.open(mailsvr, mailfile)
If oMailDB.isopen Then
Set oMailDoc = oMailDB.CREATEDOCUMENT
Else
MsgBox "Could not open Notes", 32
End If
oMailDoc.subject = "Test mail"
oMailDoc.Form = "Memo"
Set oBody = oMailDoc.CREATERICHTEXTITEM("BODY")
Call oBody.Embedobject(1454, "", "c:\Testattachment.htm")
Set ws = CreateObject("Notes.NotesUIWorkspace")
Set uidoc = ws.editdocument(True, oMailDoc, False)
Set oSess = Nothing
Set oMailDB = Nothing
Set oMailDoc = Nothing
Set ws = Nothing
Set uidoc = Nothing
End Sub
..... end cut .........
-
Was willst Du denn eigentlich konkret erreichen?
Gruss
-
Ich kenne mich leider garnicht aus mit Scripten
Ohne Kenntnisse in LS sieht's schlecht aus.
-
Also mein Ziel war vorerst zu erreichen, dass wenn ich Rechtsklick auf eine Datei mache und dann "Senden an Email-Empfänger" klicke, dass sich eben ein neues Dokument mit Anhang erstellt.
- Die Option Senden an Email-Empfänger ist bei mir verfügbar doch wenn ich drauf klicke passiert nix
- Im IE ist Lotus Notes als Standard Email Programm eingestellt
- In Lotus Notes ist eingestellt das es das Standardprogramm ist
- In Lotus Notes unter Benutzervorgaben ist eingestellt "MS Office 97 'Senden an' Notus aktivieren" aktiviert
- Win.ini habe ich auch schon geändert
Nach dem das alles nichts geholfen hat, dachte ich mir man könnte doch ein Script erstellen und es als Aktion an bestimmte Datei-typen hängen...
Hätte jemand noch eine andere Lösung?
-
Ich denke, dass Du mit dem Script an der völlig falschen Stelle ansetzt. Es ist eine Funktionalität des Betriebssystems, eine Datei markieren zu können und in eine neue EMail des Standard-EMail-Programmes zu hängen. Unabhängig davon, welches dieses ist. Und nur da musst Du suchen und wirst Du auch finden.
Einzige Alternative wäre, dass Du in Notes eine Aktion hinterlegst, die eine Mail erstellt und die (im Dialog) ausgewählte Datei anhängt. Da würdest Du Dein Script einsetzen können. Aber wozu? Dann kannst Du auch eine Mail erstellen und die Datei direkt anhängen, das ist nicht aufwendiger.
Bei mir funktioniert es übrigens problemlos, habe allerdings eine höhere Version und kann mich nicht erinnern, dass ich das jemals vorher benutzt hätte.
-
Schade ein Versuch wars wert ;)
Eine Mitarbeiterin (aus der höheren Etage) hat diesen Fall gemeldet. Sonst hat es immer funktioniert, doch plötzlich nicht mehr. Die Funktion habe ich bei mehreren Mitarbeitern getestet, doch da kamen immer unterschiedliche Ergebnisse dabei raus, einmal tut es einmal nicht. Ich würde halt gerne wissen wo hier das Problem liegt...
-
Hallo,
falls es jemanden interessiert ich habe das Problem gelöst ;)
Lösung direkt von der IBM Supporthotline: "Zum Beheben dieses Fehlers kopieren Sie bitte die Datei "MSVCR71.DLL" aus dem Lotus Notes Programmverzeichnis in den Ordner "C:\Windows\SysWOW64" oder "C:\Windows\System32". "
Grüßle
Vitality