Autor Thema: Script Equivalent zu @Command([Execute]  (Gelesen 1015 mal)

Offline Birgit

  • Junior Mitglied
  • **
  • Beiträge: 65
  • Geschlecht: Weiblich
Script Equivalent zu @Command([Execute]
« am: 29.07.03 - 09:45:09 »
Hi @,

ich bin gerade mal wieder das lebene Fragezeichen. Eigentlich möchte ich in Script nur eine Excel Datei öffnen (und auf den Bildschirm zur weiteren Bearbeitung durch den Benutzer bringen), die vorher im Script über einen Export erstellt wurde. Mit einer Formel wäre das ja so schön einfach, aber wie heißt @Command([Execute] in Script ?

Schon mal danke für die Hilfe.

Viele Grüße,
Birgit

Offline Axel

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re:Script Equivalent zu @Command([Execute]
« Antwort #1 am: 29.07.03 - 09:47:22 »
Hi,

die passende Script-Anweisung heißt Shell.

Nähere Infos, auxh zu den möglichen Parametern findest du in der Designer-Hilfe.


Axel
Ohne Computer wären wir noch lange nicht hinterm Mond!

Offline Markus Henke

  • Aktives Mitglied
  • ***
  • Beiträge: 143
  • Geschlecht: Männlich
Re:Script Equivalent zu @Command([Execute]
« Antwort #2 am: 30.07.03 - 08:27:32 »
Hallo,

soweit ich weiß kann Shell nur ausführbare Dateien starten (exe, bat etc.)

Versuch mal folgende API Funktion (funktioniert nur in Windows)

Declare Function ShellExecute Lib "Shell32.dll" Alias _
"ShellExecuteA" (Byval hWnd As Long, Byval lpOperation _
As String, Byval lpFile As String, Byval lpParameters _
As String, Byval lpDirectory As String, Byval nShowCmd _
As Long) As Long

Sub Click(Source As Button)
   Pfad = "C:\Daten\Verzeichnisstruktur.txt"
   Call ShellExecute(0&, "Open", Pfad, "", "", 1)
End Sub


Wobei Du natürlich den Pfad ändern musst. :)

Gruß
Markus

Offline Till_21

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 708
  • Geschlecht: Männlich
  • I love Germany
Re:Script Equivalent zu @Command([Execute]
« Antwort #3 am: 30.07.03 - 09:28:03 »
dann wuerde ich wiederrum das ganze so haendeln :

                file = "c:\Test.xls"
   OSInfo=Evaluate("@Platform([SPECIFIC])")
   If OSInfo(0)="Windows/NT" Then
      TID=Shell("cmd /c start "+file,2)
   Else
      TID=Shell("start "+file,2)
   End If



gruss

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz