Parameter aus Batch-File übergeben

[Cancer]

Hallo,

ich hab folgendes Problem. Ich muss ein Batch-File aufrufen und aus diesem Batch-File ein Program starten, das mir Passwörter auf einer Datenbank ändert. Nun hab ich aber nicht nur eine Datenbank, sondern ganz viele und jede Datanbank bekommt ihr eigenes Batch-File. Um mich zu connecten muss ich nun aus meinem Batch-File Parameter an mein kleines Programm übergeben. Das ganze Progrämmsche ist in Delphi programmiert. Wie soll ich das denn machen? Kann mir jemand helfen?

Cancer

[geloescht_JesterDay]

Original geschrieben von Cancer

Um mich zu connecten muss ich nun aus meinem Batch-File Parameter an mein kleines Programm übergeben

Mach es genauso, wie man eben Parameter an Programme übergibt... (die man nicht mit der Maus startet)

MyProgram.exe DBName

im Programm kannst du die übergebenen Parameter abrfragen:

procedure TForm1.FormCreate(Sender: TObject);


var

  i: Integer;

  for i := 1 to ParamCount do

  begin

    if LowerCase(ParamStr(i)) = 'beep' then

      Beep

    else if LowerCase(ParamStr(i)) = 'exit' then

      Application.Terminate;

  end;

end;

Program.exe beep exit würde also einmal biepen und sich beenden

Edit:

Das ganze funktioniert auch bei Batchdateien, du brauchst also nicht viele Batchdateien schreiben, sondern kannst eine Batchdatei schreiben, die mit dem entspr. DBNamen gestartet wird.

echo %1 zeigt in einem Batch-File z.B. den ersten Parameter an