Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare un fax

Qualcuno sa come inviare un fax da Visual Basic?
Posso fare una stampa su FAX: (forse), ma poi come faccio ad inviare il
numero di telefono,ecc.?
Grazie a tutti
Mario

> Qualcuno sa come inviare un fax da Visual Basic?
Probabilmente Sě!
Ma non sň perchč...... "mi" sembra un'argomento che non si vuole mettere in
discussione!!!     mha!
Ciao

 ha scritto nel messaggio
news:pom27.28368$cd.2...@news1.tin.it...

Come ha gia' detto Angelo, sembra che la cosa interessi a nessuno.
Io uso Exchange4 (si, quello di Win95). Lo trovi anche sul CD di '98 nella
cartella Tools. Installi WMS (Windows Messaging System), dopo installi
AWFAX, il servizio fax e lo configuri.
Fra l'altro puoi anche condividere in rete il modemfax ed inviare fax da
tutte le macchine della rete sulle quali (ovviamente) devi installare WMS e
AWFAX, solo che quando scegli il modem anzoche' indicare quello fisico
locale indichi quello condiviso in rete.
Per inviare il fax da Exchange c'e' una voce nel menu (Nuovo fax) e ti viene
presentato un wizard dove inserire i numeri di fax, il testo, gli allegati.
Per inviarlo da un qualunque applicativo che possa stampare, semplicemente
selezioni Microsoft Fax come stampante e ti verra' fuori lo stesso wizard .
E - dulcis in fundo - da VB: devi usare i componenti MAPI (MapiSession e
MapiMessage).
Quello che segue e' un piccolo esempio (funzionante) di come usarli:
-----------------------------------------------------------
Crea un nuovo progetto.
Inserisci un controllo MapiSession e chiamalo 'sess'.
Inserisci un controllo MapiMessage e chiamalo 'fax'.
-----------------------------------------------------------
Public Sub InviaFax(numero as string, oggetto as string, messaggio as
string)
    Dim i As Integer
    'first login into service
    sess.LogonUI = False
    sess.UserName = "nome_delle_impostazioni"
    sess.SignOn
    mess.SessionID = sess.SessionID
    'cra un nuovo messaggio fax
    fax.SessionID = sess.SessionID
    fax.Compose
    'imposta il destinatario
    fax.RecipDisplayName = "[FAX:" & numero & "@" & numero & "]"
    'oggetto del fax
    fax.MsgSubject = oggetto
    'imposta il corpo del messaggio
    fax.MsgNoteText = messaggio
    'ed invia il messaggio
    fax.Send False
    'logoff
    sess.SignOff
End Sub
-----------------------------------------------------------
Questo e' tutto.
Visto che ci sono, ribadisco quello che ho scritto in un altro mio
messaggio: se provo ad inviare degli attachment l'unica cosa che riesco a
vedere e' un errore 32002 quando invoco il metodo .Send !! Ma nessuno mi ha
saputo aiutare (neanche su MSDN c'e' nulla, o almeno io non l'ho trovato!).
Spero di esserti stato utile. Se serve altro, fai un fischio.
Ciao a tutti.
--
Fab, kay...@genie.italy (change italy with it to answer via email!!)

 Spero di esserti stato utile. Se serve altro, fai un fischio.
OK, contaci....

     sess.SignOn
A questo punto da errore di run-time 32003: 'accesso fallito'
Per "nome_delle_impostazioni" intendi il nome del profilo? O il nome utente?
(Ho provato entrambi)

 (Ho provato entrambi)
Per "nome_delle_impostazioni" io inserisco il nome del profilo. Exchange4 ne
crea uno di default, ma puoi sempre crearne uno diverso.
Purtroppo io posso dirti come funziona con '98 ed Exchange4, non conosco le
impostazioni da fare per '2000.
Chissa' che ci sia qualcun'altro a cui interessa questa discussione, mi
piacerebbe molto approfondirla.
Anzi, quasi quasi installo il servizio anche sotto '2000 e lo provo.
Ti faro' sapere.
Ciao.


Spero di esserti stato utile. Se serve altro, fai un fischio.
Volevo approfittare che chiedere un chiarimento: cosa intendi per attachment
ad un fax ?
Se il fax viene stampato (su un fax, appunto) come si fa ad aggiungere un
allegato ?
Nel frattempo, qualora non l' avessi ancora trovato, guarda un po' se puo' servire:
PRB: Error 32002 "Unspecified Error" When Adding an Attachment 
Q173853
http://support.microsoft.com/support/kb/articles/Q173/8/53.ASP
PRB: Error 32002 Working with Attachments in MAPI Controls 
Q186148
http://support.microsoft.com/support/kb/articles/Q186/1/48.ASP
hth, hal

 Nel frattempo, qualora non l' avessi ancora trovato, guarda un po' se puo'
servire:
Perfetto! Si, mi avevano gia' detto qualcosa del genere, ma adesso ho capito
meglio: per "ogni" attachment serve un carattere "spazio" nel MsgTextNote
!!! Io avevo provato a valorizzare questo campo, ma ci avevo messo solo un
paio di CRLF !!!
Accidenti!
Grazie.
Cia'.


Cia'.
anche a te, 
hal