Consoleprogramm aufrufen mit Datenübergabe.

[funkheld]

Ich möchte die Textdatei übergeben ohne Input():

atascii.exe test.txt

Wie geht das ?

danke.

grus

Code: Alles auswählen

OpenConsole()

  Global zahl.c, laenge.w,text.s
  
  Print("Name : ")
  
  text=Input()
  
  If ReadFile(0, text+".txt") 
    laenge= Lof(0)
    
    CreateFile(1, text+".act") 
    
    
    While Eof(0) = 0      
      zahl=ReadCharacter(0) 
      
      If zahl < 15
        zahl=155
      EndIf  
      WriteString (1,Chr(Zahl))          
    Wend
    
    CloseFile(0) 
    CloseFile(1)  
               
  Else
    PrintN("")
    PrintN("nicht gefunden...")
    Goto ende
  EndIf
  
  PrintN("")
  PrintN("fertig...")
  ende:
  Input()
  

[PureLust]

Hi Funkheld,

schau mal bei den Befehlen "CountProgramParameters()" und "ProgramParameter()" nach.

Gruß, PL.

[funkheld]

Jup, danke.

gruss