Hola ... Tengo otra inquietud tengo el siguiente codigo:
Código PHP:
//-------------------------------------------------------------------------------------------------------
//Consulta que muestra los datos del formulario Comprobante
if($boton1 == "Exportar")
{
//-----------------------------------------------------------------------------------------------------+
//Funcion para generar un archivo plano, xls, etc
function Descargar($excel){
header("Content-Description: File Transfer");
header("Content-Type: application/force-download");
header("Content-Disposition: attachment; filename=".basename($excel));
@readfile($file);
}// fin del if
$sql=mysql_query("select *
from documento d,contabilizacion c,usuario s,cu u,tipodocum t,beneficiario b, cuentas e
where c.numdoc = d.numdoc && d.descripuser = s.descripuser &&
d.tipo = t.tipo && d.planilla = t.planilla && t.tipo = 'CP' && c.codcuenta = e.codcuenta && s.empresa = 'II'
&& d.anodoc between $anodoc1 && $anodoc2 && d.mesdoc between $mesdoc1 && $mesdoc2 &&
d.diadoc between $diadoc1 && $diadoc2");
while ($respu = mysql_fetch_array($sql)) {
// Inicia variables
$deb = ""; $cre = "";
$deb = $deb.$respu["debito"]; $cre = $cre.$respu["credito"];
$base = ""; $vrbase = ""; $deta = ""; $detacontab = "";
$credito = ""; $c = ""; $debito = ""; $d = ""; $codcuenta = ""; $ccuenta = ""; $ncontab = ""; $nitcontab = "";
$nit = ""; $nt = ""; $numd = ""; $numdoc = ""; $dest = ""; $destino = "";
if ($respu["naturaleza"] = 'C' && $cre > 0){
//Formato cod cuenta
$ccuenta = $ccuenta.$respu["codcuenta"];
$codcuenta = str_pad($ccuenta, 8);
//Formato cod beneficiario
$ncontab = $ncontab.$respu["nitcontab"];
$nitcontab = str_pad($ncontab, 9);
//Formato numero documento
$numd = $numd.$respu["numdoc"];
$numdoc = str_pad($numd, 9);
//Formato transacion
$deta = $deta.$respu["detacontab"];
$detacontab = str_pad($deta, 80);
//Formato destino
$dest = $dest.$respu["destino"];
$destino = str_pad($dest, 8);
//Formato base
$base = $base.$respu["vrbase"];
$vrbase = str_pad($base, 9, "0", STR_PAD_LEFT);
//Formato valor credito
$c = $c.$respu["credito"];
$credito = str_pad($c, 9, "0", STR_PAD_LEFT);
//Formato valor debito
$d = $d.$respu["debito"];
$debito = str_pad($d, 9, "0", STR_PAD_LEFT);
//Formato nit beneficiario
$nt = $nt.$respu["nit"];
$nit = str_pad($nt, 11);
//Formato nombre beneficiario
$dbenef = $dbenef.$respu["detabenef"];
$detabenef = str_pad($dbenef, 40);
$excel = $excel.$codcuenta.$nitcontab.$respu["indcucontab"].$respu["anolapso"].$respu["meslapso"].
$respu["empresa"].$respu["indcu"].$respu["planilla"].$respu["cpte"].$respu["xxxx"].$respu["tipo"].$numdoc.
$respu["anodoc"].$respu["mesdoc"].$respu["diadoc"]."C".$credito."00"."+".$detacontab.$destino." "." ".$vrbase.
"000000000"."+"." "."00000"."00".$respu["anodoc"].$respu["mesdoc"].$respu["diadoc"]."00".$nit.$detabenef.
" "." "." ".$respu["tipo"]."\n";
} else if ($respu["naturaleza"] = 'D' && $deb > 0){
//Formato cod cuenta
$ccuenta = $ccuenta.$respu["codcuenta"];
$codcuenta = str_pad($ccuenta, 8);
//Formato cod beneficiario
$ncontab = $ncontab.$respu["nitcontab"];
$nitcontab = str_pad($ncontab, 9);
//Formato numero documento
$numd = $numd.$respu["numdoc"];
$numdoc = str_pad($numd, 9);
//Formato transacion
$deta = $deta.$respu["detacontab"];
$detacontab = str_pad($deta, 80);
//Formato destino
$dest = $dest.$respu["destino"];
$destino = str_pad($dest, 8);
//Formato base
$base = $base.$respu["vrbase"];
$vrbase = str_pad($base, 9, "0", STR_PAD_LEFT);
//Formato valor credito
$c = $c.$respu["credito"];
$credito = str_pad($c, 9, "0", STR_PAD_LEFT);
//Formato valor debito
$d = $d.$respu["debito"];
$debito = str_pad($d, 9, "0", STR_PAD_LEFT);
//Formato nit beneficiario
$nt = $nt.$respu["nit"];
$nit = str_pad($nt, 11);
//Formato nombre beneficiario
$dbenef = $dbenef.$respu["detabenef"];
$detabenef = str_pad($dbenef, 40);
$excel = $excel.$codcuenta.$nitcontab.$respu["indcucontab"].$respu["anolapso"].$respu["meslapso"].
$respu["empresa"].$respu["indcu"].$respu["planilla"].$respu["cpte"].$respu["xxxx"].$respu["tipo"].$numdoc.
$respu["anodoc"].$respu["mesdoc"].$respu["diadoc"]."D".$debito."00"."+".$detacontab.$destino." "." ".$vrbase.
"000000000"."+"." "."00000"."00".$respu["anodoc"].$respu["mesdoc"].$respu["diadoc"]."00".$nit.$detabenef.
" "." "." ".$respu["tipo"]."\n";
} // Fin del if
} //Fin funcion While
if($respu == 0)
{
?>
<script>
location="planocgbatch2.php";
alert ("El plano ha sido creado satisfactoriamente ... en 'C:Plano ' ");
</script>
<?php
}else{
?>
<script>
location="planocgbatch2.php";
alert ("Error: No existe datos que coincidan con el parámetro de consulta ' ");
</script>
<?php
}
$shtml=$excel;
$scarpeta="C:\Plano"; //carpeta donde guardar el archivo.
$sfile=$scarpeta."/"."planocgbatch2.txt"; //ruta del archivo a generar
$fp=fopen($sfile,"w");
fwrite($fp,$shtml);
fclose($fp);
}
mysql_close();
?>
*** Lo que el codigo hace es exportar un archivo plano con el nombre de planocgbatch2.txt. Lo que se desea es que cuando de clic en el boton exportar me permita asignar el nombre del archivo y que no lo tome por defecto (planocgbatch2.txt)
.... No lo hago ????
Gracias ....