Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

Script will nicht laufen (Remote, Scriptmenü)

 
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> AppleScript X
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Manfred
•-->
•-->


Anmeldedatum: 17.01.2005
Beiträge: 45
Wohnort: Graz - Austria

BeitragVerfasst am: 05.09.2010 - 09:07    Titel: Script will nicht laufen (Remote, Scriptmenü) Antworten mit Zitat

1. Das nachfolgende Script funktioniert einwandfrei, wenn ich es innerhalb des Scripteditor ausführe, es "funkt" auch, wenn ich es als "Programm" sichere. - Sichere ich es aber als "Script" und will es über das Script-Menü ausführen, kann ich im Dialog "choose from list" keinen Eintrag auswählen.
2. Ohne die Subroutine "myClean" werden je Aufruf die Listeneinträge immer wieder dazu addiert; die Liste wird länger und länger ...
Code:
property remoteMac : "maxi.local"
property remoteUsername : "ich"
property remotePassword : "geheim"
property myList1 : {}
property myList2 : {}
property myNewList : {}


set myMachine to "eppc://" & remoteUsername & ":" & remotePassword & "@" & remoteMac as text

try
   using terms from application "EyeTV"
      tell application "EyeTV" of machine myMachine
         set myList1 to the channel number of every channel
         set myList2 to the name of every channel
         repeat with i from 1 to (count of items of myList1)
            set x to item i of myList2 & " (" & item i of myList1 & ")"
            set myNewList to myNewList & x
         end repeat
      end tell
      
      set x to choose from list myNewList with prompt "Wählen Sie einen Sender aus:" default items {""}
      
      if x is not equal to false then
         set mySelect to x as text
         repeat with i from 1 to (count of items of myNewList)
            if mySelect is equal to item i of myNewList then
               set myStationNr to item i of myList1
            end if
         end repeat
         tell application "EyeTV" of machine myMachine
            myClean() of me
            channel_change channel number myStationNr
         end tell
      end if
   end using terms from
on error
   myClean() of me
end try

on myClean()
   set myList1 to {}
   set myList2 to {}
   set myNewList to {}
   set x to ""
end myClean

Kann es sein, daß "remote" alles ein bißchen anders ist? - Für div. Tips Dank im Voraus.
_________________
Manfred M.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen AIM-Name
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> AppleScript X Alle Zeiten sind GMT + 2 Stunden
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter