Autor Thema: Problem mit PostOpen und  (Gelesen 1560 mal)

Offline iworks

  • Junior Mitglied
  • **
  • Beiträge: 73
Problem mit PostOpen und
« am: 24.10.08 - 12:06:42 »
Hallo Helfer in der Not! Ich denke dass ist eher eine schnelle Sache, ich habe in einer Maske einen Postopen Event mit folgendem:

Sub Postopen(Source As Notesuidocument)
   
   Dim workspace As New NotesUIWorkspace
   Dim session As New NotesSession
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument

......
Set uidoc = workspace.CurrentDocument
   Set doc = uidoc.Document

.....
If doc.IsNewNote Then
...

Das soll einfach checken ob das Doc neu ist, wenn ja dann werden Felder usw. anders gesetzt. Aber das ist ja nicht das Problem. Der Debugger bleibt in "If doc.IsNewNote Then" stehen und sagt Object Variable not set! Das passiert allerdings nur dann wenn ein default Frameset und Frame innerhalb der Maske konfiguriert wird. Wird die Maske ohne default Frameset erstellt, klappt alles wunderbar.
Hole ich das doc falls oder wo liegt das Problem..???
Danke schon mal....Grüße

Offline m3

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.102
  • Geschlecht: Männlich
  • Non ex transverso sed deorsum!
    • leyrers online pamphlet
Re: Problem mit PostOpen und
« Antwort #1 am: 24.10.08 - 12:08:06 »
Ähhh. Du hast doch mit "Source" schon das Dokument ...
HTH
m³ aka. Martin -- leyrers online pamphlet | LEYON - All things Lotus (IBM Collaborations Solutions)

All programs evolve until they can send email.
Except Microsoft Exchange.
    - Memorable Quotes from Alt.Sysadmin.Recovery

"Lotus Notes ist wie ein Badezimmer, geht ohne Kacheln, aber nicht so gut." -- Peter Klett

"If there isn't at least a handful of solutions for any given problem, it isn't IBM"™ - @notessensai

Offline iworks

  • Junior Mitglied
  • **
  • Beiträge: 73
Re: Problem mit PostOpen und
« Antwort #2 am: 24.10.08 - 12:08:52 »
jo
Set doc = Source.Document
Anfängerfehler....sorry
Danke

Offline Demian

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 569
  • Geschlecht: Männlich
Re: Problem mit PostOpen und
« Antwort #3 am: 24.10.08 - 14:43:57 »
ich glaube Martin meinte eher, dass du dir das set doc schenken kannst und direkt mit source.isnewdoc arbeiten kannst.

Gruß
Demian


EDIT: Nach nochmaligen Lesen des Beitrags ziehe ich meine Aussage zurück. Da war das Mundwerk wieder schneller wie das Hirn. Das mit dem Dim uidoc As NotesUIDocument habe ich irgendwie überlesen.
« Letzte Änderung: 24.10.08 - 15:08:30 von Demian »
Gruß
Demian

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz