diff --git a/sites/all/modules/gui/materiobasemod/materio_user.module b/sites/all/modules/gui/materiobasemod/materio_user.module index c11871ca..6efd2843 100755 --- a/sites/all/modules/gui/materiobasemod/materio_user.module +++ b/sites/all/modules/gui/materiobasemod/materio_user.module @@ -22,6 +22,10 @@ function materio_user_permission() { 'title' => t('access to online payment'), 'description' => t('Access to online payment'), ), + 'access to user export' => array( + 'title' => t('access to user export'), + 'description' => t('Access to user export'), + ), ); $simplenews_cats = simplenews_category_list(); @@ -73,6 +77,13 @@ function materio_user_menu(){ 'access callback' => TRUE, ); + $items['materio_user/export'] = $base+array( + 'title' => 'Materio base user export', + 'page callback' => 'materio_user_export', + // 'page arguments' => array(), + 'access arguments' => array('access to user export'), + ); + return $items; } diff --git a/sites/all/modules/gui/materiobasemod/materio_user.pages.inc b/sites/all/modules/gui/materiobasemod/materio_user.pages.inc index 294a95de..e131315e 100644 --- a/sites/all/modules/gui/materiobasemod/materio_user.pages.inc +++ b/sites/all/modules/gui/materiobasemod/materio_user.pages.inc @@ -55,4 +55,31 @@ function materio_user_login_submit(){ user_login_submit(array(), $form_state); drupal_json_output($return); -} \ No newline at end of file +} + +function materio_user_export(){ + $query = db_select('users', 'u'); + $query->join('users_roles', 'ur', 'u.uid=ur.uid'); + $query->join('simplenews_subscriber', 'ssr', 'u.uid=ssr.uid'); + $query->join('simplenews_subscription', 'ssn', 'ssr.snid=ssn.snid'); + $query + // ->range(0, 5) + ->fields('u', array('mail')) + ->condition('u.status', '1') + ->condition('ur.rid', '7') + ->condition('ssn.tid', '6374') + ->condition('ssn.status', '1'); + + $results = $query->execute()->fetchall(); + + $vals = array(); + foreach ($results as $rec) { + $vals[] = $rec->mail; + } + $ret = "Liste des user utilisateur inscrits au daily
"; + $ret .= ''; + return $ret; +} + + +