Newsgroup: it.comp.appl.notes-domino
Titolo: Excel VBA ---> Lotus Notes

Salve a tutti
Lavoro in una societa' dove si usa il Lotus Notes unicamente per la
gestione della posta. Piu' volte abbiamo chiesto alla sede centrale se
ci lasciavano installare un software che permettesse anche l'invio e
la ricezione dei fax pero' la loro risposta e' sempre stata la stessa
: Fax for Domino
Dato che anche noi abbiamo sempre reagito allo stesso modo (no grazie,
vogliamo qualcosa di piu' leggero, piu' affidabile, meno costoso,
etc...) alla fine siamo rimasti senza fax :-(((
Adesso avremmo bisogno di mandare molti fax che si possono far
generare dal PC (prendono dei dati da un foglio di Excel) e cosi'
pensavo di creare una macro in Excel VBA che si occupi di :
- creare il messaggio in Lotus
- inviare il messaggio alla sede centrale (che e' fuori italia) dove
hanno installato un fax server
- fare in modo che il fax-server invii il fax
Purtroppo ho qualche difficolta' a far funzionare la macro in quanto :
- il messaggio creato lo vedo solo in All documents e non capisco in
quale cartella e' stato messo (non e' un grosso problema)
- il messaggio viene correttamente inviato al fax-server pero' viene
anche sempre rifiutato in quanto sembra che il server non sia in grado
di convertire il messaggio in formato fax (e non mi dice perche')
- il messaggio che di notifica di mancato invio che ricevo dal
fax-server e' enorme (circa 400 KB) anche se in effetti il messaggio
da inviare e' molto piccolo (mediamente 20/30 righe di testo)
Cosa puo' essere ?
Per vs. aiuto, questa e' la macro che uso in Excel per creare il
messaggio (non e' la versione definitiva in quanto scrivo da casa e la
l'ultima versione ce l'ho in ufficio) :
    Set Session = CreateObject("Notes.NotesSession")
    Set DataBase = Session.GetDataBase(sServer, GroupName)
    DataBase.OpenMail
    Set Document = DataBase.CreateDocument()
    Document.Form = "Memo"
    With Document
        .SendTo = Destinatario
        .Subject = "xxxxxxxxxxxxxxxx"
        .Font = "Courier"
        .Body = MessageText
        .From = GroupName
        .SaveMessageOnSend = True
        .Send True
    End With
Grz, ciao

Senza screditare il Lotus per le sue potenzialitŕ, ma se hai una macchina
Windows 2000  server o professional o Xp ti basta collegare un modem e
configurare corretamente i parametri del fax.
Poi in VbScript utilizzi l'oggetto FaxServer e fai quello che vuoi.
Ciao, Luca

Poi in VbScript utilizzi l'oggetto FaxServer e fai quello che vuoi.
Non e' cosi' semplice. L'uso dei modem e' proibito (o meglio, si
possono usare ma solo sui PC che non sono collegati alla rete).
Sarebbe possibile usare il modem se ci fosse un PC dedicato come fax
server e in questo caso su quel PC ci dovrebbe essere un unico
software : quello che gestisce i fax. Inoltre il PC dovrebbe essere
invisibile alla rete etc... etc...
Insomma un casino !
Penso comunque che il problema sia dovuto alla dimensione del
messaggio (ho provato a mandarlo a me stesso via e-mail e risulta
sempre di circa 400 KB invece che di poche righe). 
Grz, ciao

Insomma un casino !
Esistono Fax Server affidabili che si appoggiano unicamente a servizi
SMTP/POP3 per essere integrati con un qualsiasi Mail Server.
In quel caso il tuo PC/FAX puo' essere benissimo invisibile alla rete,
tranne per le due porte succitate.
Gli monti un personal firewall e risolvi.
L'unica modifica x Domino è che ti devi creare un utente "fax" che
funge da gateway... di meno nun se pote. :-)
Ciao, OldSmobile.
-- 
http:\\
www.depquest.net

funge da gateway... di meno nun se pote. :-)
Sicuro..... ( e sai gia` a cosa voglio dire)
-- 
Ciao./ Zio Ciano.
Born to run Unix
-Fare bene non e` bene, fare male non c'e` male.-

Sicuro..... ( e sai gia` a cosa voglio dire)
C'e' di meglio per linuccio?
-- 
http:\\
www.depquest.net

C'e' di meglio per linuccio?
Certo. Senza gw, allegati in pdf, etc.
Non c'e` nulla che uin sappia fare meglio. :-))


 SMTP/POP3 per essere integrati con un qualsiasi Mail Server.
Infatti io avevo suggerito, grazie anche a tutto quello che avevo letto in
questo NG, il RelayFax ma la risposta e' stata "Plse be advised that we can
not allow any third party fax solutions or any third party applications
anyway running on our servers! Our company standard policy conc Fax is FXD
running on Domino server and integrated in our new memo for outgoing fax
traffic."
E' vero che mi avevano lasciato la possibilita' di installarlo su un
computer nuovo dedicato a questo lavoro pero' non ci era sembrato il caso e
cosi' abbiamo lasciato perdere.
Grz, ciao
--------------------------------
Inviato via 
http://usenet.libero.it

traffic."
Beh.. i casi sono due:
O usi quella ciofeca che propongono (pero' ti togli le castagne dal
fuoco nel csao tu abia casini)
Oppure lo monti non "On their Servers" come ti abbiamo suggerito.
Altrimenti ti crei un indirizzo di posta elettronica esterno (es.
my...@tin.it
)e usi quello come gateway.
Mi sembra una cagata... ma se non vuoi usare fax x Domino (che tra
'altro costa uno sproposito).
'iao!
-- 
http:\\
www.depquest.net