Viewing: /www/zendsvr6/htdocs/wiki/uploads/I5/101Connecti5.php
Font size:
Line numbers:
<?php
// ---------------------
// new toolkit or old toolkit
// ---------------------
if (!function_exists('i5_connect')) {
  require_once(
'CW/cw.php'); // new toolkit compatibility (Alan)
}
// ---------------------
// Model: connect
// ---------------------
function model_connect() 
{ global 
$MODEL;
  
$db_options = array(I5_OPTIONS_JOBNAME=>"DVDSEARCH");
  
$MODEL ['conn'] = i5_pconnect 
  
$MODEL ['database'],
    
$MODEL ['db_user'], 
    
$MODEL ['db_password'],
    
$db_options
  
);
  if (! 
$MODEL ['conn']) 
  { 
model_error_i5("Connect fail");
    return 
False;
  }
  return 
model_chglibl();
}
function 
model_chglibl()
{ global 
$MODEL;
  
$rc i5_command
  
("chglibl",
    array(
"libl"=>$MODEL ['libl']),
    array()
  );
  if(!
$rc)
  { 
model_error_i5("chglibl fail");
    return 
False;
  }
  return 
True;

function 
model_disconnect() 
{ return 
True;
}
function 
model_error_i5($error ""
$tab i5_error();
  if (
$tab[0]>0)
  { 
model_error("$error $tab[2] $tab[3] $tab[0]");
  }
  else
  { 
model_error($error);
  }
}
?>