ASP offre la possibilità di inviare FAX via Web attraverso l’apposito componente presente su tutti i sistemi Windows 2000, sia l’edizione Server che la Professional.

L’unica pecca di questo sistema è che il funzionamento è limitato a questa versione del sistema operativo di casa Microsoft e non è adattabile ad altri sistemi e, per funzionare correttamente, è necessario che il servizio Fax sia configurato alla perfezione.

Per maggiori informazioni in merito consiglio di effettuare una ricerca sul sito della Microsoft simile a questa.

Per i pochi “fortunati” a cui è dato di poter utilizzare questo sistema vediamo un esempio pratico di utilizzo dell’oggetto FaxServer:

<%@LANGUAGE = VBScript%>
<%
    Dim MioFax, MioDocumento, MioFile
    Set MioFax = Server.CreateObject("FaxServer.FaxServer.1")
    MioFax.Connect("\\nome_server")
    MioFile = Server.MapPath("miofax.doc")
    Set MioDocumento = MioFax.CreateDocument(MioFile)
    MioDocumento.FaxNumber = "000,0000000"
    MioDocumento.Send
    MioFax.DisConnect
    Set MioDocumento = Nothing
    Set MioFax = Nothing
    Response.write "Fax inviato con successo!"
%>

Vediamo il funzionamento del tutto.

Per prima cosa istanziamo l’oggetto creando la classe:

FaxServer.FaxServer.1

A questo punto utilizziamo una serie di proprietà e metodi che vado a descrivere schematicamente:

• Connect – Metodo. Connette il servizio Fax all’applicazione ASP, specificando il percorso di rete del server, oppure l’indirizzo IP.
• CreateDocument – Metodo. Trasforma in Fax un qualsiasi documento di testo che deve già trovarsi sul server, oppure dev’essere caricato attraverso una qualsiasi procedura di Upload.
• FaxNumber – Proprietà. Imposta il numero a cui inviare il Fax. Il prefisso ed il numero vanno separati da una virgola.
• Send – Metodo. Invia il Fax.
• DisConnect – Metodo. Disconnette il servizio Fax dall’applicazione ASP.