function trcacc($trname, $varname, $oldstr = '', $coid = 0, $source = 0, $ids = '', $vmode = 0, $smode = 0, $guide = '', $width = '25%')
{
//vmode:034smode:02345
$_mc = defined('M_MCENTER') ? 1 : 0;
$vmode != 4 && ($arr = cacc_arr($coid, $source, $ids));
$str = '';
if (!$vmode && !$smode) {
$arr = array(0 => array('title' => lang('p_choose'), 'level' => 0)) + $arr;
foreach ($arr as $k => $v) {
$arr[$k]['title'] = str_repeat(' ', $v['level']) . $v['title'];
}
$str = "<select name=\"{$varname}\" id=\"{$varname}\">" . umakeoption($arr, $oldstr) . '</select>';
} elseif ($vmode <= 3) {
foreach ($arr as $k => $v) {
$str .= "[{$k},{$v['pid']},'" . addslashes($v['title']) . "'," . (empty($v['unsel']) ? 0 : 1) . '],';
}
$str = "<script>var data = [{$str}];\nmake_mbox('', '{$varname}', data, '{$oldstr}',{$smode});</script>";
} else {
$str = "<div><script>make_mbox('', '{$varname}', 'action=cacc&coid={$coid}&source={$source}&ids={$ids}', '{$oldstr}',{$smode});</script></div>";
}
if ($_mc) {
$addstr = "<div id=\"alert_{$varname}\" name=\"alert_{$varname}\" class=\"red\"></div>";
if ($guide) {
$addstr .= "<font class=\"gray\">{$guide}</font>";
}
echo "<tr><td width=\"{$width}\" class=\"item1\"><b>{$trname}</b></td>\n";
echo "<td class=\"item2\">{$str}{$addstr}</td></tr>\n";
} else {
$addstr = "<div id=\"alert_{$varname}\" name=\"alert_{$varname}\" class=\"mistake0\"></div>";
if ($guide) {
$addstr .= "<div class=\"tips1\">{$guide}</div>";
}
echo "<tr><td width=\"{$width}\" class=\"txt txtright fB borderright\">" . $trname . "</td>\n";
echo "<td class=\"txt txtleft\">{$str}{$addstr}</td></tr>\n";
}
}
echo ']';
break;
case 'coid':
$framein = empty($framein) ? 0 : 1;
$chid = empty($chid) ? 0 : max(0, intval($chid));
$coid = empty($coid) ? 0 : max(0, intval($coid));
empty($varname) || empty($coid) && exit;
$ccidsarr = uccidsarr($coid, $chid, $framein, 1, 1);
echo "var {$varname}=[";
foreach ($ccidsarr as $k => $v) {
echo "[{$k},{$v['pid']},'" . addslashes($v['title']) . "'" . (empty($v['unsel']) ? '' : ',1') . '],';
}
echo ']';
break;
case 'cacc':
$arr = cacc_arr(empty($coid) ? 0 : 1, empty($source) ? 0 : intval($source), empty($ids) ? '' : trim($ids));
echo "var {$varname}=[";
foreach ($arr as $k => $v) {
echo "[{$k},{$v['pid']},'" . addslashes($v['title']) . "'," . (empty($v['unsel']) ? 0 : 1) . '],';
}
echo ']';
break;
case 'memcert':
$info = array();
if ($option == 'msgcode') {
if (preg_match("/^1[358]\\d{9}\$/", $mobile)) {
$msgcode = random(6, 1);
$id = ${"msgcode_sp{$msgcode_gate}"};
$pw = ${"msgcode_pw{$msgcode_gate}"};
if (empty($msgcode_mode) || $msgcode_mode == 1 && empty($msgcode_msg) || $msgcode_mode == 2 && (empty($id) || empty($pw) || empty($msgcode_sms))) {
$info = array('time' => -1, 'text' => 'no_msg_gate');
