
14/07/2010, 12:58
|
| | Fecha de Ingreso: julio-2010
Mensajes: 33
Antigüedad: 14 años, 8 meses Puntos: 0 | |
Respuesta: Response.BinaryWrite equivalente en PHP Estimados ya le encontré la vuelta. Muchas gracias por la ayuda a todos, fue muy útil.
Pego el código utilizado, seguramente a alguien le sirva.
Saludos
$query_consulta = 'select lo_archivo, vl_extension, nm_archivo from nombre de la tabla where condicion ;
//}
$stmt_consulta = OCIParse($conn, $query_consulta);
$NewData = array();
OCIDefineByName($stmt_consulta,"LO_ARCHIVO",&$NewD ata["LO_ARCHIVO"]);
OCIDefineByName($stmt_consulta,"VL_EXTENSION",&$Ne wData["VL_EXTENSION"]);
OCIDefineByName($stmt_consulta,"NM_ARCHIVO",&$NewD ata["NM_ARCHIVO"]);
OCIExecute($stmt_consulta);
OCIFetch($stmt_consulta);
If (is_object($NewData["LO_ARCHIVO"])){
$NewData["LO_ARCHIVO"] = $NewData["LO_ARCHIVO"]->load();
}
$NewData["NM_ARCHIVO1"] = str_replace(' ','%20',$NewData["NM_ARCHIVO"]);
$arch_temporal = "./gen/".$NewData["NM_ARCHIVO"].".".$NewData["VL_EXTENSION"];
$fp=fopen($arch_temporal,"w");
fwrite($fp,$NewData["LO_ARCHIVO"]);
fclose($fp);
OCIFreeStatement($stmt_consulta);
$destino = "./gen/".$NewData["NM_ARCHIVO1"].".".$NewData["VL_EXTENSION"];
$nombre_archivo = $NewData["NM_ARCHIVO1"].".".$NewData["VL_EXTENSION"];
OCILogoff($conn);
header("Content-type: application/force-download");
header("Content-Disposition: attachment; filename= $nombre_archivo");
header('Location: '.$destino); |