Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: oson00 am 07.11.06 - 00:10:27

Titel: Attachments öffnen
Beitrag von: oson00 am 07.11.06 - 00:10:27
Hallo,

ich möchte gern ein Attachment öffnen. Da mehrere Attachments an einem Dokument hängen können, kann ich da nicht über die Standard-Notes-Funktion gehen, sondern schreibe einen Script-Code. Mit dem folgenden Code funktioniert das soweit auch gut:

rc = Shell( "cmd.exe /c " + filename, 6)

Wenn der Dateiname des Attachments allerdings Leerzeichen enthält, funktioniert das ganze nicht mehr. In der Hilfe zum CMD steht, dass dann der Dateiname in " stehen muss. Wie kann ich in dieser Zeile die Anführungszeichen hinzufügen.

Ich habe folgendes probiert:

rc = Shell( |cmd.exe /c "| + filename + |"|, 6)

und

rc = Shell( "cmd.exe /c " + chr(34) + filename + chr(34), 6)

Es ist ja schon spät. Übersehe ich was, oder muss ich das ganze irgendwie anders lösen?
Titel: Re: Attachments öffnen
Beitrag von: robertpp am 07.11.06 - 07:36:47
Ich denke dass ist das was du suchst:

Sub Initialize
   Dim test As String
   Dim filename As String
   filename = "S:\Sonstige Daten\_ Terminalserver EBG.lnk"
   test=  "cmd.exe /c " & |"|  &  filename  & |"|
   rc = Shell( test, 6)
End Sub

gruss robert
Titel: Re: Attachments öffnen
Beitrag von: eknori am 07.11.06 - 08:09:29
Gucke mal hier http://www.eknori.de/archives/99. Da habe ich auch das Problem mit Leerzeichen und langen Dateinamen beschrieben und gelöst
Titel: Re: Attachments öffnen
Beitrag von: oson00 am 07.11.06 - 12:38:15
Hallo,

ja mit dem getShortFilenames funktioniert's. Ich hoffe nur, dass das auch in zukünftigen Windows-Versionen...  ???