Beiträge von dabbel

Moin!

Kann mir jemand sagen, wie ich aus Notes heraus auf Windows-Umgebungsvariablen zugreifen kann?

Ich möchte in einem Notes-Feld (Text, Bearbeitbar) den Inhalt der Windows Umgebungsvariable %COMPUTERNAME% als Vorbelegung haben.

Ist das möglich? Wie?

Die Bookmark.nsf war der Übeltäter: gelöscht, Notes neu gestartet, fertig!

Die DB wird über das Workspace-Icon geöffnet.

Moin!

Ich habe eine Mail-in-DB, die so eingestellt ist, dass beim Öffnen der Datenbank der Ordner "inbox" angezeigt wird.

Das funktioniert auch wie erwartet bei quasi allen Usern.

Nun meldet sich ein User, bei dem die Datenbank immer in einem der anderen Ordner in der DB geöffnet wird (immer im gleichen).

Die Datenbank ist so eingestellt, dass das geöffnet wird, wie es beim letzten Mal verlassen wurde.

Geht der User nun in die inbox der DB und geht aus der DB raus, ist er beim nächsten mal wieder in dem anderen Ordner.

Was habe ich schon gemacht:

- DB-Lesezeichen gelöscht und neu angelegt
- Arbeitsbereich komprimiert
- Ansichten der DB neu aufgebaut
- cache.ndk gelöscht

Mehr fällt mir nicht mehr ein.

Wieso ist das so und wieso nur bei einem User? Wie kriege ich das hin, dass sich die DB bei diesem User wieder in der Inbox öffnet?

Any Ideas?

Schade. Danke!

Moin!

Weitere Adressbücher kann ich bequem über die Verzeichnisverwaltung organisieren, soweit so gut.

Aber ich möchte zwar ein weiteres Adressbuch integrieren, aber dieses nicht für die "Auto-Vervollständigen" funktion in der Memomaske bereitstellen, sondern nur über den Button "Adresse" oder mit Klick auf "An:" verfügbar machen.

Wenn ich das Adressbuch in der Verzeichnisverwaltung auf "disabled" setze, steht es logischerweise überhaupt nicht mehr zur Verfügung.

Wie kriege ich das hin, dass die "Auto-Vervollständigen" - Funktion nur auf ein bestimmtes Adressbuch zugreift, andere Adressbücher aber mit Klick auf "Adresse" auswählbar sind?

Danke für die Antworten! Leider sind wir noch auf Notes 7 und somit musste ich ein wenig rumbasteln: da ich mich mit der API null auskenne, habe ich ein AutoIT-Script gebastelt, welches den richtigen Drucker auswählt und den Druck absendet. Dieses rufe ich einfach per @Command([Execute]) auf.

Moin!

Ich suche eine Möglichkeit, eine Aktion in eine Maske einzubauen, die das Dokument bei Klick auf einem bestimmten Drucker ausgibt, ohne dass man selbst diesen bestimmten Drucker aussuchen muss. Es geht auch nicht, diesen Drucker als Standarddrucker zu definieren, da es halt nicht der Standarddrucker ist.

Klar was ich meine?

Das Dokument soll also auf Knopfdruck ohne weitere Nachfrage oder Optionsfenster oder manuelle Druckerauswahl auf einem "Nichtstandarddrucker" des Arbeitsplatzes ausgedruckt werden.

Geht das? Wenn ja: wie?

Über @Command([FilePrint];"1";"";"";"";"";"";"";"";"";"") kann ich das Dokument ja nur an den als Standarddrucker definierten Drucker senden, nicht aber an einen bestimmten.

Ideen?

DankeDankeDanke! Das war's!

hmm. In Excel funktioniert das prima.

Aber in meiner Notes-Maske habe ich nun ein Feld "Druckdatum" vom Typ "Datum" mit dem Inhalt "@Date(@Today)"

Dann habe ich noch ein Feld "letztertagvorjahr" vom Typ "Datum" mit dem Inhalt "@TextToTime("31.12."+@Text(@Year(@Today)-1))"

Soweit so gut.

Nun habe ich ein Feld eingefügt vom Typ "Zahl" mit dem Inhalt "Druckdatum - letztertagvorjahr"

Dabei kommt dann aber z.B. beim @Today von 27.10.2009 und Letzter Tag des Vorjahrs von 31.12.2008 die Zahl "25920000" raus.

Was mache ich denn nun noch falsch?

Danke für den schnellen Tipp, aber ich stehe noch etwas auf dem schlauch: kann ich mal ein Beispiel haben?

Moin!

Kann mir jemand sagen, wie ich ein Datum, welches bereits in einem Feld steht, in ein Industriedatum umwandeln zu lassen und in der Form in einem anderen berechneten Feld anzeigen zu lassen?

Also Beispiel:

"Normales Datum": 12.10.2009

Industriedatum: 285. Tag im Jahr 2009

Wenn Du es so siehst: deine Meinung. Ich hatte auf jeden Fall Schwierigkeiten genug, das Richtige aus der Hilfe zu kombinieren und da haben mir die Antworten von ascabg sehr geholfen...

Zitat

Das Problem ist nicht, daß dir die Kenntnisse fehlen, sondern eher daß du einfach die Lösung vorgesetzt bekommen willst ohne den kleinsten eigenen Aufwand

Falsch! Ich tu' mich nur eben recht schwer mit Lotus Script (war schon immer so und wird immer so bleiben, daher versuche ich immer möglichst mit @Formeln auszukommen).

Ausserdem hatte ich ja bereits erwähnt, dass Datenbankprogrammierung nun weiss Gott nicht zu meinem Haupt-Tagesgeschäft als Admin gehört, aber manchmal komme ich nicht drum herum. Daher frage ich gerne mal in solchen Foren wie diesem (welches ich bis jetzt als sehr nettes und hilfreiches Forum in Erinnerung hatte) doof nach und freue mich, wenn jemand, für den das alles null problemo ist, mir auf die Sprünge hilft. Das ist ja dann für denjenigen meist 'ne 5-Minuten-Sache und erspart mir tagelanges rumgewurschtel.

andreas: vielen herzlichen Dank, dass Du mir trotzdem geholfen hast.

Ich hab's nun endlich hinbekommen und will natürlich (vielleicht steht ja irgendjemand irgendwann vor einem ähnlichen Problem) die Lösung nicht vorenthalten:

Sub Click(Source As Button)
	Dim db As New NotesDatabase("","")
	Dim ws As New NotesUIWorkspace    
	Dim uidoc As NotesUIDocument
	Dim sourcereplicaid As String
	Dim sourceunid As String
	Set uidoc = ws.CurrentDocument
	sourcereplicaid = uidoc.FieldGetText( "SOURCE_REPLICA_ID" )
	sourceunid = uidoc.FieldGetText("SOURCE_UNID")
	If db.OpenByReplicaID( "server1", sourcereplicaid ) Then
		Print( db.Title & " wurde erfolgreich geöffnet" )
	Else
		Messagebox  "Ursprungsdokument konnte nicht geöffnet werden. Vielleicht kein Zugriff auf die Datenbank?" ,16 ,"Problem!" 
	End If
	Set db = New NotesDatabase("server1", db.FilePath)
	Set doc = db.GetDocumentByUNID(sourceunid)
	Call ws.EditDocument(False,doc) 
End Sub

Das ist vielleicht nicht die schlankeste und sauberste Lösung, aber sie funktioniert.

Hallo!

Auch auf die Gefahr hin, wieder Motze zu kriegen, hier mal mein derzeitiges Script, welches leider bei Ausführung immer noch eine Fehlermeldung "Type Mismatch" hervorbringt. Der Lotus Script Debugger zeigt, dass diese Fehlermeldung bei der Zeile Set db = db.OpenByReplica... auftritt, obwohl dann zu sehen ist, dass db mit den angaben der richtigen zu öffnenden Datenbank gefüllt ist.

Sub Click(Source As Button)
	Dim db As New NotesDatabase("","")
	Dim ws As New NotesUIWorkspace    
	Dim uidoc As NotesUIDocument
	Dim sourcereplicaid As String
	Dim sourceunid As String
	Set uidoc = ws.CurrentDocument
	sourcereplicaid = uidoc.FieldGetText( "SOURCE_REPLICA_ID" )
	sourceunid = uidoc.FieldGetText("SOURCE_UNID")
	Set db = db.OpenByReplicaID("LT5VV003", sourcereplicaid)
	Set doc = db.GetDocumentByUNID(sourceunid)
	Call ws.EditDocument(False,doc) 
End Sub

andreas: leider hat dein script nicht funktioniert, daher habe ich's halt mit der OpenByReplicaID-Methode versucht...

kann mir jemand sagen, was da noch falsch ist?

Hallo Andreas!

Danke für die Hilfe (trotz meiner anscheinend konfusen Beiträge...).

Es handelt sich tatsächlihc um Felder des Dokuments, in das ich die Schaltfläche eingebaut habe. Ich habe Deinen Code mal in mein Script mit aufgenommen (so wie ich es für richtig vermutete) und das ganze sieht nun so aus:

Sub Click(Source As Button)
	Dim ws As New NotesUIWorkspace	
	Set db = New NotesDatabase("server1/domain", uiws.CurrentDocumentFieldGetText("SOURCE_REPLICA_ID"))
	Set doc = db.GetDocumentByUNID(uiws.CurrentDocumentFieldGetText("SOURCE_UNID"))
	Call ws.EditDocument(False,doc)
End Sub

Leider erscheint nun bei Klick auf den Button: "Variant does not contain an Object".

Noch ein Tipp?

> Diese Aussage passt aber vorne und hinten nicht zu deinem vo
rigen Posting.

Hä? Was heisst hier "vorne und hinten nicht"? Ich habe nur die Angabe des Servers rausgenommen. Darum ging es aber ja gar nicht!

> Überleg dir doch erst mal was genau du tust bzw codiert hast und dann beschreib es auch so

Das habe ich eigentlich getan...

Sorry, wenn was falsch angekommen ist. Ich kenne natürlich auch die Designer-Hilfe, aber ich dachte, ein Forum wäre dazu da, um mal schnell und unbürokratisch nach Hilfe zu fragen, zumal ich mit der Designer-Hilfe meist nicht wirklich zurecht komme. Vielleicht bin ich ja schlicht zu doof oder es liegt daran, dass ich als Admin nicht 24h programmiere...

Hier also nochmal der Code ohne "verschleierung" des Servers, der zu der o.g. Fehlermeldung einer invalid UNID führt:

Sub Click(Source As Button)
     Dim ws As New NotesUIWorkspace
     Set db = New NotesDatabase("server1/domain", SOURCE_REPLICA_ID)
     Set doc = db.GetDocumentByUNID(SOURCE_UNID)
     Call ws.EditDocument(False,doc)
End Sub

Also: falls trotzdem mir noch jemand helfen will: wo ist mein Fehler?

> Klar weil du bei New NotesDatabase nur einen Pfad angeben kannst.

Ja, das weiss ich auch schon. Ich habe natürlich im Originalscript nicht "server" sondern den kompletten Servernamen drinstehen. Wollte nur meinen Servernamen hier nicht unbedingt breittreten. Daran kann's also nicht liegen...

Danke für den Hinweis, theoretisch bin ich nun schon weiter, praktisch funktioniert's leider noch nicht:

Ich habe in dem (biespiel-)Dokument, in dem ich die Schaltfläche platzieren will, folgende Felder mit folgenden Inhalten zur Verfügung:

SOURCE_DOCID: 01DECE0F3189F773C12576000032DC1E
SOURCE_REPLICA_ID: C125704600357B49
SOURDE_UNID: 01DECE0F3189F773C12576000032DC1E

Im Eigenschaftsfenster des Ursprungsdokuments (welches ich per Schaltfläche öffnen will), finden sich folgende IDs:

[img width=300]http://www.diewesslings.de/wp-content/uploads/2009/07/id.png[/img]

Ich dachte, ich könnte nun das Ursprungsdokument mit folgendem Script öffnen:

Sub Click(Source As Button)
 	Dim ws As New NotesUIWorkspace
 	Set db = New NotesDatabase(server, SOURCE_REPLICA_ID)
 	Set doc = db.GetDocumentByUNID(SOURCE_UNID)
 	Call ws.EditDocument(False,doc)
End Sub

Leider erscheint dann die Meldung "Invalid universal ID".

Ich spüre, ich bin nahe dran, aber irgendwas stimmt noch nicht. Könnt Ihr mir da noch helfen?

> Woher soll der Button (Formelsprache oder Script) denn wissen, in welcher Db er die betreffende UNID zu suchen hat?

Also den Namen der Ursprungsdatenbank könnte ich auch noch mitliefern.

Da ich leider überhaupt nicht fit bin in Lotus Script: könnte mir jemand von den Cracks mal ein Beispielscript zeigen, wenn die UNID im Feld "source_unid" und der Pfad und Name der Ursprungsdatenbank im Feld "source_db" zu finden ist?

Wäre echt super!