| |||
Bueno, les cuento que resolvi. La idea me la dio trasgukabi cuando se dio cuenta de los *. yo nunca encontre los asteriscos, per empecé a eliminar caracteres donde me iba diciendo y ya funciona. Nunca me va a quedar claro porque en un servidor si y en otro no, pero funcionó. Me voy a descansar que estuve a punto del derrame cerebral. Gracias |
| |||
comandos o funciones de fpdf para asp Hola!!!!!! tendran algun manual o info donde pueda ver los comandos o funciones predefinidas para fpdf??? como para insertar una imagen de fondo, darle color al texto, imprimir numero de paginas.... Gracias!!! ![]() |
| ||||
a ver, yo tengo lo siguiente: <%@language=vbscript%> <!--#include file="libs/fpdf/fpdf.asp"--> <% . . . // Redefinimos la función pdf.Header=function Header() { this.Image('images/logo.jpg',10,8,53); this.SetFont('Arial','B',15); this.Ln(6); this.Cell(65); this.Cell(110,10,'SISTEMA DE TRÁMITE DOCUMENTARIO',1,0,'C'); this.Ln(26); } // Creación del objeto set pdf=CreateJsObject("FPDF"); // Main pdf.CreatePDF(); pdf.SetPath("libs/fpdf/"); pdf.Open(); pdf.AddPage(); . . . pdf.Output(); %> <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> <Title>INS</Title> </HEAD> <BODY> <P> </P> </BODY> </HTML> y me da el siguiente error: Tipo de error: Error de compilación de Microsoft VBScript (0x800A03EA) Error de sintaxis /tramitedoc/reg_doc_print.asp, línea 13, columna 16 set pdf.Header == function Header() ---------------^
__________________ Tarecito |
| ||||
corrección: en el error me sale: Error de compilación de Microsoft VBScript (0x800A03EA) Error de sintaxis /tramitedoc/reg_doc_print.asp, línea 13, columna 16 set pdf.Header = function Header() ---------------^ (ya habia corregido lo de los ==)
__________________ Tarecito |
| ||||
jejejeje, ya me funciona, pero ahora tengo un problemita... cuando recupero la fecha de la base de datos (lo tengo en dd/mm/aaa), a la hora de imprimirlo en el pdf me lo muiestr asi: Wed May 25 00:00:00 EST 2005. Alguien sabe cómo corregir eso????
__________________ Tarecito |
| ||||
Hola Tarecito! Lo que se me ocurre que hagas es: Dim fechaprint fechaprint=Cstr(rs.fecha) entonces, donde querés que se muestre la fecha imprimís fechaprint. Si sigue saliendo en inglés, fijate en la configuración de fecha que tenés en la bd. Espero que te sirva! |
| ||||
sos lo máximo verinchi!!! :) problema resuelto , muchas gracias ... y bueno... aprovechando q estás x aqui.. hay alguna forma de redimensionar el tamaño de las celdas?? , es q cuando tengo un texto largo tengo q agrandar el tamaño de la celda, pero si ese texto (q lo recupero de la base de dato) es cortito un poco q se me descuadra el diseño y se ve feito
__________________ Tarecito |
| ||||
. Juas! ni lo máximo ni lo mínimo! Estoy aprendiendo también. ![]() Lo que se me ocurre para redimensionar las celdas dependiendo del tamaño del texto que vayas a poner es medir el texto primeramente y luego colocar el valor. ![]() Me explico mejor. Suponete que tenes rs.descripción para mostrar. entonces declaras Dim largo=len(rs.descripción) En el momento de imprimir en el pdf deberías colocar pdf.Cell 5,largo,descripcion suponiendo que el alto de la fuente que manejas entra en un 5... No lo probé todavía porque no lo necesité, pero me imagino que puede andar bastante bien. Comentalo si es que sale así ya me saco la duda de paso. Ahora, puede suceder que el texto que tenés que introducir en el pdf sea mas largo incluso que el ancho de tu página... para eso en este post figuran un par de sugerencias de una funcion para renglonado de mi autoría! Si no está claro en el post, lo puse en la biblioteca también. ah! orgullosa de mi único aporte a la biblioteca!!! ![]() ![]() Suerte con tu proyecto!!! ![]() |
| ||||
ok verinchi, gracias nuevamente x el dato voy a ponerlo en práctica... jejeje, ya me está gustando esto (todo xq me está saliendo... sino lo mandaria x un tubo :D )
__________________ Tarecito |
| |||
![]() upsss... tal vez sea tarde, pero aqui esta la dirección del manual espero a alguien le sirva http://www.worldlingo.com/wl/transla...p%3Fpage%3D175 |
| |||
lo necesito en tamaño carta pues el manual anterior se me hizo buneo.... jajajaja pues mas bien es el unico que vi... solo que en CreatePDF vienen sus parametros y tambien admite que le cambie el tamaño.. PEro no me lo acepta... pdf.CreatePDF("L",Letter) Este tiene 3 parametros pero aun poniendo: pdf.CreatePDF("L","mm",Letter) No me lo acepta, no saben porque??? |
| ||||
he encontrado este código para crear tablas, pero está en php, y yo de php pues ni la primera linea. lo pongo para ver si alguien lo entiende y lo pasa a asp (estás allí verinchi :D ) <?php require('fpdf.php'); class PDF extends FPDF { //Cargar los datos function LoadData($file) { //Leer las líneas del fichero $lines=file($file); $data=array(); foreach($lines as $line) $data[]=explode(';',chop($line)); return $data; } //Tabla simple function BasicTable($header,$data) { //Cabecera foreach($header as $col) $this->Cell(40,7,$col,1); $this->Ln(); //Datos foreach($data as $row) { foreach($row as $col) $this->Cell(40,6,$col,1); $this->Ln(); } } //Una tabla más completa function ImprovedTable($header,$data) { //Anchuras de las columnas $w=array(40,35,40,45); //Cabeceras for($i=0;$i<count($header);$i++) $this->Cell($w[$i],7,$header[$i],1,0,'C'); $this->Ln(); //Datos foreach($data as $row) { $this->Cell($w[0],6,$row[0],'LR'); $this->Cell($w[1],6,$row[1],'LR'); $this->Cell($w[2],6,number_format($row[2]),'LR',0,'R'); $this->Cell($w[3],6,number_format($row[3]),'LR',0,'R'); $this->Ln(); } //Línea de cierre $this->Cell(array_sum($w),0,'','T'); } //Tabla coloreada function FancyTable($header,$data) { //Colores, ancho de línea y fuente en negrita $this->SetFillColor(255,0,0); $this->SetTextColor(255); $this->SetDrawColor(128,0,0); $this->SetLineWidth(.3); $this->SetFont('','B'); //Cabecera $w=array(40,35,40,45); for($i=0;$i<count($header);$i++) $this->Cell($w[$i],7,$header[$i],1,0,'C',1); $this->Ln(); //Restauración de colores y fuentes $this->SetFillColor(224,235,255); $this->SetTextColor(0); $this->SetFont(''); //Datos $fill=0; foreach($data as $row) { $this->Cell($w[0],6,$row[0],'LR',0,'L',$fill); $this->Cell($w[1],6,$row[1],'LR',0,'L',$fill); $this->Cell($w[2],6,number_format($row[2]),'LR',0,'R',$fill); $this->Cell($w[3],6,number_format($row[3]),'LR',0,'R',$fill); $this->Ln(); $fill=!$fill; } $this->Cell(array_sum($w),0,'','T'); } } $pdf=new PDF(); //Títulos de las columnas $header=array('País','Capital','Superficie (km2)','Pobl. (en miles)'); //Carga de datos $data=$pdf->LoadData('paises.txt'); $pdf->SetFont('Arial','',14); $pdf->AddPage(); $pdf->BasicTable($header,$data); $pdf->AddPage(); $pdf->ImprovedTable($header,$data); $pdf->AddPage(); $pdf->FancyTable($header,$data); $pdf->Output(); ?>
__________________ Tarecito |
| ||||
Hola de nuevo. Yo con php??? tengo mil preguntas hechas en ese foro! Primero fijate si esa versión del fpdf para php es compatible con la traducción que tenés del fpdf para asp. Sucede que el de php es un poco mas avanzado y tiene mas opciones porque son los autores de la clase que luego se tradujo para asp. Vos en sí que es lo que querés mostrar??? Porque tal vez trabajando un poco mas duro lo consigas sin necesidad de bajarte extensiones de la clase.... No se que decirte. Eso por lo que veo genera una tabla a partir de un fichero de texto... Igualmente seguro aparecerá alguien con mas autoridad que yo en el tema que pueda ayudarte mejor. Un saludo grande! Cualquier cosa tratá de lograr lo que querés con lo que tenés en la clase. Fijate en el manual las opciones para recuadrar el texto o no... Yo logré unos lindos pdf en blanco y negro con tablas donde quise y renglonado de resultados sin ninguna extensión, solo es cuestion de quemarse un poco las pestañas leyendo el manualito y tener un poco de imaginación para lograrlo. Fijate... primero fijate de crear lo que querés en blanco y negro, después si querés agregarle colores y cositas tendrás tiempo de ponerlo y probarlo. Hasta prontito!!! ![]() |
| ||||
yo no necesito colores para nada, las tablas los quiero para imprimirlas, y aca en el trabajo solo hay impresoras en blanco y negro :P. Puse ese código x si alguien podría pasarlo a asp... no se si podrias postear la función q creaste para dibujar las tablas x favor :)
__________________ Tarecito |
| ||||
. En realidad no es ninguna funcion, basta con consultar el manual! A mi me parece que uno se pone medio vago cuando encuentra respuestas sin pensarlas no???? no es para ofender, en serio. El código para colocar los bordes a la tabla biene siendo:
Código:
por defecto el borde es cero pero si colocás un 1 ya te hace el borde alrededor de la celda que marcaste con borde 1.pdf.Cell alto,ancho,contenido,borde el manual, por si no lo encontraste es: http://www.aspxnet.it/public/default.asp Cualquier configuración que necesites acerca de tamaños y bordes lo tenés ahí. los bordes se pueden colocar solo a izquierda, solo a derecha, o solo inferior... ayudan por ejemplo a armar algo para que esté recuadrado pero no en todas las líneas sino el efecto de encerrar todo un texto en una caja. Lo que si vas a tener que tener en cuenta la versión del fpdf que tenés bajada. De todos modos en el manual figura para qué versión se aplica la propiedad que mencionan. suerte de nuevo con tu pdf! Esperemos que te quede como querés! Un saludo grande y hasta prontito!!! ![]() |
| ||||
yo he cambiado el codigo q puse más arriba x este otro: this.TablaColoreada=function TablaColoreada() { this.SetFillColor(159,0,0); this.SetTextColor(255); this.SetDrawColor(128,0,0); this.SetLineWidth(.3); this.SetFont('','B'); //w=new Array(25,25,40,45); //for(i=0;i<=4;i++) // this.Cell(w[i],7,cabecerat[i],1,0,"C",1); this.Cell(20,5,"Fecha",1,0,"C",1); this.Cell(20,5,"Hora",1,0,"C",1); this.Cell(40,5,"Origen",1,0,"C",1); this.Cell(40,5,"Destino",1,0,"C",1); this.Ln(); this.SetFillColor(224,235,255); this.SetTextColor(0); this.SetFont(''); } basta poner pdf.Tablacoloreada() para q salga la tabla, pero la idea sería usar el w=new Array(25,25,40,45), un parámetro para los titulos de la cabecera y un for. En el código original está con for pero no me funciona, asi q probéhacerlo sin arrays. Pero eso solo muestra la cabecera con color, me falta aún la carga de los datos
__________________ Tarecito |
| ||||
no es q me ponga vago, sino q en el trabajo están q se ponen cargosos con este asunto del sistema q estoy haciendo y lo quieren para ayer :P pero igual trato de darme un tiempo para ver q se puede hacer para hacerlo más práctico ya q imprimir una tabla con más de 100 registros de forma manual no es nada conveniente
__________________ Tarecito |
| |||
ASP a PDF hola lexus, como estas, ha pasado ya bastante tiempo... desde el 2002, pero bueno aqui estamos, queria comentarte que no jala el codigo de ASP para hacer PDF, crees que me puedas ayudar !!!!! Mil gracias por la colaboracion ! |
| ||||
alguien sabe como hacer para q cuando pongas un MultiCell seguido de otro, no te salgan uno debajo de otro sino seguidos?? lo q pasa es q cuando pongo asi: . . this.MultiCell(w[0],5,d1,"1"); this.MultiCell(w[1],5,d2,"1"); this.MultiCell(w[2],5,d3,"1"); . . me muestra los datos pero uno debajo de otro, y la idea es q los muestre como si fueran un registro de una tabla (en realidad es el registor de un tabla)
__________________ Tarecito |
| ||||
Creo que le llaman a la certificada en este sistema, me parece que esta en linea. ![]()
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera." -- Ernest Hemingway |