Select Code to Download

 
@files =<C:\\orant\\FORMS60\\forms\\Fapidk\\source\\msvc\\changecolor\
+\Debug\\forms\\*.fmb>; 
foreach $file (@files) {
  print $file "\n";
  system "changecolor.exe form=$file";
  }

@files1 =<C:\\orant\\FORMS60\\forms_up\\*.fmb>; 
done and thanks for all of ur help.
...
 system "IFCMP60 USERID=rmetts/rmetts\@dlegtst1 module=$file module_ac
+cess=file module_type=form"
 # print "c:\\orant\\bin\\IFCMP60 USERID=rmetts/rmetts\@dlegtst1 modul
+e=$file module_access=file module_type=form"
}