ma orario1 di che tipo è?
Credo che si aspetta un valore di tipo stringa.
Infatti concatenando gli spazi lo dovrebbe trasformare in stringa.
ma orario1 di che tipo è?
Credo che si aspetta un valore di tipo stringa.
Infatti concatenando gli spazi lo dovrebbe trasformare in stringa.
salve ho provato fpdf ed è fantastico, l'ho implementato per la creazione di un catalogo prodotti, vorrei sapere come posso fare per inserire una copertina al catalogo!
poi ho notato che mi si sovrappongono i testi, mi spiego inserisco perogni prodotto la foto, il nome del prodotto, la descrizione e il prezzo. Quando però c'è un nome di un prodotto + lungo del previsto s sovrappone alla descrizione che sta sotto, e spesso la descrizione esce dal foglio!
di seguito allego il pezzo di codice che genera la pagina:
il foglio impostato è un A5!PDF.AddPage
if rs("foto")<>"" then
pdf.sety 0
pdf.Image "/"&RS("foto"),pdf.GetY(10),partenzaverticale,grande zzafoto
end if
PDF.SetXY partenzaid, PartenzaY - 30
PDF.SetFont "", "B", fontgrande
PDF.MultiCell 0, 5, RS("id"), 0, 0 , "", 0
PDF.SetFont "", ""
PDF.SetXY partenzatesto, PartenzaY -20
PDF.SetFont "", "B", fontgrande
PDF.MultiCell 0, 5, RS("Prodotto"), 0, 0 , "", 0
PDF.SetFont "", ""
pippo= RemoveHtmlTag(RS("GDescrizione"))
pippo= Replace(pippo, "è", "è")
pippo= Replace(pippo, ";", "")
pippo= Replace(pippo, " ", "")
pippo= Replace(pippo, "ù", "ù")
pippo= Replace(pippo, "®", "®")
pippo= Replace(pippo, "ò", "ò")
pippo= Replace(pippo, "é", "é")
pippo= Replace(pippo, "&euro", "€")
pippo= Replace(pippo, "£", "£")
PDF.SetXY partenzatesto, PartenzaY -10
PDF.SetFont "", "", fontpiccolo
PDF.MultiCell 0, 5, pippo, 0, 0 , "", 0
PDF.SetFont "", ""
PDF.SetFont "", "", fontpiccolissimo
PDF.SetXY partenzatesto, PartenzaY + 4
if RS("Descrizione") <> null then
PDF.MultiCell 0, 5, pippo, 0, 0 , "", 0
PDF.SetFont "", ""
end if
dove sbaglio?
grazie
Ciao a tutti..
Sono entrato anch'io a far parte della grande famiglia di HTML.it
..spero che qualcuno mi possa aiutare..
..io dovrei utilizzare FPDF in ASP.Net con Visual Web Developer (C#) però non riesco ad importare la libreria!!
Qualcuno riuscirebbe a darmi qualche dritta?
Grazie Mile
Aiutoooo gente ho qualke problema ad importare la libreria fpdf in aspx, allora mi da errori a manetta dai file ke ho scaricato e importato nel progetto, del tipo ke nn riesce a trovare dei file! Cosa posso fare? Ma non dovrei fare una include di tutti quei file? images.asp, math.asp, basics.asp?
Perfavore aiutatemi!
Ciao
scusate ma esiste la libreria di fpdf per aspx? no perchè se è in asp non funzionerà mai.. almeno che io sappia
IP-PBX management: http://www.easypbx.it
Old account: 2126 messages
Oldest account: 3559 messages
Santinoti ho beccato anke qui!
http://forum.html.it/forum/showthrea...hreadid=561967
qui ce il link per il sito!
Ci mankerebbe altro ke esistesse solamente per php, mi sarei incazzato come una bestia!![]()
![]()
![]()
![]()
![]()
![]()
Nella pagina .ASP ho inserito
per settare il FONT, il font .JS è così (copiato da pagina 31 mi pare):codice:pdf.AddFont "verdana","","verdana.js" pdf.AddFont "verdana","B","verdana.js" pdf.AddFont "verdana","I","verdana.js" pdf.AddFont "verdana","C","verdana.js" pdf.SetFont "verdana","",10
solo che mi da errore ')' excepted quacosa alla riga 411 del file fpdf.asp (incude)codice:xtype='TrueType'; xname='verdana'; xdesc=lib.newArray('Ascent',1005,'Descent',-210,'CapHeight',727,'Flags',32,'FontBBox','[-50 -207 1447 1000]','ItalicAngle',0,'StemV',70,'MissingWidth',1000); xup=-88; xut=59; xcw=lib.newArray( lib.chr(0),1000,lib.chr(1),1000,lib.chr(2),1000,lib.chr(3),1000,lib.chr(4),1000,lib.chr(5),1000,lib.chr(6),1000,lib.chr(7),1000,lib.chr(8),1000,lib.chr(9),1000,lib.chr(10),1000,lib.chr(11),1000,lib.chr(12),1000,lib.chr(13),1000,lib.chr(14),1000,lib.chr(15),1000,lib.chr(16),1000,lib.chr(17),1000,lib.chr(18),1000,lib.chr(19),1000,lib.chr(20),1000,lib.chr(21),1000, lib.chr(22),1000,lib.chr(23),1000,lib.chr(24),1000,lib.chr(25),1000,lib.chr(26),1000,lib.chr(27),1000,lib.chr(28),1000,lib.chr(29),1000,lib.chr(30),1000,lib.chr(31),1000, ' ',352,'!',394,'"',459,'#',818,'$',636,'%',1076,'&',727,''',269,'(',454,')',454,'*',636,'+',818, ',',364,'-',454,'.',364,'/',454,'0',636,'1',636,'2',636,'3',636,'4',636,'5',636,'6',636,'7',636,'8',636,'9',636,':',454,';',454,'<',818,'=',818,'>',818,'?',545,'@',1000,'A',684, 'B',686,'C',698,'D',771,'E',632,'F',575,'G',775,'H',751,'I',421,'J',455,'K',693,'L',557,'M',843,'N',748,'O',787,'P',603,'Q',787,'R',695,'S',684,'T',616,'U',732,'V',684,'W',989, 'X',685,'Y',615,'Z',685,'[',454,'\',454,']',454,'^',818,'_',636,'`',636,'a',601,'b',623,'c',521,'d',623,'e',596,'f',352,'g',623,'h',633,'i',274,'j',344,'k',592,'l',274,'m',973, 'n',633,'o',607,'p',623,'q',623,'r',427,'s',521,'t',394,'u',633,'v',592,'w',818,'x',592,'y',592,'z',525,'{',635,'|',454,'}',635,'~',818,lib.chr(127),1000,lib.chr(128),636,lib.chr(129),1000,lib.chr(130),269,lib.chr(131),636, lib.chr(132),459,lib.chr(133),818,lib.chr(134),636,lib.chr(135),636,lib.chr(136),636,lib.chr(137),1521,lib.chr(138),684,lib.chr(139),454,lib.chr(140),1070,lib.chr(141),1000,lib.chr(142),685,lib.chr(143),1000,lib.chr(144),1000,lib.chr(145),269,lib.chr(146),269,lib.chr(147),459,lib.chr(148),459,lib.chr(149),545,lib.chr(150),636,lib.chr(151),1000,lib.chr(152),636,lib.chr(153),977, lib.chr(154),521,lib.chr(155),454,lib.chr(156),981,lib.chr(157),1000,lib.chr(158),525,lib.chr(159),615,lib.chr(160),352,lib.chr(161),394,lib.chr(162),636,lib.chr(163),636,lib.chr(164),636,lib.chr(165),636,lib.chr(166),454,lib.chr(167),636,lib.chr(168),636,lib.chr(169),1000,lib.chr(170),545,lib.chr(171),645,lib.chr(172),818,lib.chr(173),454,lib.chr(174),1000,lib.chr(175),636, lib.chr(176),542,lib.chr(177),818,lib.chr(178),542,lib.chr(179),542,lib.chr(180),636,lib.chr(181),640,lib.chr(182),636,lib.chr(183),364,lib.chr(184),636,lib.chr(185),542,lib.chr(186),545,lib.chr(187),645,lib.chr(188),1000,lib.chr(189),1000,lib.chr(190),1000,lib.chr(191),545,lib.chr(192),684,lib.chr(193),684,lib.chr(194),684,lib.chr(195),684,lib.chr(196),684,lib.chr(197),684, lib.chr(198),984,lib.chr(199),698,lib.chr(200),632,lib.chr(201),632,lib.chr(202),632,lib.chr(203),632,lib.chr(204),421,lib.chr(205),421,lib.chr(206),421,lib.chr(207),421,lib.chr(208),775,lib.chr(209),748,lib.chr(210),787,lib.chr(211),787,lib.chr(212),787,lib.chr(213),787,lib.chr(214),787,lib.chr(215),818,lib.chr(216),787,lib.chr(217),732,lib.chr(218),732,lib.chr(219),732, lib.chr(220),732,lib.chr(221),615,lib.chr(222),605,lib.chr(223),620,lib.chr(224),601,lib.chr(225),601,lib.chr(226),601,lib.chr(227),601,lib.chr(228),601,lib.chr(229),601,lib.chr(230),955,lib.chr(231),521,lib.chr(232),596,lib.chr(233),596,lib.chr(234),596,lib.chr(235),596,lib.chr(236),274,lib.chr(237),274,lib.chr(238),274,lib.chr(239),274,lib.chr(240),612,lib.chr(241),633, lib.chr(242),607,lib.chr(243),607,lib.chr(244),607,lib.chr(245),607,lib.chr(246),607,lib.chr(247),818,lib.chr(248),607,lib.chr(249),633,lib.chr(250),633,lib.chr(251),633,lib.chr(252),633,lib.chr(253),592,lib.chr(254),623,lib.chr(255),592); xenc='cp1252'; xdiff=''; xfile='verdana.ttf'; xoriginalsize=171792;
come mai? grazie mille per la risposta![]()
ho provato a fare una pagina pdf ma mi da questo risultato:
2%PDF-1.3 3 0 obj <> endobj 4 0 obj <> stream 2 J 0.57 w BT /F1 7.00 Tf ET 0.710 0.216 0.173 rg 14.17 813.54 31.18 -14.17 re S q 0 g BT 17.01 804.35 Td (AVICENNA) Tj ET Q 45.35 813.54 62.36 -14.17 re S q 0 g BT 48.19 804.35 Td (VINCENZO) Tj ET Q 107.72 813.54 28.35 -14.17 re S q 0 g BT 110.55 804.35 Td (GS ) Tj ET Q 136.06 813.54 31.18 -14.17 re S q 0 g BT 138.90 804.35 Td (BUONO) Tj ET Q 167.24 813.54 62.36 -14.17 re S q 0 g BT 170.08 804.35 Td (ENZO) Tj ET Q 229.61 813.54 28.35 -14.17 re S q 0 g BT 232.44 804.35 Td (CC ) Tj ET Q endstream endobj 1 0 obj <> endobj 5 0 obj <> endobj 2 0 obj <> >> endobj 6 0 obj << /Producer (FPDF for ASP v.1.01 beta by Lorenzo Abbati [www.aspxnet.it]) /CreationDate (D:2008912141149) >> endobj 7 0 obj << /Type /Catalog /Pages 1 0 R /OpenAction [3 0 R /FitH null] /PageLayout /OneColumn >> endobj xref 0 8 0000000000 65535 f 0000000641 00000 n 0000000826 00000 n 0000000009 00000 n 0000000087 00000 n 0000000728 00000 n 0000000914 00000 n 0000001039 00000 n trailer << /Size 8 /Root 7 0 R /Info 6 0 R >> startxref 1142 %%EOF
nella pagina explorer
considera che è una query di cognomi e nomi.
dovè l'errore?
questo è lo script:
************************
<html><head>
<title></title>
<meta name="Title" content="">
<meta name="Author" content="">
<meta name="Language" content="IT">
</head><body>
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\database\arch.mdb")
set objRs = server.createobject("ADODB.recordset")
sql = "SELECT * FROM dipendenti" & " where cognome=pippo'"
objRs.open sql, objConn
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.Open()
pdf.SetFont "Times","",7
pdf.SetLeftMargin 5
pdf.SetRightMargin 5
pdf.AddPage()
pdf.SetFillColor 181,55,44
pdf.Cell 11,5,"titolo_1" ,1,0,0,1,"L"
pdf.Cell 22,5,"titolo_2" ,1,0,0,1,"L"
pdf.Cell 10,5,"titolo_3" ,1,0,0,1,"L"
'pdf.Cell 15,5,"titolo_4" ,1,1,0,1,"L"
Do Until objRS.EOF
pdf.Cell 11,5, ""&objRs("cognome")&"" ,1,0,"L"
pdf.Cell 22,5, ""&objRs("nome")&"" ,1,0,"L"
pdf.Cell 10,5, ""&objRs("id")&"" ,1,0,"L"
'pdf.Cell 15,5, ""&objRs("campo_4")&"" ,1,1,"L"
objRS.Movenext
Loop
pdf.Close()
pdf.Output()
Set pdf = nothing
%>
</body></html>
campo_4 motlo probabilmente non esiste, fai così:
ho visto che hai commentato il codice, però come vedi finisce i 1,1,0 sono diversi, l'ultimo dell'elenco derve a "chiudere la tabella", prova così e concodice:pdf.Cell 11,5,"titolo_1" ,1,0,0,1,"L" pdf.Cell 22,5,"titolo_2" ,1,0,0,1,"L" pdf.Cell 25,5,"titolo_3" ,1,1,0,1,"L" Do Until objRS.EOF pdf.Cell 11,5, ""&objRs("cognome")&"" ,1,0,"L" pdf.Cell 22,5, ""&objRs("nome")&"" ,1,0,"L" pdf.Cell 25,5, ""&objRs("id")&"" ,1,1,"L"
manca un apice singolo prima di pippicodice:sql = "SELECT * FROM dipendenti WHERE cognome='pippo' "
prova e facci sapere![]()
ho provato cosi,
pdf.Cell 11,5,"titolo_1" ,1,0,0,1,"L"
pdf.Cell 22,5,"titolo_2" ,1,0,0,1,"L"
pdf.Cell 10,5,"titolo_3" ,1,1,0,1,"L"
Do Until RS.EOF
pdf.Cell 11,5, ""&Rs("cognome")&"" ,1,0,"L"
pdf.Cell 22,5, ""&Rs("nome")&"" ,1,0,"L"
pdf.Cell 10,5, ""&Rs("f0002")&"" ,1,1,"L"
RS.Movenext
Loop
ma il risultato è lo stesso:
%PDF-1.3 3 0 obj <>>><>>><>>>] /Contents 4 0 R>> endobj 4 0 obj <> stream 2 J 0.57 w BT /F1 7.00 Tf ET 0.710 0.216 0.173 rg 14.17 813.54 31.18 -14.17 re B q 0 g BT 17.01 804.35 Td (titolo_1) Tj ET Q 45.35 813.54 62.36 -14.17 re B q 0 g BT 48.19 804.35 Td (titolo_2) Tj ET Q 107.72 813.54 28.35 -14.17 re B q 0 g BT 110.55 804.35 Td (titolo_3) Tj ET Q 14.17 799.37 31.18 -14.17 re S q 0 g BT 17.01 790.18 Td (ALESSANDRO ) Tj ET Q 45.35 799.37 62.36 -14.17 re S q 0 g BT 48.19 790.18 Td (BARBARA ) Tj ET Q 107.72 799.37 28.35 -14.17 re S q 0 g BT 110.55 790.18 Td (CO ) Tj ET Q 14.17 785.19 31.18 -14.17 re S q 0 g BT 17.01 776.01 Td (ALI) Tj ET Q 45.35 785.19 62.36 -14.17 re S q 0 g BT 48.19 776.01 Td (NURI ) Tj ET Q 107.72 785.19 28.35 -14.17 re S q 0 g BT 110.55 776.01 Td (cp ) Tj ET Q endstream endobj 1 0 obj <> endobj 5 0 obj <> endobj 2 0 obj <> >> endobj 6 0 obj << /Producer (FPDF for ASP v.1.01 beta by Lorenzo Abbati [www.aspxnet.it]) /CreationDate (D:2008912205313) >> endobj 7 0 obj << /Type /Catalog /Pages 1 0 R /OpenAction [3 0 R /FitH null] /PageLayout /OneColumn >> endobj xref 0 8 0000000000 65535 f 0000001327 00000 n 0000001512 00000 n 0000000009 00000 n 0000000415 00000 n 0000001414 00000 n 0000001600 00000 n 0000001725 00000 n trailer << /Size 8 /Root 7 0 R /Info 6 0 R >> startxref 1828 %%EOF