| 6 | | == FillDruczek(Odbiorca,NrKonta,Kwota,Zleceniodawca,Tytulem) == |
| | 6 | == FillDruczek ( Odbiorca, NrKonta, Kwota, Zleceniodawca, Tytulem ) == |
| | 7 | |
| | 8 | {{{ |
| | 9 | Set gdi=CreateObject("DanyGraphics.GDI") |
| | 10 | gdi.CreateFromFromFile("druczek.bmp") |
| | 11 | Odbiorca="Admoto sp. z o.o., Sienkiewicza 5A, 76-200 Słupsk" |
| | 12 | NrKonta="32 1020 4649 0000 7302 0083 3434" |
| | 13 | kwota=59.16 |
| | 14 | Zleceniodawca="Usługi Transportowe Andrzej Hajduk, 64-234 Kaszczor, Powst. Wielkopolskich 23" |
| | 15 | Tytulem="TE" & idklient & ", Zam 345343" |
| | 16 | gdi.FillDruczek Odbiorca,NrKonta,Kwota,Zleceniodawca,Tytulem |
| | 17 | |
| | 18 | 'save to file |
| | 19 | gdi.SaveTofile "test.png","image/png" |
| | 20 | |
| | 21 | 'export to Response |
| | 22 | Response.ContentType="image/png" |
| | 23 | gdi.SaveToStream Response,"image/png" |
| | 24 | |
| | 25 | |
| | 26 | Set gdi=nothing |
| | 27 | |
| | 28 | }}} |
