cannot execute the specified command

[adminnaddel]

Hallo liebe Gemeinde,

da kriege ich doch immer wieder diese blöde Meldung und das bei:

...
Set coll = ws.PickListCollection( 1, True, thisdb.Server, thisdb.FilePath, "vwBuchS1", "Project List", "Please select a project." )
...

So langsam stört das 

ein kleinen Tipp?

lg Andy

[koehlerbv]

Was soll denn 1 als erster Parameter ? Für PicklistCollection ist doch PICKLIST_CUSTOM als einziger Wert erlaubt, und PICKLIST_CUSTOM entspr. 3.

Bernhard

[adminnaddel]

Hi,

1 , 2 oder 3, ich bin immer noch nicht dabei
Leider ist es völlig egal, welche Zahl ich hier eintrage, auch die "19756" will nicht (GeheimTipp) 

lg Andy

[koehlerbv]

Wie gesagt, erlaubt ist nur der Parameter PICKLIST_CUSTOM = 3.
"Geheimtips" würde ich generell verwerfen.

Wo steht denn Dein Code ? Kann es sein, dass in dem Kontext UI-Befehle nicht zulässig sind ?

Bernhard

[adminnaddel]

Nun, das soll kein Geimnis sein:

Im Button einer Form: (gar nicht solange her, das dieses Script hier jemand bereitgestellt hatte)

Set thisdb = s.CurrentDatabase
Set olduidoc = ws.CurrentDocument ' current uidoc
Set thisdoc = olduidoc.Document ' doc in memory but hasn't been saved yet
   
' select the doc to link to
Set coll = ws.PickListCollection( 3, True, thisdb.Server,thisdb.FilePath, "vwBuchS1", "Project List", "Please select a project." )
   
' if a doc isn't selected exit
   If coll.Count = 0 Then
      Messagebox "User canceled" ,,"No project was selected."
      Exit Sub
   End If

lg Andy

[Semeaphoros]

Keine UI-Befehle zulässig wäre eigentlich schon der übliche Auslöser für sowas

[koehlerbv]

Wo ist coll deklariert ?

[adminnaddel]

na oben im gedimmse 

Dim coll As NotesDocumentCollection

lg Andy

[ascom40]

ich seh schlecht 

[Tode]

ich denke, der Fehler liegt NICHT im Code, denn den haben inzwischen viele Augenpaare durchgeschaut... Schau Dir mal in Deiner "vwBuchS1" - Ansicht alle Events an: ist da vielleicht irgendwas im QueryOpen, PostOpen, o.ä. ?

Gruß
Tode