ciuhd
11-02-2010, 16:10
Salve,
per un mio applicativo avrei bisogno di creare dei file .ps , a partire da alcuni dati presi da un database access.
In un primo momento mandavo in stampa il file su una stampante virtuale con l'oggetto Printer , ma mi sono accorto che quando si fà la stampa su file si apre in maniera automatica una finestra di windoz che chiede quale nome dare al file.
Visto che l'operazione di creazione del file deve essere invisibile all'utente pensavo di scrivere a mano l'output in un file .ps come di seguito:
Private Sub Command1_Click()
Dim psContent As String
psContent = "%!ps " & vbCr & "newpath 100 200 moveto 200 250 lineto 100 300 lineto 2 setlinewidth stroke showpage"
outstream = FreeFile
Open "c:\miofile.ps" For Append As #outstream
Print #outstream, psContent
Close #outstream
End Sub
Il codice fà il suo dovere, ma visto che la sintassi d postscript è un pò pesante, volevo sapere dove posso trovare un modulo di classe ,una libreria o qualcosa per agevolare la creazione di questi file..
vi ringrazio anticipamente
per un mio applicativo avrei bisogno di creare dei file .ps , a partire da alcuni dati presi da un database access.
In un primo momento mandavo in stampa il file su una stampante virtuale con l'oggetto Printer , ma mi sono accorto che quando si fà la stampa su file si apre in maniera automatica una finestra di windoz che chiede quale nome dare al file.
Visto che l'operazione di creazione del file deve essere invisibile all'utente pensavo di scrivere a mano l'output in un file .ps come di seguito:
Private Sub Command1_Click()
Dim psContent As String
psContent = "%!ps " & vbCr & "newpath 100 200 moveto 200 250 lineto 100 300 lineto 2 setlinewidth stroke showpage"
outstream = FreeFile
Open "c:\miofile.ps" For Append As #outstream
Print #outstream, psContent
Close #outstream
End Sub
Il codice fà il suo dovere, ma visto che la sintassi d postscript è un pò pesante, volevo sapere dove posso trovare un modulo di classe ,una libreria o qualcosa per agevolare la creazione di questi file..
vi ringrazio anticipamente