View wird nicht gesetzt

[Gruenkohl]

Hallo zusammen,


dies ist mein Erster Beitrag im 6er Bereich. 

Ich habe eine DB unter 5.011 entwickelt welche dort auch wunderbar läuft.
Da diese DB aber später auch mit einem 6er Client verwendet werden soll, habe ich dies getestet. Ich bin davon ausgegangen, was unter 5 läuft, läuft auch unter 6.
Dem ist wohl nicht so, da ich eine Fehlermeldung bei folgendem Script bekomme.

Und zwar bekomme ich einen "Object variable not set", wenn ich die Collection füllen möchte. Im Debugger ist mir dann aufgefallen, dass er die View nicht gesetzt bekommt. Obwahl sie vorhanden ist. Auch mit einem Aliasnamen hat es nicht funktioniert.

Habt ihr vielleicht ne Idee?


Danke und Gruss
Andreas

Code

Function sum_Tag(DatumTag, uidoc)
	Dim s As New NotesSession
	Dim db As NotesDatabase
	Dim View As NotesView
	Dim View2 As NotesView
	Dim Doc As NotesDocument
	Dim Doc2 As NotesDocument
	Dim suchkey As String
	Dim Col As NotesDocumentCollection
	Dim item As NotesItem
	Dim i As Integer
	Dim ErgDatum As NotesDateTime
	Dim difference#
	
	Set db = s.CurrentDatabase
	Set View = db.GetView("(sumTag)") 

View wird nicht gesetzt 

Code

	
	suchkey = uidoc.FieldGetText("txtUmsatzMitarbeiter") + "#" + uidoc.FieldGetText("txtUmsatzOrganisationUID")
	
	Set Col = View.GetAllDocumentsByKey(suchkey, True) 

hier kommt die Fehlermeldung

[Gruenkohl]

Habe den Fehler gefunden.
Die Ansicht wurde mit Unterstrich geschrieben. 

Also statt:
Set View = db.GetView("(sumTag)")
muss es so aussehen:
Set View = db.GetView("(sum_Tag)")

Ich finde es merkwürdig, das Notes 5 damit kein Problem hatte und 6 berechtigterweise meckert.

War also meine Schuld, sorry.

Gruss
Andreas

[koehlerbv]

Zwischen "sumTag" und "sum_Tag" unterscheidet aber R5 ebenso wie R6. Bist Du Dir sicher, dass das mit der gleichen DB (!) unter R5 funktioniert und unter R6 nicht ? Ich wage das zu bezweifeln.
Abgesehen davon: Danke für die Rückmeldung. Und Notes hat korrekt reagiert 

Bernhard