Domino 9 und frühere Versionen > ND7: Entwicklung

Dateipfad auswählen Lotus Notes /Domino 8.5

<< < (6/7) > >>

Klafu:
@Alex
Das ["...FILENAME="+filename] ist von mir. Ich hab filename aus den " " rausgenommen, da es eine Variable ist.

Chris

Axel:

--- Zitat von: Klafu am 18.09.09 - 12:41:39 ---@Alex
Das ["...FILENAME="+filename] ist von mir. Ich hab filename aus den " " rausgenommen, da es eine Variable ist.

Chris


--- Ende Zitat ---

Okay. Dann sollte das aber besser der richtige Operator für Stringverkettungen sein, nämlich das & - Zeichen.

Axel

moprheusfgh:
Sub Click(Source As Button)
   Dim ws As New NotesUIWorkspace
   Dim uiws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uidoc = uiws.CurrentDocument
   Dim path As String
   Dim run As String
   Dim pfad As String
   Dim result As Integer
   filenames = ws.OpenFileDialog( _   
   True, "Select your file",, "c:\temp")
   If Not(Isempty(filenames)) Then
      
      run = path + "\Microsoft Office\Office12\OrgWiz.exe " _
      + "/NAME-FIELD=Name / MANAGER-FIELD=Vorgesetzter  /DISPLAY-FIELDS=Name,Abteilung   /UNIQUEID-FIELD=Eindeutige_ID /FILENAME=&filenames"
      result = Shell(run, 1)
      
   End If
End Sub


Hab es mal soweit... Immernoch File not found.  Ich hab den Script getestet mit Filename="C:\temp..." das hat geklappt. Nur die manuelle auswahl nicht

ascabg:
Versuch mal dieses


--- Code: ---run = path & "\Microsoft Office\Office12\OrgWiz.exe " _
      & "/NAME-FIELD=Name / MANAGER-FIELD=Vorgesetzter  /DISPLAY-FIELDS=Name,Abteilung   /UNIQUEID-FIELD=Eindeutige_ID /FILENAME=" & filenames(0)
      result = Shell(run, 1)

--- Ende Code ---


Andreas

moprheusfgh:
Hab es geade probiert. Leider kommt immernoch die Meldung "File not found"

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete