/** * delete subcriber * * @param $list_id * @param $email * @return bool */ function cw_vertical_response_delete_subcriber($list_id, $email) { global $config; $vertical_response_email = trim($config[vertical_response_addon_name]['vertical_response_email']); $vertical_response_password = trim($config[vertical_response_addon_name]['vertical_response_password']); try { $vr = new SoapClient(vertical_response_wsdl, array('connection_timeout' => 5)); $sid = $vr->login(array('username' => "{$vertical_response_email}", 'password' => "{$vertical_response_password}", 'session_duration_minutes' => vertical_response_ses_time)); $list_members = $vr->searchListMembers(array('session_id' => $sid, 'field_name' => 'email_address', 'field_value' => $email, 'list_id' => $list_id, 'max_records' => 1)); if (!empty($list_members) && count($list_members)) { $hash = ""; foreach ($list_members[0]->member_data as $data) { if ($data->name == 'hash') { $hash = $data->value; break; } } $vr->deleteListMember(array('session_id' => $sid, 'list_member' => array('list_id' => $list_id, 'member_data' => array(array('name' => 'hash', 'value' => $hash))))); } } catch (SoapFault $exception) { //exit ('fault: "' . $exception->faultcode . '" - ' . $exception->faultstring . "\n"); return false; } return true; }