source: pmb4.2/trunk/fuentes/pmb/usur_exp.php @ 828

Last change on this file since 828 was 828, checked in by jrpelegrina, 4 years ago

WIP in lliurex features and modifications 4

File size: 3.5 KB
Line 
1<?php
2//-------------------------------------> L L I U R E X <--------------------------------------//
3// Modulo de importación/exportacion de usuarios de pmb, a partir de un fichero de texto plano
4
5
6function compruebanull($row, $text, $sep)
7{
8        if($row[$text]==NULL){
9        return (" " . $sep);}
10        else return ($row[$text] . $sep);
11}
12
13$base_path=".";                           
14$base_auth = "ADMINISTRATION_AUTH"; 
15$base_title = "\$msg[7]";   
16require_once ("$base_path/includes/init.inc.php"); 
17
18
19$categor = $_GET['categor'];
20
21
22switch($categor){ // Selección de opciones.
23
24
25case 'export':{
26//Exportar a un fichero de texto
27
28$sep= $_POST['separador'];
29$temp="$base_path/temp/";//lo metemos en el temporal del pmb
30$ale="export".rand().".txt";//auto nombre
31$exp=fopen($temp.$ale, "w");
32require("$base_path/includes/db_param.inc.php");
33$link2 = @mysql_connect(SQL_SERVER, USER_NAME, USER_PASS) OR die("Error MySQL");
34$sql= "SELECT empr_cb, empr_nom, empr_prenom, empr_adr1, empr_adr2, empr_cp, empr_ville, empr_pays, empr_mail, empr_tel1, empr_tel2, empr_prof, empr_year, empr_sexe, empr_login, empr_password, empr_msg, empr_lang, type_abt, last_loan_date, empr_location, date_fin_blocage, total_loans, empr_statut
35FROM empr WHERE id_empr is not null";
36$result= @mysql_query($sql, $link2);
37if (@mysql_num_rows($result) == 0) {
38        echo "$msg[usur_imp_m]";
39        break;
40        }
41else{ //variable que luego se escribirá en el fichero de exportación
42$cadena = "";
43 while ($row = mysql_fetch_array($result)) {
44$cadena.= compruebanull($row,'empr_cb',$sep);
45$cadena.= compruebanull($row,'empr_nom',$sep);
46$cadena.= compruebanull($row,'empr_prenom',$sep);
47$cadena.= compruebanull($row,'empr_adr1',$sep);
48$cadena.= compruebanull($row,'empr_adr2',$sep);
49$cadena.= compruebanull($row,'empr_cp',$sep);
50$cadena.= compruebanull($row,'empr_ville',$sep);
51$cadena.= compruebanull($row,'empr_pays',$sep);
52$cadena.= compruebanull($row,'empr_mail',$sep);
53$cadena.= compruebanull($row,'empr_tel1',$sep);
54$cadena.= compruebanull($row,'empr_tel2',$sep);
55$cadena.= compruebanull($row,'empr_prof',$sep);
56$cadena.= compruebanull($row,'empr_year',$sep);
57$cadena.= compruebanull($row,'empr_sexe',$sep);
58$cadena.= compruebanull($row,'empr_login',$sep);
59$cadena.= compruebanull($row,'empr_password',$sep);
60$cadena.= compruebanull($row,'empr_msg',$sep);
61$cadena.= compruebanull($row,'empr_lang',$sep);
62$cadena.= compruebanull($row,'type_abt',$sep);
63$cadena.= compruebanull($row,'last_loan_date',$sep);
64$cadena.= compruebanull($row,'empr_location',$sep);
65$cadena.= compruebanull($row,'date_fin_blocage',$sep);
66$cadena.= compruebanull($row,'total_loans',$sep);
67$cadena.= compruebanull($row,'empr_statut',$sep);
68$cadena.="\n\n";
69}
70fputs($exp, $cadena);
71fclose($exp);
72echo "$msg[exporta_b] &nbsp;<b><a href=descargas.php?f=$temp$ale target=\"_self\">". $ale . " </a></b><br>";
73}}
74
75
76default:
77
78// Formulario de exportar
79echo "$msg[export_intro]";
80echo "<form class='form-admin' name='form2' ENCTYPE=\"multipart/form-data\" method='post' action=\"./admin.php?categ=empr&sub=export&action=?&categor=export\">";
81echo "<h3>$msg[usur_exp_a]</h3>";
82echo "<div class='form-contenu'><div class='row'><div class='colonne60'><label class='etiquette' for='form_import_lec'>$msg[usur_imp_o] </label><input type='textfield'  value='@__LlIuReX__@' name='separador' size='13'></div>";
83echo "<b>$msg[usur_imp_p]&nbsp;</b><input align='center' type='button' name='fichero' value='Continuar' onclick='form.submit()'></div></div>";
84echo "</form>";
85break;
86
87}
88//-------------------------------------> L L I U R E X <--------------------------------------//
89?>
90
Note: See TracBrowser for help on using the repository browser.