function K22Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$mDMac = $iResult->GetField("f_wire_1411121421_P01", $iKey);
//设备MAC
$mVlan = $iResult->GetField("f_wire_1411121421_010", $iKey);
//接入vlan
$mUsrID = $this->MakeUsrID();
//接入用户ID
$mUsrNA = $mUsrID;
//接入用户名称
$mUsrPS = "123456";
//接入用户密码
//创建用户
$uIf_AA = "{~}f_wire_1506031750_003{_}%%{_}" . $mDMac . "|" . $mVlan;
$uDBase = Vic_Dir_Search("150603193303.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$uRs_AA = $_OBJECT["DB"]->GetSource(Common::$_UsrInf->Getvar("UsrWK"), 2, $uDBase, "*", $uIf_AA, "", null, 1);
if ($_OBJECT["DB"]->RowsCT($uRs_AA->Resval) > 0) {
$mUsrID = $uRs_AA->GetField("f_wire_1506031750_P01");
$mUsrNA = $uRs_AA->GetField("f_wire_1506031750_011");
$mUsrPS = $uRs_AA->GetField("f_wire_1506031750_002");
} else {
//查询区域信息
$qIf_AA = "{~}f_wire_1411241716_P01{_}=={_}" . $iResult->GetField("f_wire_1411121421_013", $iKey);
$qDBase = Vic_Dir_Search("141124085601.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$qRs_AA = $_OBJECT["DB"]->GetSource(Common::$_UsrInf->Getvar("UsrWK"), 2, $qDBase, "*", $qIf_AA, "", null, 1);
if ($_OBJECT["DB"]->RowsCT($qRs_AA->Resval) > 0) {
$uPrsVAL["f_wire_1506031750_P01"] = $mUsrID;
//接入用户ID
$uPrsVAL["f_wire_1506031750_E01"] = $qRs_AA->GetField("f_wire_1411241716_025");
//用户分组
$uPrsVAL["f_wire_1506031750_002"] = $mUsrPS;
//登录密码
$uPrsVAL["f_wire_1506031750_003"] = $mDMac . "|" . $mVlan;
//设备MAC
$uPrsVAL["f_wire_1506031750_004"] = 0;
//启用状态
$uPrsVAL["f_wire_1506031750_011"] = $mUsrNA;
//接入用户名称
$uPrsVAL["AreID"] = $iResult->GetField("f_wire_1411121421_013", $iKey);
//区域编号
$uPrsVAL["IM_PST"] = "1";
$uPrsVAL["IM_HND"] = "20";
$uPrsVAL["IM_Range"] = "f_wire_1506031750_000||0";
Common::Start("150604142704", "", $uPrsVAL);
} else {
trigger_error("ER@验证出错！", NOTIC);
}
}
//资料补全后操作
$iResult->SetField("f_wire_1411121421_002", $mUsrID, $iKey);
//用户编号
$iResult->SetField("f_wire_1411121421_003", $mUsrNA, $iKey);
//用户名称
$iResult->SetField("f_wire_1411121421_008", "", $iKey);
//清空唯一码
$iResult->SetField("f_wire_1411121421_011", "2", $iKey);
//认证模式
}
function K20Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cRange = array();
$cTouser = "";
$sqlziduan = "";
$content = $_RESULT->GetField('f_wxin_1412311123_006', $iKey);
//发送的文本内容
//按组发送
if (isset($_IMPORT["IM_Range"]) && trim($_IMPORT["IM_Range"]) != "") {
$mWhere = trim($_IMPORT["IM_Range"]);
$cRange = explode("||", $mWhere);
$mWhere = str_replace($cRange[1] . "&", "", $mWhere);
$cRange = explode("&", $mWhere);
$cField = "*";
$cWhere = "{~}f_wxin_1501070920_E01{_}=={_}" . $cRange[2];
$cUSafe = "4";
$cUSort = "f_wxin_1501070920_002 asc";
$cDWxin_V10C_150513 = Vic_Dir_Search("141231094201.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
for ($i = 0; $i < $_OBJECT["DB"]->RowsCT($_RESULT->Resval); $i++) {
$cTouser = "******"" . $_RESULT->GetField("f_wxin_1501070920_P01", $i) . "\"" . ($i == $_OBJECT["DB"]->RowsCT($_RESULT->Resval) - 1 ? "" : ",") . "";
$sqlziduan .= $cTouser;
//消息插入数据库
$cPrsVAL["f_wxin_1412311123_002"] = $_IMPORT['APars'];
//发送者
$cPrsVAL["f_wxin_1412311123_003"] = $_RESULT->GetField("f_wxin_1501070920_P01", $i);
//接收者
$cPrsVAL["f_wxin_1412311123_005"] = "text";
//消息类型
$cPrsVAL["f_wxin_1412311123_004"] = date('Y-m-d H:i:s', time());
//发送时间
$cPrsVAL["f_wxin_1412311123_018"] = 1;
//对话类型
$cPrsVAL["f_wxin_1412311123_006"] = $content;
//文本内容
$cPrsVAL["f_wxin_1412311123_020"] = $_IMPORT['APars'];
//公众号
$cPrsVAL["f_wxin_1412311123_021"] = 0;
//群发消息
$cPrsVAL["f_wxin_1412311123_022"] = 1;
//组消息
$cPrsVAL["f_wxin_1412311123_023"] = $cRange[2];
//归属组
$cPrsVAL["f_wxin_1412311123_019"] = $_RESULT->GetField("f_wxin_1501070920_P01", $i);
//消息归属人
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1412311123_000||0";
Common::Start("141231094301", "", $cPrsVAL);
}
}
$data = "{\n\t\t\t\t \"touser\":[" . $sqlziduan . "],\n\t\t\t\t \"msgtype\":\"text\",\n\t\t\t\t \"text\":\n\t\t\t\t {\n\t\t\t\t\t \"content\":\"" . $content . "\" \n\t\t\t\t }\n\t\t\t\t}";
$access_token = $this->getAccess_token($_IMPORT['APars']);
$url = "https://api.weixin.qq.com/cgi-bin/message/mass/send?access_token=" . $access_token;
$this->PostData($url, $data);
}
function uploadnews($media_id, $APars, $cMange)
{
$_OBJECT =& $this->APPObj;
//查询消息信息
$cField = "*";
$cWhere = "{~}f_wxin_1501211035_000{_}=={_}" . $cMange;
$cUSafe = "4";
$cUSort = "";
$cDWxin_V10C_150513 = Vic_Dir_Search("150121114801.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
if ($_OBJECT["DB"]->RowsCT($_RESULT->Resval) > 0) {
$data = "{\"articles\": [\n\t\t {\n \"thumb_media_id\":\"" . $media_id . "\",\n \"author\":\"" . $_RESULT->GetField("f_wxin_1501211035_007", 0) . "\",\n\t\t\t \"title\":\"" . $_RESULT->GetField("f_wxin_1501211035_008", 0) . "\",\n\t\t\t \"content_source_url\":\"" . $_RESULT->GetField("f_wxin_1501211035_009", 0) . "\",\n\t\t\t \"content\":\"" . $_RESULT->GetField("f_wxin_1501211035_010", 0) . "\",\n\t\t\t\"digest\":\"" . $_RESULT->GetField("f_wxin_1501211035_011", 0) . "\",\n \"show_cover_pic\":\"" . $_RESULT->GetField("f_wxin_1501211035_012", 0) . "\"\n\t\t }\n ]\n}";
$access_token = $this->getAccess_token($APars);
$url = "https://api.weixin.qq.com/cgi-bin/media/uploadnews?access_token=" . $access_token;
$result = $this->PostData($url, $data);
$BackAy = json_decode($result, true);
$cPrsVAL["f_wxin_1501211035_004"] = $BackAy["type"];
//素材类型
$cPrsVAL["f_wxin_1501211035_005"] = date('Y-m-d H:i:s', time());
//上传时间
$cPrsVAL["f_wxin_1501211035_006"] = $BackAy["media_id"];
//图文标识
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501211035_000||" . $cMange;
Common::Start("150121114802", "", $cPrsVAL);
exit;
}
}
function C12Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$iKey = 0;
$cRange = parent::Begin();
while ($iKey < sizeof($cRange)) {
if ($_RESULT->GetField("f_wire_1506031750_000", $iKey) != 0) {
//信号导入表主键
$cPrsVAL["f_wire_1506031751_P01"] = $_RESULT->GetField("f_wire_1506031750_P01", $iKey);
//用户编号
$cPrsVAL["f_wire_1506031751_E01"] = $_RESULT->GetField("f_wire_1506031750_E01", $iKey);
//从属组织
$cPrsVAL["f_wire_1506031751_E02"] = $_RESULT->GetField("f_wire_1506031750_E02", $iKey);
//组织路径
$cPrsVAL["f_wire_1506031751_C01"] = $_RESULT->GetField("f_wire_1506031750_C01", $iKey);
//名称路径
$cPrsVAL["f_wire_1506031751_002"] = $_RESULT->GetField("f_wire_1506031750_002", $iKey);
//用户密码
$cPrsVAL["f_wire_1506031751_003"] = $_RESULT->GetField("f_wire_1506031750_011", $iKey);
//用户名称
$cPrsVAL["f_wire_1506031751_004"] = $_IMPORT["APars"];
//区域编号
$cPrsVAL["f_wire_1506031751_005"] = date('Y-m-d H:i:s', time());
//导入时间
$cPrsVAL["IM_HND"] = 20;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1506031751_000||0";
Common::Start("150723110801", "", $cPrsVAL);
$iKey++;
}
}
}
function C20Pr()
{
$_IMPORT =& $this->IMPORT;
//创建微信号系统自动创建接待大厅和取消关注组
if ($_IMPORT['f_wxin_1412311029_010'] != "") {
$cPrsVAL["f_wxin_1501071059_001"] = "接待大厅";
//组名
$cPrsVAL["f_wxin_1501071059_002"] = 0;
//用户数量
$cPrsVAL["f_wxin_1501071059_003"] = 1;
//系统组
$cPrsVAL["f_wxin_1501071059_E01"] = $_IMPORT['f_wxin_1412311029_010'];
//公众号
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501071059_000||0";
$mPrsVAL["f_wxin_1501071059_001"] = "取消关注";
//组名
$mPrsVAL["f_wxin_1501071059_002"] = 0;
//用户数量
$mPrsVAL["f_wxin_1501071059_003"] = 1;
//系统组
$mPrsVAL["f_wxin_1501071059_E01"] = $_IMPORT['f_wxin_1412311029_010'];
//公众号
$mPrsVAL["IM_HND"] = "20";
$mPrsVAL["IM_PST"] = "1";
$mPrsVAL["IM_Range"] = "f_wxin_1501071059_000||0";
Common::Start("141231094102", "", $cPrsVAL);
Common::Start("141231094102", "", $mPrsVAL);
}
parent::C20Pr();
}
function C12Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$iKey = 0;
$cRange = parent::Begin();
while ($iKey < sizeof($cRange)) {
if ($_RESULT->GetField("f_wire_1507080936_000", $iKey) != 0) {
//信号导入表主键
$cPrsVAL["f_wire_1507151720_P01"] = $_RESULT->GetField("f_wire_1507080936_P01", $iKey);
//广播编号
$cPrsVAL["f_wire_1507151720_E02"] = $_RESULT->GetField("f_wire_1507080936_E02", $iKey);
//设备编号
$cPrsVAL["f_wire_1507151720_003"] = $_RESULT->GetField("f_wire_1507080936_003", $iKey);
//广播名称
$cPrsVAL["f_wire_1507151720_P01"] = $_RESULT->GetField("f_wire_1507080936_P01", $iKey);
//广播编号
$cPrsVAL["f_wire_1507151720_004"] = $_RESULT->GetField("f_wire_1507080936_004", $iKey);
//广播vlan
$cPrsVAL["f_wire_1507151720_006"] = $_IMPORT["APars"];
//区域编号
$cPrsVAL["f_wire_1507151720_007"] = date('Y-m-d H:i:s', time());
//导入时间
$cPrsVAL["IM_HND"] = 20;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1507151720_000||0";
Common::Start("141124085701", "", $cPrsVAL);
$iKey++;
}
}
}
function K24Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cRange = array();
$cString = array();
if (isset($_IMPORT["IM_Range"]) && trim($_IMPORT["IM_Range"]) != "") {
$mWhere = trim($_IMPORT["IM_Range"]);
$cRange = explode("||", $mWhere);
$mWhere = str_replace($cRange[0] . "&||", "", $mWhere);
$cRange = explode("||", $mWhere);
//查询系统默认组--接待大厅编号
$cField = "*";
$cWhere = "{~}f_wxin_1501071059_E01{_}=={_}" . $_IMPORT["APars"] . "{~}f_wxin_1501071059_001{_}=={_}接待大厅" . "{~}f_wxin_1501071059_003{_}=={_}1";
$cUSafe = "4";
$cUSort = "f_wxin_1501071059_000 asc";
$cDWxin_V10C_150513 = Vic_Dir_Search("141231094101.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$cGroup = $_RESULT->GetField("f_wxin_1501071059_P01");
for ($i = 1; $i < sizeof($cRange); $i++) {
//查用户组
$cField = "*";
$cWhere = "{~}f_wxin_1501071059_P01{_}=={_}" . $cRange[$i];
$cUSafe = "4";
$cUSort = "";
$cDWxin_V10C_150513 = Vic_Dir_Search("141231094101.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
for ($Ci = 0; $Ci < sizeof($_RESULT->Resgrd); $Ci++) {
//查用户
$cField = "*";
$cWhere = "{~}f_wxin_1501070920_E01{_}=={_}" . $cRange[$i];
$cUSafe = "4";
$cUSort = "";
$cDWxin_V10C_150513 = Vic_Dir_Search("141231094201.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
for ($cI = 0; $cI < sizeof($_RESULT->Resgrd); $cI++) {
$cBianhao = $_RESULT->GetField("f_wxin_1501070920_000", $cI);
$cParent = $_RESULT->GetField("f_wxin_1501070920_E01", $cI);
$cPrsVAL["f_wxin_1501070920_E01"] = $cGroup;
//组别
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501070920_000||" . $cBianhao;
Common::Start("141231094202", "", $cPrsVAL);
}
$cGroup = $_RESULT->GetField("f_wxin_1501071059_000", $Ci);
$cPrsVAL["IM_HND"] = "24";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501071059_000||" . $cGroup;
Common::Start("141231094101", "", $cPrsVAL);
}
}
}
}
function K24Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$cPrsVAL["IM_HND"] = 24;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1411241715_E15||" . $iResult->GetField("f_wire_1411241716_000", $iKey);
Common::Start("141124085701", "", $cPrsVAL);
}
function K24Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
//同步删除导入表
$cPrsVAL["IM_HND"] = 24;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1507151720_P01||" . $iResult->GetField("f_wire_1507080936_P01");
Common::Start("141124085701", "", $cPrsVAL);
}
function K24Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
//同步删除导入表
$cPrsVAL["IM_HND"] = 24;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1506031751_P01||" . $iResult->GetField("f_wire_1506031750_P01");
$cPrsVAL["IM_Where"] = "{~}f_wire_1506031751_E01{_}=={_}" . $iResult->GetField("f_wire_1506031750_E01");
Common::Start("150723110801", "", $cPrsVAL);
}
function K24Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$uPrsVAL["f_wire_1506031750_003"] = "";
$uPrsVAL["IM_PST"] = "1";
$uPrsVAL["IM_HND"] = "22";
$uPrsVAL["IM_Range"] = "f_wire_1506031750_P01||" . $iResult->GetField("f_wire_1411121421_002", $iKey);
$uPrsVAL["UserMac"] = $iResult->GetField("f_wire_1411121421_P01", $iKey) . "|" . $iResult->GetField("f_wire_1411121421_010", $iKey);
Common::Start("150605101704", "", $uPrsVAL);
}
function alipay_status_up($appid)
{
if (!empty($appid)) {
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cPrsVAL["f_alipay_1510161710_002"] = "1";
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_alipay_1510161710_004||" . $appid;
Common::Start("151028165001", "", $cPrsVAL);
}
}
function C28Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$eList = array();
$nList = array();
//去掉头元素
$iList = explode("||", $_IMPORT["APars"]);
array_shift($iList);
//检查数据是否存在
$rWhere = "{~}f_wire_1507080936_004{_}=={_}" . $_IMPORT["f_wire_1507080936_004"] . "{~}f_wire_1507080936_E02{_}=={_}" . implode("||", $iList);
$rDBase = Vic_Dir_Search("150605064303.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$rUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$rRs_AA = $_OBJECT["DB"]->GetSource($rUsrWK, 4, $rDBase, "*", $rWhere, NULL, NULL, -1);
if ($_OBJECT["DB"]->RowsCT($rRs_AA->Resval) > 0) {
foreach ($rRs_AA->Resgrd as $key => $val) {
$eList[] = $val["f_wire_1507080936_E02"];
}
}
$nList = array_diff($iList, $eList);
//广播信息批量增加
if ($_IMPORT["BPars"] == "I") {
foreach ($nList as $key => $val) {
$rPrsVAL["f_wire_1507080936_E02"] = $val;
$rPrsVAL["f_wire_1507080936_003"] = $_IMPORT["f_wire_1507080936_003"];
$rPrsVAL["f_wire_1507080936_004"] = $_IMPORT["f_wire_1507080936_004"];
$rPrsVAL["IM_PST"] = "1";
$rPrsVAL["IM_HND"] = 20;
$rPrsVAL["IM_Range"] = "f_wire_1507080936_000||0";
Common::Start("150605064304", "", $rPrsVAL);
}
}
//广播信息批量编辑
if ($_IMPORT["BPars"] == "U" && count($eList) > 0) {
$rPrsVAL["f_wire_1507080936_003"] = $_IMPORT["f_wire_1507080936_003_NEW"];
$rPrsVAL["f_wire_1507080936_004"] = $_IMPORT["f_wire_1507080936_004_NEW"];
$rPrsVAL["IM_PST"] = "1";
$rPrsVAL["IM_HND"] = 22;
$rPrsVAL["IM_Range"] = "f_wire_1507080936_E02||" . implode("||", $eList);
$rPrsVAL["IM_Where"] = "{~}f_wire_1507080936_004{_}=={_}" . $_IMPORT["f_wire_1507080936_004"];
Common::Start("150605064304", "", $rPrsVAL);
}
//广播信息批量删除
if ($_IMPORT["BPars"] == "D" && count($eList) > 0) {
$rPrsVAL["IM_PST"] = "1";
$rPrsVAL["IM_HND"] = 24;
$rPrsVAL["IM_Range"] = "f_wire_1507080936_E02||" . implode("||", $eList);
$rPrsVAL["IM_Where"] = "{~}f_wire_1507080936_004{_}=={_}" . $_IMPORT["f_wire_1507080936_004"];
Common::Start("150605064303", "", $rPrsVAL);
}
}
function K20Pr($iResult, $iKey)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
//查询分组信息
$cIf_AA = "{~}f_wire_1507142038_P01{_}=={_}" . $_IMPORT["f_wire_1506031750_E01"];
$cDBase = Vic_Dir_Search("150715094602.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cRs_AA = $_OBJECT["DB"]->GetSource(Common::$_UsrInf->Getvar("UsrWK"), 4, $cDBase, "*", $cIf_AA, null, null, 1);
if ($_OBJECT["DB"]->RowsCT($cRs_AA->Resval) > 0) {
$iResult->SetField("f_wire_1506031750_E01", $cRs_AA->GetField("f_wire_1507142038_P01"), $iKey);
$iResult->SetField("f_wire_1506031750_E02", $cRs_AA->GetField("f_wire_1507142038_002"), $iKey);
$iResult->SetField("f_wire_1506031750_C01", $cRs_AA->GetField("f_wire_1507142038_004"), $iKey);
//用户导入相应区域:Begin//
if (isset($_IMPORT["AreID"]) && $_IMPORT["AreID"]) {
$cPrsVAL["f_wire_1506031751_P01"] = $_IMPORT["f_wire_1506031750_P01"];
//用户编号
$cPrsVAL["f_wire_1506031751_E01"] = $cRs_AA->GetField("f_wire_1507142038_P01");
//从属组织
$cPrsVAL["f_wire_1506031751_E02"] = $cRs_AA->GetField("f_wire_1507142038_002");
//组织路径
$cPrsVAL["f_wire_1506031751_C01"] = $cRs_AA->GetField("f_wire_1507142038_004");
//名称路径
$cPrsVAL["f_wire_1506031751_002"] = $_IMPORT["f_wire_1506031750_002"];
//用户密码
$cPrsVAL["f_wire_1506031751_003"] = $_IMPORT["f_wire_1506031750_011"];
//用户名称
$cPrsVAL["f_wire_1506031751_004"] = $_IMPORT["AreID"];
//区域编号
$cPrsVAL["f_wire_1506031751_005"] = date('Y-m-d H:i:s', time());
//导入时间
$cPrsVAL["IM_HND"] = 20;
$cPrsVAL["IM_PST"] = 1;
$cPrsVAL["IM_Range"] = "f_wire_1506031751_000||0";
Common::Start("150802150705", "", $cPrsVAL);
}
//用户导入相应区域:End/
//分组属性分拆
if ($cRs_AA->GetField("f_wire_1507142038_007")) {
$GouPro = explode(",", $cRs_AA->GetField("f_wire_1507142038_007"));
foreach ($GouPro as $Key => $Val) {
$SendPrams[Common::FindFL("=", 0, $Val)] = Common::FindFL("=", 1, $Val);
}
}
}
$SendPrams["revealUsername"] = $_IMPORT["f_wire_1506031750_P01"];
//登录帐号
$SendPrams["password"] = $_IMPORT["f_wire_1506031750_002"];
//登录密码
$_OBJECT["SP"]->Sureface('INC-141127-004_0004/Add', $BackJSN, $SendPrams);
//联动AP增加用户
}
function C20Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cRange = array();
if (isset($_IMPORT["IM_Range"]) && trim($_IMPORT["IM_Range"]) != "") {
$mWhere = trim($_IMPORT["IM_Range"]);
$cRange = explode("&", $mWhere);
$zRange = explode("=", $cRange[0]);
$bRange = explode("=", $cRange[1]);
}
$cPrsVAL["f_wxin_1501070920_E01"] = $zRange[1];
//组别
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501070920_000||" . $bRange[1];
Common::Start("141231094202", "", $cPrsVAL);
}
function Upmuban($mediaID, $cMuban)
{
$_OBJECT =& $this->APPObj;
$cField = "*";
$cWhere = "{~}f_wxin_1501280950_P01{_}=={_}" . $cMuban;
$cUSafe = "4";
$cUSort = "";
$cDWxin_V10C_150513 = Vic_Dir_Search("150128100601.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$cPrsVAL["f_wxin_1501280950_003"] = $mediaID;
//媒体ID
$cPrsVAL["f_wxin_1501280950_004"] = date('Y-m-d H:i:s', time());
//修改时间
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501280950_000||" . $_RESULT->GetField("f_wxin_1501280950_000", 0);
Common::Start("150128100602", "", $cPrsVAL);
exit;
}
function C20Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cPrsVAL["f_wxin_1412311029_011"] = $_IMPORT['f_wxin_1412311029_011'];
//主机
$cPrsVAL["f_wxin_1412311029_014"] = $_IMPORT['f_wxin_1412311029_014'];
//用户名
$cPrsVAL["f_wxin_1412311029_015"] = $_IMPORT['f_wxin_1412311029_015'];
//密码
$cPrsVAL["f_wxin_1412311029_013"] = $_IMPORT['f_wxin_1412311029_013'];
//端口
$cPrsVAL["f_wxin_1412311029_012"] = $_IMPORT['f_wxin_1412311029_012'];
//根目录
$cPrsVAL["f_wxin_1412311029_016"] = $_IMPORT['f_wxin_1412311029_016'];
//本地目录
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1412311029_010||" . $_IMPORT['APars'];
Common::Start("141231094502", "", $cPrsVAL);
exit;
}
function SaoYSao($WInfo, $DevInfo)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$mMod = isset($_IMPORT["IM_Mod"]) ? $_IMPORT["IM_Mod"] : "";
//接入模块
$mUsrID = "";
$mUsrNA = "";
//获取设备接入历史数据
$sIf_AA = "{~}f_wire_1411121421_P01{_}=={_}" . $DevInfo["UserMac"] . "{~}f_wire_1411121421_010{_}=={_}" . $DevInfo["Vlan"];
$sRs_AA = $this->GetInfo($this->sSql, $sIf_AA);
//获取关联的用户信息
$uIf_AA = "{~}f_wire_1506031750_003{_}%%{_}" . $DevInfo["UserMac"] . "|" . $DevInfo["Vlan"];
$uRs_AA = $this->GetInfo($this->uSql, $uIf_AA);
if ($_OBJECT["DB"]->RowsCT($uRs_AA->Resval) == 0) {
//检测是否存在关联用户
$AccUsrName = $this->MakeUsrID("SUR");
$uPrsVAL["f_wire_1506031750_P01"] = $AccUsrName;
//接入用户ID
$uPrsVAL["f_wire_1506031750_E01"] = $WInfo["Group"][2];
//用户分组
$uPrsVAL["f_wire_1506031750_002"] = "123456";
//登录密码
$uPrsVAL["f_wire_1506031750_003"] = $DevInfo["UserMac"] . "|" . $DevInfo["Vlan"];
//设备MAC
$uPrsVAL["f_wire_1506031750_004"] = 0;
//启用状态
$uPrsVAL["f_wire_1506031750_011"] = $AccUsrName;
//接入用户名称
$uPrsVAL["AreID"] = $this->areID;
//接入区域
$uPrsVAL["IM_PST"] = "1";
$uPrsVAL["IM_HND"] = "20";
$uPrsVAL["IM_Range"] = "f_wire_1506031750_000||0";
Common::Start("150605101704", "", $uPrsVAL);
$mUsrID = $AccUsrName;
//接入用户ID
$mUsrNA = $AccUsrName;
//接入用户名称
} else {
$mUsrID = $uRs_AA->GetField("f_wire_1506031750_P01", 0);
//接入用户ID
$mUsrNA = $uRs_AA->GetField("f_wire_1506031750_011", 0);
//接入用户名称
}
//设备接入系统检测
$_IMPORT["f_wire_1411121421_002"] = $mUsrID;
//接入用户ID
$_IMPORT["f_wire_1411121421_003"] = $mUsrNA;
//接入用户名称
$_IMPORT["f_wire_1411121421_011"] = 3;
//认证模式
if ($_OBJECT["DB"]->RowsCT($sRs_AA->Resval) > 0) {
//更新接入信息
$_IMPORT["IM_HND"] = "22";
$_IMPORT["IM_PST"] = "1";
$_IMPORT["IM_Range"] = "f_wire_1411121421_P01||" . $DevInfo["UserMac"];
$_IMPORT["IM_Where"] = "{~}f_wire_1411121421_010{_}=={_}" . $DevInfo["Vlan"];
parent::C22Pr();
} else {
//新增接入信息
$_IMPORT["f_wire_1411121421_P01"] = $DevInfo["UserMac"];
//终端设备编号
$_IMPORT["f_wire_1411121421_004"] = $DevInfo["DevId"];
//AP出口名称
$_IMPORT["f_wire_1411121421_005"] = 1;
//状态，0-禁用，1-启用
$_IMPORT["f_wire_1411121421_006"] = date('Y-m-d H:i:s', time());
//接入时间
$_IMPORT["f_wire_1411121421_007"] = $DevInfo["Params"];
//跳转参数
$_IMPORT["f_wire_1411121421_009"] = $mMod;
//接入模式
$_IMPORT["f_wire_1411121421_010"] = $DevInfo["Vlan"];
//vlan
$_IMPORT["IM_HND"] = "20";
$_IMPORT["IM_PST"] = "1";
$_IMPORT["IM_Range"] = "f_wire_1411121421_000||0";
parent::C20Pr();
}
}
function DelStakeholders($type, $ids)
{
$WList = array();
$WList["IM_HND"] = "24";
$WList["IM_PST"] = "1";
$WList["IM_Where"] = "{~}f_work_1309290927_010{_}=={_}0";
if ($type == 0) {
$WList["IM_Range"] = "f_work_1309290927_E02||" . $ids;
} else {
$WList["IM_Range"] = "f_work_1309290927_P01||" . $ids;
}
Common::Start("141210115501", "", $WList);
}
function GetUser($User, $cGroup)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cField = "*";
$cWhere = "{~}f_wxin_1501070920_P01{_}=={_}" . $User;
$cUSafe = "4";
$cUSort = "f_wxin_1501070920_002 asc";
$cDWxin_V10C_150513 = Vic_Dir_Search("141231094201.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$a = $_OBJECT["DB"]->RowsCT($_RESULT->Resval);
if ($_OBJECT["DB"]->RowsCT($_RESULT->Resval) == 0) {
//数据库没有记录，进行插入
$Wxin_Token = $this->getAccess_token($_IMPORT["APars"]);
//获取access_token
$SendData["access_token"] = $Wxin_Token;
$SendData["openid"] = $User;
$_OBJECT["SP"]->Sureface('INC-141215-007_0007/GetUserInfo', $BackAy, $SendData);
if ($BackAy["ST"] == "OK") {
$Result = json_decode($BackAy["RS"], true);
$HeadImgUrl = $Result["headimgurl"];
if ($HeadImgUrl == "") {
/* $HeadImgUrl="http://d.hiphotos.baidu.com/exp/w=200/sign=fe3ba80ba586c91708035539f93f70c6/e7cd7b899e510fb364d53b64db33c895d0430c70.jpg";*/
$HeadImgUrl = "../Wxin_V10C_150513/Img/Xs/wxima.jpg";
}
$cPrsVAL["f_wxin_1501070920_P01"] = $Result["openid"];
//微信号
$cPrsVAL["f_wxin_1501070920_001"] = $Result["nickname"];
//昵称
$cPrsVAL["f_wxin_1501070920_002"] = $Result["sex"];
//性别
$cPrsVAL["f_wxin_1501070920_003"] = $Result["country"];
//国家
$cPrsVAL["f_wxin_1501070920_004"] = $Result["province"];
//省份
$cPrsVAL["f_wxin_1501070920_005"] = $Result["city"];
//城市
$cPrsVAL["f_wxin_1501070920_006"] = $HeadImgUrl;
//头像
$cPrsVAL["f_wxin_1501070920_007"] = $Result["remark"];
//特权
$cPrsVAL["f_wxin_1501070920_008"] = $Result["subscribe"];
//关注状态
$cPrsVAL["f_wxin_1501070920_009"] = date('Y-m-d H:i:s', time());
//关注时间
$cPrsVAL["f_wxin_1501070920_E01"] = $cGroup;
//组别
$cPrsVAL["f_wxin_1501070920_E02"] = $_IMPORT["APars"];
//公众号编号
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501070920_000||0";
Common::Start("141231094202", "", $cPrsVAL);
}
} else {
//数据库有记录的，更新用户信息
$Wxin_Token = $this->getAccess_token($_IMPORT["APars"]);
//获取access_token
$SendData["access_token"] = $Wxin_Token;
$SendData["openid"] = $User;
$_OBJECT["SP"]->Sureface('INC-141215-007_0007/GetUserInfo', $BackAy, $SendData);
if ($BackAy["ST"] == "OK") {
$Result = json_decode($BackAy["RS"], true);
$HeadImgUrl = $Result["headimgurl"];
if ($HeadImgUrl == "") {
$HeadImgUrl = "../Wxin_V10C_150513/Img/Xs/wxima.jpg";
}
$cPrsVAL["f_wxin_1501070920_P01"] = $Result["openid"];
//微信号
$cPrsVAL["f_wxin_1501070920_001"] = $Result["nickname"];
//昵称
$cPrsVAL["f_wxin_1501070920_002"] = $Result["sex"];
//性别
$cPrsVAL["f_wxin_1501070920_003"] = $Result["country"];
//国家
$cPrsVAL["f_wxin_1501070920_004"] = $Result["province"];
//省份
$cPrsVAL["f_wxin_1501070920_005"] = $Result["city"];
//城市
$cPrsVAL["f_wxin_1501070920_006"] = $HeadImgUrl;
//头像
$cPrsVAL["f_wxin_1501070920_007"] = $Result["remark"];
//特权
$cPrsVAL["f_wxin_1501070920_008"] = $Result["subscribe"];
//关注状态
$cPrsVAL["f_wxin_1501070920_009"] = date('Y-m-d H:i:s', time());
//关注时间
$cPrsVAL["f_wxin_1501070920_E02"] = $_IMPORT["APars"];
//公众号编号
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_wxin_1501070920_P01||" . $User;
Common::Start("141231094202", "", $cPrsVAL);
}
}
}
function C17Pr()
{
//不能重复绑定
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$cField = "*";
//查找的字段
$cWhere = "{~}f_fsfy_151010100200_001{_}=={_}" . $_POST['mother_name'] . " {~}f_fsfy_151010100200_002{_}=={_}" . $_POST['mobile'] . " {~}f_fsfy_151010100200_004{_}=={_}" . $_POST['open_id'];
//帅选条件
$cUSafe = "4";
//安全级别
$cUSort = "";
//排序
$cDWxin_V10C_150513 = Vic_Dir_Search("151010100200.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$data = $_RESULT->Resgrd;
if (!empty($data[0]['f_fsfy_151010100200_002'])) {
echo 3;
die;
//已经绑定
} else {
//未绑定则入库
$cPrsVAL["f_fsfy_151010100200_S01"] = "{ECAFBD3E-4739-7267-B02A-0341390581E8}";
$cPrsVAL["f_fsfy_151010100200_001"] = $_POST['mother_name'];
$cPrsVAL["f_fsfy_151010100200_002"] = $_POST['mobile'];
$cPrsVAL["f_fsfy_151010100200_003"] = $_POST['birth_date'];
//出生日期
$cPrsVAL["f_fsfy_151010100200_004"] = $_POST['open_id'];
//openid $userinfo_json['openid']
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_fsfy_151010100200_000||0";
//echo $_POST['mother_name'];
Common::Start("151010100202", "", $cPrsVAL);
$_SESSION['bangding'] = $_POST['open_id'];
if ($_POST['state'] == 1) {
header('Location: http://58.67.198.90/?IM_SRC=151010100200&open_id=' . $_POST['open_id']);
} else {
if ($_POST['state'] == 2) {
header('Location: http://58.67.198.90/?IM_SRC=151010100203&open_id=' . $_POST['open_id']);
}
}
}
}
function BaoMing_GJKJCX($postObj)
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$textTpl = "<xml>\n\t\t\t<ToUserName><![CDATA[%s]]></ToUserName>\n\t\t\t<FromUserName><![CDATA[%s]]></FromUserName>\n\t\t\t<CreateTime>%s</CreateTime>\n\t\t\t<MsgType><![CDATA[%s]]></MsgType>\n\t\t\t<Content><![CDATA[%s]]></Content>\n\t\t\t<FuncFlag>0</FuncFlag>\n\t\t\t</xml>";
$SenWXID = $postObj->FromUserName;
//发送人OpenID
$RecWXID = $postObj->ToUserName;
//接收公众号
$NowTime = time();
//当前时间
//获取报名设置
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_HND"] = "12";
$cPrsVAL["IM_OUT"] = "JSN-V1.0";
$SysSetJSN = Common::Start("150401165301", "", $cPrsVAL);
$SysSetAY = json_decode($SysSetJSN, true);
if ($SysSetAY["XPG"]["ReSize"] > 0) {
$ActInfo = $SysSetAY["XTB"];
$GroupInfo = $ActInfo[0]["GroupInfo"];
$AreaInfo = $ActInfo[0]["AreaInfo"];
//查询绑定用户
$cIf_AA = "{~}f_iams_1406061302_015{_}%%{_}" . $SenWXID;
$cRs_AA = $_OBJECT["DB"]->GetSource(Common::$_UsrInf->Getvar("UsrWK"), 2, "USR", "*", $cIf_AA, "f_iams_1406061302_000 asc", NULL, 1);
if ($_OBJECT["DB"]->RowsCT($cRs_AA->Resval) > 0 && Common::FindFL(",", 1, $cRs_AA->GetField("f_iams_1406061302_015")) == $SenWXID) {
//查询是否报名
$UsrID = $cRs_AA->GetField("f_iams_1406061302_P01") . "@" . $cRs_AA->GetField("f_iams_1406061302_E01");
$cPrsVAL["IM_HND"] = "11";
$cPrsVAL["IM_Where"] = "{~}f_exam_1503311140_E02{_}=={_}" . $UsrID;
//error_log("\r\n 2 \r\n",3,'./Wxin_V10C_150513/Doc/wxAPILog/' . date("Ymd") . ".log");
$ParInJSN = Common::Start("151021141607", "", $cPrsVAL);
$ParInAY = json_decode($ParInJSN, true);
if ($ParInAY["XPG"]["ReSize"] == 0) {
$Content = "经系统检测，您的微信号可进行报名申请，请点击报名申请！\n<a href='http://" . $_SERVER["HTTP_HOST"] . "/?IM_SRC=151021141605&WxID=" . $SenWXID . "'>立即报名/团队报名</a>";
} else {
$ACTGroup = array("SCR-151022-00000001" => "小学组", "SCR-151022-00000002" => "中学组");
$ParIn = $ParInAY["XTB"][0];
$msg = "";
if ($ParIn["f_exam_1503311140_006"] == 1) {
//学生
$msg .= "您是学生，报名信息已提交。";
if ($ParIn["f_exam_1503311140_E03"] != "") {
$msg .= "，已加入团队申请，所有组别是" . $ACTGroup[$ParIn["f_exam_1503311140_E05"]];
} else {
$msg .= "，未加入团队申请，请联系老师或者团队负责人进行团队报名。";
}
} else {
$msg .= "您是老师，报名信息已提交。";
}
if ($ParIn["f_exam_1503311140_016"] == 0) {
$msg .= "\n\n未审核。";
} elseif ($ParIn["f_exam_1503311140_016"] == 1) {
$msg .= "\n\n审核已通过，请关注公告考试时间。";
} else {
$msg .= "\n\n审核没有通过。";
}
$msg .= "\n\n<a href='http://" . $_SERVER["HTTP_HOST"] . "/?IM_SRC=151021141605&WxID=" . $SenWXID . "'>修改报名/团队报名</a>";
$Content = $msg;
//error_log("\r\n".$Content."\r\n",3,'./Wxin_V10C_150513/Doc/wxAPILog/' . date("Ymd") . ".log");
}
} else {
$Content = "您还没有绑定管理系统，无法进行报名操作！\n<a href='http://" . $_SERVER["HTTP_HOST"] . "/?IM_SRC=151021141603&WxID=" . $SenWXID . "'>立即绑定</a> <a href='http://" . $_SERVER["HTTP_HOST"] . "/?IM_SRC=151021141604&WxID=" . $SenWXID . "'>立即注册</a>";
}
} else {
$Content = "活动暂未开始，请继续关注！";
}
// $handle = fopen("Wxin_V10C_150513/Doc/0000000000/SOCKET.TXT","w");
// $contents = fwrite($handle,"123");
// fclose($handle);
echo sprintf($textTpl, $SenWXID, $RecWXID, $NowTime, "text", $Content);
//推送消息
}
function C10Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$succ_result = 0;
$error_result = 0;
if (!empty($_FILES['inport_file'])) {
//print_r($_FILES['inport_file']);exit;
$file = $_FILES['inport_file'];
$max_size = "2000000";
//最大文件限制（单位：byte）
$fname = $file['name'];
$ftype = strtolower(substr(strrchr($fname, '.'), 1));
//文件格式
$uploadfile = $file['tmp_name'];
if ($_SERVER['REQUEST_METHOD'] == 'POST') {
if (is_uploaded_file($uploadfile)) {
if ($file['size'] > $max_size) {
echo "Import file is too large";
exit;
}
if ($ftype != 'xls') {
echo "Import file type is error";
exit;
}
} else {
echo "上传文件不能为空";
exit;
}
}
//die;
//error_reporting(0);
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel.php';
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel/IOFactory.php';
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel/Reader/Excel5.php';
/**对excel里的日期进行格式转化*/
$objReader = PHPExcel_IOFactory::createReader('Excel5');
//use excel2007 for 2007 format
//$objPHPExcel = $objReader->load('test.xls');
$objPHPExcel = $objReader->load($uploadfile);
$sheet = $objPHPExcel->getSheet(0);
$highestRow = $sheet->getHighestRow();
// 取得总行数
$highestColumn = $sheet->getHighestColumn();
// 取得总列数
$arr_result = array();
$strs = array();
//echo 666989;die;
$arr_result = NULL;
for ($j = 2; $j <= $highestRow; $j++) {
unset($arr_result);
unset($strs);
for ($k = 'A'; $k <= $highestColumn; $k++) {
//读取单元格
//$arr_result.= $objPHPExcel->getActiveSheet()->getCell("$k$j")->getValue().',';
$excel_data[$k] = $objPHPExcel->getActiveSheet()->getCell("{$k}{$j}")->getValue();
}
$cPrsVAL["f_fsfy_1510201011_S01"] = "{ECAFBD3E-4739-7267-B02A-0341390581E8}";
//卡片号
$cPrsVAL["f_fsfy_1510201011_S05"] = "*****@*****.**";
//卡片号
$cPrsVAL["f_fsfy_1510201011_001"] = $excel_data['A'];
//
$cPrsVAL["f_fsfy_1510201011_002"] = $excel_data['B'];
//卡片号
$cPrsVAL["f_fsfy_1510201011_003"] = $excel_data['C'];
//母亲姓名
$cPrsVAL["f_fsfy_1510201011_004"] = $excel_data['D'];
//消息类型
$cPrsVAL["f_fsfy_1510201011_005"] = $this->excelTime($excel_data['E']);
$cPrsVAL["f_fsfy_1510201011_006"] = $excel_data['F'];
//对话类型
$cPrsVAL["f_fsfy_1510201011_007"] = $excel_data['G'];
//文本内容
$cPrsVAL["f_fsfy_1510201011_008"] = $excel_data['H'];
//公众号
$cPrsVAL["f_fsfy_1510201011_009"] = $excel_data['I'];
//床号
$cPrsVAL["f_fsfy_1510201011_010"] = $excel_data['J'];
//
$cPrsVAL["f_fsfy_1510201011_011"] = $excel_data['K'];
//归属组
$cPrsVAL["f_fsfy_1510201011_012"] = $excel_data['L'];
//手机号
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_fsfy_1510201011_000||0";
//print_r($cPrsVAL); die;
Common::Start("151010100111", "", $cPrsVAL);
header('Location: http://58.67.198.90/?IM_SRC=151010100111');
}
}
$_POST['cardid'] = 10086;
$cField = "*";
//查找的字段
if (!empty($_POST['cardid'])) {
$cWhere = "{~}f_fsfy_1510201011_002{_}=={_}" . $_POST['cardid'];
} else {
$cWhere = "";
//帅选条件
}
$cUSafe = "4";
//安全级别
$cUSort = "f_fsfy_1510201011_000 asc";
//排序
$cDWxin_V10C_150513 = Vic_Dir_Search("151010100111.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$this->APPTml->Setvar("list", $_RESULT->Resgrd);
//$this->APPTml->Setvar("test1",$arr);
//print_r($_RESULT);exit;
}
function C10Pr()
{
$_OBJECT =& $this->APPObj;
$_IMPORT =& $this->IMPORT;
$_RESULT =& $this->Result;
$succ_result = 0;
$error_result = 0;
if (!empty($_FILES['inport_file'])) {
//print_r($_FILES['inport_file']);exit;
$file = $_FILES['inport_file'];
$max_size = "2000000";
//最大文件限制（单位：byte）
$fname = $file['name'];
$ftype = strtolower(substr(strrchr($fname, '.'), 1));
//文件格式
$uploadfile = $file['tmp_name'];
if ($_SERVER['REQUEST_METHOD'] == 'POST') {
if (is_uploaded_file($uploadfile)) {
if ($file['size'] > $max_size) {
echo "Import file is too large";
exit;
}
$types = array("xls", "xlsx");
if (!in_array($ftype, $types)) {
echo "Import file type is error";
exit;
}
/* if($ftype=='xls'||$ftype=='xlsx'){
echo "Import file type is error";
exit;
}*/
} else {
echo "The file is not empty!";
exit;
}
}
//die;
//error_reporting(0);
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel.php';
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel/IOFactory.php';
require_once './Fsfy_V10C_151008/Prg/0000000000/phpexcel/Classes/PHPExcel/Reader/Excel5.php';
/**对excel里的日期进行格式转化*/
$objReader = PHPExcel_IOFactory::createReader('Excel5');
//use excel2007 for 2007 format
//$objPHPExcel = $objReader->load('test.xls');
$objPHPExcel = $objReader->load($uploadfile);
$sheet = $objPHPExcel->getSheet(0);
$highestRow = $sheet->getHighestRow();
// 取得总行数
$highestColumn = $sheet->getHighestColumn();
// 取得总列数
$arr_result = array();
$strs = array();
//echo 666989;die;
$arr_result = NULL;
for ($j = 2; $j <= $highestRow; $j++) {
unset($arr_result);
unset($strs);
for ($k = 'A'; $k <= $highestColumn; $k++) {
//读取单元格
//$arr_result.= $objPHPExcel->getActiveSheet()->getCell("$k$j")->getValue().',';
$excel_data[$k] = $objPHPExcel->getActiveSheet()->getCell("{$k}{$j}")->getValue();
}
//print_r($excel_data);
//消息插入数据库
$cPrsVAL["f_fsfy_1510201012_S01"] = "{ECAFBD3E-4739-7267-B02A-0341390581E8}";
$cPrsVAL["f_fsfy_1510201012_S05"] = "*****@*****.**";
$cPrsVAL["f_fsfy_1510201012_001"] = $excel_data['A'];
//报告单号
$cPrsVAL["f_fsfy_1510201012_002"] = $excel_data['B'];
//申请单号
$cPrsVAL["f_fsfy_1510201012_003"] = $excel_data['C'];
//卡片号
$cPrsVAL["f_fsfy_1510201012_004"] = $excel_data['D'];
//检验项目编码
$cPrsVAL["f_fsfy_1510201012_005"] = $excel_data['E'];
//检验项目名称
$cPrsVAL["f_fsfy_1510201012_006"] = $this->excelTime($excel_data['F']);
//对话类型
$cPrsVAL["f_fsfy_1510201012_007"] = $excel_data['G'];
//报告人
$cPrsVAL["f_fsfy_1510201012_008"] = $excel_data['H'];
$cPrsVAL["f_fsfy_1510201012_009"] = $this->excelTime($excel_data['I']);
//床号
$cPrsVAL["f_fsfy_1510201012_010"] = $excel_data['J'];
//
$cPrsVAL["f_fsfy_1510201012_011"] = $excel_data['K'];
//
$cPrsVAL["f_fsfy_1510201012_012"] = $excel_data['L'];
//
$cPrsVAL["f_fsfy_1510201012_013"] = $excel_data['M'];
//o
$cPrsVAL["f_fsfy_1510201012_014"] = $excel_data['N'];
//检测方法
$cPrsVAL["f_fsfy_1510201012_018"] = $excel_data['P'];
//是否为复检
$cPrsVAL["IM_HND"] = "20";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_fsfy_1510201012_000||0";
//如有重复则删除
$cField = "*";
//查找的字段
$cWhere = "{~}f_fsfy_1510201012_003{_}=={_}" . $excel_data['C'] . " {~}f_fsfy_1510201012_005{_}=={_}" . $excel_data['E'] . " {~}f_fsfy_1510201012_018{_}=={_}" . $excel_data['P'];
//帅选条件
$cUSafe = "4";
//安全级别
$cUSort = "";
//排序
$cDWxin_V10C_150513 = Vic_Dir_Search("151010100113.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
$rep = $_RESULT->Resgrd;
//print_r($rep);die;
if (!empty($rep[0]['f_fsfy_1510201012_005'])) {
$ICSql = "delete from t_fsfy_1510201012 where f_fsfy_1510201012_000 = " . $rep[0]['f_fsfy_1510201012_000'];
array_push($_OBJECT["DB"]->Querys, $ICSql);
$_OBJECT["DB"]->FillBatch();
}
//print_r();
Common::Start("151010100113", "", $cPrsVAL);
echo "<script>alert('导入成功');</script>";
header('Location: http://58.67.198.90/?IM_SRC=151010100113');
}
}
$cField = "*";
//查找的字段
$cWhere = "";
//帅选条件
$cUSafe = "4";
//安全级别
$cUSort = "f_fsfy_1510201012_000 asc";
//排序
$cDWxin_V10C_150513 = Vic_Dir_Search("151010100113.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
//print_r($_RESULT->Resgrd);
$this->APPTml->Setvar("list", $_RESULT->Resgrd);
//$this->APPTml->Setvar("test1",$arr);
//print_r($_RESULT);exit;
}
function updateCardidStatus($date)
{
// $date = array (
// 0 => array (0 => '13929937883',1 => '948479',2 => '五项常规',),
// 1 => array (0 => '13929937883',1 => '948479',2 => '串联质谱',),
// 2 => array (0 => '13288376568',1 => '948478',2 => '五项常规',),
// );
foreach ($date as $cDate) {
$_OBJECT =& $this->APPObj;
$_RESULT =& $this->Result;
$cField = "*";
//查找的字段
$cWhere = "{~}f_fsfy_1510201012_003{_}=={_}" . $cDate[1] . "{~}f_fsfy_1510201012_005{_}=={_}" . $cDate[2];
//帅选条件
$cUSafe = "4";
//安全级别
$cUSort = "";
//排序
$cDWxin_V10C_150513 = Vic_Dir_Search("151010100119.INI", "/" . $this->APPCls->Getvar("RunPath") . "/Sql/", 0, "T");
$cUsrWK = Common::$_UsrInf->Getvar("UsrWK");
$_RESULT = $_OBJECT["DB"]->GetSource($cUsrWK, $cUSafe, $cDWxin_V10C_150513, $cField, $cWhere, $cUSort, NULL, -1);
if ($_OBJECT["DB"]->RowsCT($_RESULT->Resval) > 0) {
$cPrsVAL["f_fsfy_1510201012_016"] = '已发';
$cPrsVAL["f_fsfy_1510201012_017"] = date('Y-m-d H:i:s', time());
//关注时间
$cPrsVAL["IM_HND"] = "22";
$cPrsVAL["IM_PST"] = "1";
$cPrsVAL["IM_Range"] = "f_fsfy_1510201012_000||" . $_RESULT->GetField("f_fsfy_1510201012_000", 0);
Common::Start("151010100119", "", $cPrsVAL);
}
}
}
