OS/2 Shareware BBS: 6 File/06-File.zip/dirsc01a.zip/createfilestable.cmd

OS/2 REXX Batch file | 2000-06-12 | 402b | 18 lines

/* */
/*
   ê¼∩ íáºδ íÑαÑΓß∩ ¿º scanner.ini
   櫺ñá¡¿Ñ Γáí½¿µδ ñ½∩ σαá¡Ñ¡¿∩ ¿¡Σ«α¼áµ¿¿ « »α«¿¡ñѬ߿α«óá¡¡δσ Σá⌐½áσ
   ºá»α«ß ¿ß»«½¡∩ÑΓß∩ ß«ú½áß¡« ß¬α¿»Γπ ¿º Σá⌐½á createfilestable.sql
*/

inputfile="scanner.ini"

Do While Lines(inputfile) > 0
    Entry = Linein(inputfile)
    Parse var entry PARAM '=' VAL
    if PARAM="DBNAME" then
    do
        'mysql '||VAL||'<createfilestable.sql'
    end
end