Domino 9 und frühere Versionen > ND6: Entwicklung

Datei mittels Script starten

<< < (2/3) > >>

Semeaphoros:
Ah ja, Danke Matthias, es ist mir schon lange im Kopf rumgegangen, es gäbe da noch eine Alternative .... aber drauf gekommen bin ich nicht .... Das war sie.

TMC:
Ich hab das schon oft verwendet.

Hier noch was für's Errorhandling des Rückgabewertes:

   If lRet < 32 Then
      Select Case lRet
      Case 2
         strError = "File not found"
      Case 3
         strError = "Path not found"
      Case 5
         strError = "Access denied"
      Case 8
         strError = "Out of memory"
      Case 11
         strError = "Invalid EXE file or error in EXE image"
      Case 26
         strError = "A sharing violation occurred"
      Case 27
         strError = "Incomplete or invalid file association"
      Case 28
         strError = "DDE Time out"
      Case 29
         strError = "DDE transaction failed"
      Case 30
         strError = "DDE already busy"
      Case 31
         strError = "No association for this file extension"
      Case 32
         strError = "DLL not found"
      Case Else
         strError = "Error, details unknown."
      End Select
   End If


Hier noch ein MS-Link:
http://support.microsoft.com/default.aspx?scid=kb;en-us;170918

Glombi:
Hier noch die Meldung

Die Datei heisst E1-03 undhier noch was.doc

Andreas

eknori:
das Problem mit den Spaces kannst du umgehen mit


Declare Function GetShortPathName Lib "kernel32" Alias"GetShortPathNameA" (Byval lpszLongPath As String,Byval lpszShortPath As String, Byval cchBuffer As Long) As Long

Function GetShortFileName ( fileName As String ) As String
      Dim sBuffer As String , lLen As Long
      sBuffer = Space$ ( 512 )
      lLen = GetShortPathName ( fileName , sBuffer , Len ( sBuffer ) )
      GetShortFileName = Left$(sBuffer, lLen)
   End Function

den Rückgabewert übergibst du dann an ShellExecute

TMC:

--- Zitat von: Glombi am 04.12.04 - 10:34:22 ---Nachtrag: Das geht leider so auch nicht, der Fokus ist wieder in Notes.

--- Ende Zitat ---

Ich denke da brauchts dann noch ein

Declare Function GetDesktopWindow& Lib "user32" ()

Das übergibst Du dann der ShellExecute. Siehe z.B. hier, Antwort #13
http://www.atnotes.de/index.php?topic=16149.0

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete