Datei per Skript ausführen

;Datei mit Doppelklick öffnen:

;Diese Datei als EXE kompilieren
;Im Windows Explorer in den Pfad der *qrd-Datei navigieren
;Rechtsklick auf den Dateinamen *.qrd
;im Menü "Öffnen mit" auswählen
;Haken setzen bei "Immer mit diesem Programmnamen öffnen"
;Aus der Liste "weitere Apps" auswählen
;In der Liste ganz nach unten zu "Andere App auf diesem PC wählen", klicken
;Deine kompilierte AutoIt-EXE-Datei auswählen

If Not FileExists("bla.qrd") Then
    FileWrite("bla.qrd", "Blablub  tralala Das ist der Dateiinhalt!")
    MsgBox(0, 0, "Datei bla.qrd wurde erstellt! Bitte EXE nach Anweisung registrieren und dann die *.qrd-Datei doppelklicken")
EndIf


Dim $datei[]

$anzahl_parameter = $cmdline[0]

If $anzahl_parameter <> 0 Then                                       ;es gibt parameter
;~     For $i = 1 To $anzahl_parameter                                  ;parameter einsammeln
;~         $datei[$i] = $cmdline[$i]                                    ;falls unterschiedliche Parameter
;~     Next
    MsgBox(0, "Dateiname", $cmdline[1] & @CRLF & FileRead($cmdline[1]))
Else
    MsgBox(0, 0, "Keine Parameter übergeben!")
EndIf