Anzeige kryptischer Zeichen bei ws.OpenFileDialog

[Driri]

Hallo,

ich versuche gerade zum ersten Mal, OpenFileDialog auf bestimmte Dateitypen einzuschränken.

Dafür habe ich folgende Code geschrieben :

Code

	Dim ws As New NotesUIWorkspace
	Dim uidoc As NotesUIDocument
	Dim filenames As Variant
	
	Set uidoc = ws.CurrentDocument
	
	filenames = ws.OpenFileDialog(False, "Bitte wählen sie die gewünschte Datei aus.", "PPT|*.ppt|PPS|*.pps", "M:")
	
	If Isempty(filenames) Then
		Messagebox "Es wurde keine Datei ausgewählt.", 0, "Fehler"
		Exit Sub	
	Else
		Call uidoc.FieldSetText("VDatei", filenames(0))
	End If

Funktioniert auch generell wunderbar, allerdings habe ich den komischen Effekt, daß mir in der Auswahlliste der Dateitypen neben den beiden vordefinierten Dateitypen noch x weitere angezeigt werden, die aus kryptischen Zeichen bestehen.

Ist das nen Bug oder spinnt mein Client ? Kennt das jemand ?

[Driri]

P.S. : Hab gerade mal die Cache.dsk, desktop5.dsk und bookmark.nsf gelöscht. Kein Effekt.

Testclient ist 5.0.13.

[Driri]

Wird immer lustiger. Kollegen haben das selbe Phänomen, ich gehe also mal nicht davon aus, daß es an meinem Client liegt. Kollegen haben als Client 5.0.11, daher schließe ich jetzt mal nen Versionsproblem auch aus.

Jetzt hab ich die Einträge mal geändert :

Code

filenames = ws.OpenFileDialog(False, "Bitte wählen sie die gewünschte Datei aus.", "PPT|*.ppt|PPS|*.pps", "M:")

Und dann kommt sowas bei raus :

[Driri]

So langsam versteh ichs nicht mehr 

Ergebnis ist so zwar genau richtig, aber ich will da eigentlich was anderes drin stehen haben als Text. 

Code

filenames = ws.OpenFileDialog(False, "Bitte wählen sie die gewünschte Datei aus.", "Powerpoint|*.ppt|Powerpoint2|*.pps", "M:")

[Driri]

So, hab gerade ne Lösung bei LDD gefunden. Man muß scheinbar mit nem doppelten Pipe abschließen.

Tolle Sache, steht so natürlich auch nicht in der Hilfe.

Code

filenames = ws.OpenFileDialog(False, "Bitte wählen sie die gewünschte Datei aus.", "Powerpoint|*.ppt|Powerpoint Pack and Go|*.pps||", "M:")

Anbei der Link zum Thread bei LDD :

Klick mich

[diali]

wahrscheinlcih verwendet Notes beim Aufruf von "ws.OpenFileDialog" die Windows-API.
In der Windiows-Api wird anstelle der "|" ein CHR(0) verwendet.

[Driri]

Möglich. Was ich nur so lustig fand war, daß je nach String die Dialogliste anders aussah.