Help for this page

Select Code to Download


  1. or download this
    @files =<C:\\orant\\FORMS60\\forms\\Fapidk\\source\\msvc\\changecolor\
    +\Debug\\forms\\*.fmb>; 
    foreach $file (@files) {
      print $file "\n";
      system "changecolor.exe form=$file";
      }
    
  2. or download this
    @files1 =<C:\\orant\\FORMS60\\forms\\forms_up\\*.fmb>; 
    foreach $file (@files1) {
    ...
     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"
    }