Konu: excel'den faks
merhaba,
vfp9 üzerinden bir excel veya word dosyasını açıp winfax a veya fax yazıcısına gönderme işini nasıl yapabilirim ? elinizde bir örnek varsa çok makbule geçer
bu konuda bilgisi olan yok mu?
selamlar ve teşekkürler
Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
merhaba,
vfp9 üzerinden bir excel veya word dosyasını açıp winfax a veya fax yazıcısına gönderme işini nasıl yapabilirim ? elinizde bir örnek varsa çok makbule geçer
bu konuda bilgisi olan yok mu?
selamlar ve teşekkürler
bu konuda bilgisi olan yok mu?
DAHA ÖNCEKİ AÇTIĞIN KONUYA BAKTIN MI?
http://www.fox4um.com/viewtopic.php?id=523
arkadaslar,
kendi sorumun yanitini olusturdum. burayada yazayim dedim.
bu kod vfp uzerinden winfax ı açıyor, excel dosyasını açıyor ve fax çekiyor..
belki lazim olur.
oWinFax = CreateObject("WinFax.SDKSend")
oWinFax.SetSubject("aydın Test Fax")
oWinFax.SetNumber("1234567")
oWinFax.SetAreaCode("212")
oWinFax.SetCompany("ahmet mehmet")
oWinFax.AddRecipient() && Required
oWinFax.SetPrintFromApp(1)
oWinFax.AddAttachmentFile("")
oWinFax.Send(1)
SET PRINTER TO NAME winfax
m.X=GETFILE("XLS")
oleApp = CREATEOBJECT("Excel.Application")
* Start Excel.
OleApp.Visible=.T.
* Display Excel.
*OleApp.Workbooks.Add
* Create a workbook.
oWorkbook=OleApp.Workbooks.OPEN(m.X)
oWorkbook._PrintOut(,,,,"winfax")
OleApp.Quit
RELEASE oWinFax
WAIT WINDOW "BITTI"