Tempo fa sul nostro forum si è parlato di come inviare fax da pagine ASP.
Alla fine ne è uscita una soluzione, presa in parte da MSDN, in grado di funzionare molto bene, solo su Windows 2000 però.
Gli script che andremo a presentare infatti si appoggiano in toto al servizio Fax di Windows 2000, presente anche nella versione Professional.
Perchè funzionino, dunque, è necessario che il servizio sia funzionante e configurato in maniera ottimale.
Inviare fax da uno script
In definitiva il codice da utilizzare è breve ed immediato.
<%
Set FaxServer = CreateObject("FaxServer.FaxServer.1")
' mi collego al server locale
FaxServer.Connect("\\localhost")
' creo il documento fax
Set FaxDoc = FaxServer.CreateDocument(Server.MapPath("testo.doc"))
' il numero di fax
FaxDoc.FaxNumber = "01234,56789"
' invio del fax
on error resume next
JobID = FaxDoc.Send()
if err.Number <> 0 then
Response.write "Impossibile inviare il fax (" & err.description & ")"
else
Response.write "Fax inviato con successo - JobID = " & JobID
end if
' disconessione dal server
FaxServer.DisConnect
' rilascio gli oggetti
set FaxDoc = Nothing
set FaxServer = Nothing
%> Uno dei vantaggi di una soluzione del genere è che si può inviare semplicemente un file supportato dal server su cui viene instanziata la connessione al fax server, senza bisogno di convertirlo in formati particolari, ed ovviamente generando dinamicamente il contenuto.
Basta indicare come valore di
FaxDoc.FilenameQuanto detto vale per file PDF, DOC, XLS ed in generale per qualsiasi tipo di file per cui sia presente un reader sul fax server.
Per inviare un listino, dunque, basterà convertirlo in DOC o PDF e procedere all'esecuzione dello script.
Possibili miglioramenti
Mi rendo conto che lo script in sè é molto semplice, ma per spedire fax da una pagina ASP, è tutto quello che serve.
Tuttavia bisogna notare che con lo stesso set di oggetti messi a disposizione dal servizio Fax Server, è possibile controllare praticamente via web il funzionamento e lo stato dell'intero sistema, come la coda dei fax in entrata o in uscita, utilizzare dei frontespizi nella fase di invio, etc.
Per eventuali approfondimenti, vi suggerisco di fare una ricerca su MSDN .
Contenuti dell'articolo
Per inserire un commento, devi registrarti alla nostra community.








Difficoltà
Utilità
Stampa
Download 


