bat_res.php

来自「极限网络智能办公系统 Office Automation V3.0官方100％源」· PHP 代码 · 共 102 行

<?
include_once 'inc/auth.php';
include_once 'inc/check_type.php';
include_once 'inc/utility_all.php';
$CUR_TIME = date ('Y-m-d H:i:s', time ());
if ($BEGIN_DATE != '')
{
	$TIME_OK = is_date_time ($BEGIN_DATE);
	if (!($TIME_OK))
	{
		message ('错误', '起始时间格式不对，应形如 1999-1-2 14:55:20');
		button_back ();
		exit ();
	}
}
if ($END_DATE != '')
{
	$TIME_OK = is_date_time ($END_DATE);
	if (!($TIME_OK))
	{
		message ('错误', '截止时间格式不对，应形如 1999-1-2 14:55:20');
		button_back ();
		exit ();
	}
}
if ($END_DATE != '')
{
	if ($BEGIN_DATE != '')
	{
		if ($END_DATE < $BEGIN_DATE)
		{
			message ('错误', '截止时间不能晚于起始时间!');
			button_back ();
			exit ();
		}
	}
}
if (substr ($EXPORT_PATH, -1) != '\\')
{
	$EXPORT_PATH .= '\\';
}
$EXPORT_PATH .= 'email';
if ($BEGIN_DATE != '')
{
	$query1 .= 'SEND_TIME>=\'' . $BEGIN_DATE . '\' and ';
	$EXPORT_PATH .= date ('ymdHi', strtotime ($BEGIN_DATE)) . '-';
}
if ($END_DATE != '')
{
	$query1 .= 'SEND_TIME<=\'' . $END_DATE . '\' and ';
	$EXPORT_PATH .= date ('ymdHi', strtotime ($END_DATE));
}
$query1 = substr ($query1, 0, -5);
$EXPORT_PATH .= '\\';
if (!((!($EMAIL == 'on') AND !($EMAIL_INBOX == 'on'))))
{
	$query = 'select * from EMAIL where ' . $query1;
	if ($EMAIL_INBOX == 'on')
	{
		$query .= ' and BOX_ID=\'0\' and SEND_FLAG=\'1\'';
	}
	$query .= ' group by ATTACHMENT_ID';
	$cursor = exequery ($connection, $query);
	while ($ROW = mysql_fetch_array ($cursor))
	{
		$EMAIL_ID = $ROW['EMAIL_ID'];
		$ATTACHMENT_ID = $ROW['ATTACHMENT_ID'];
		$ATTACHMENT_NAME = $ROW['ATTACHMENT_NAME'];
		if ($ATTACHMENT_NAME != '')
		{
			$ATTACHMENT_ID_ARRAY = explode (',', $ATTACHMENT_ID);
			$ARRAY_COUNT = sizeof ($ATTACHMENT_ID_ARRAY);
			for ($I = 0; $I < $ARRAY_COUNT - 1; ++$I)
			{
				if (!($ATTACHMENT_ID_ARRAY[$I] == ''))
				{
					$EXOPORT_STR .= 'xcopy /Q/R/Y ' . str_replace ('/', '\\', $ATTACH_PATH) . $ATTACHMENT_ID_ARRAY[$I] . ' ' . str_replace ('\\\\', '\\', $EXPORT_PATH) . $ATTACHMENT_ID_ARRAY[$I] . '\\
';
					continue;
				}
			}
			continue;
		}
	}
}
ob_end_clean ();
header ('Cache-control: private');
header ('Content-type: application/octet-stream');
header ('Accept-Ranges: bytes');
header ('Content-Disposition: attachment; filename=内部邮件.bat');
if ($EXOPORT_STR != '')
{
	echo '@echo 正在导出内部邮件附件...
' . $EXOPORT_STR . '
@echo 内部邮件附件导出完毕!
pause';
	return 1;
}
echo '@echo 无符合条件的内部邮件附件
pause';
?>