Forum
Merhaba,
Özellikle Fotokopi makineden gelen scan dosyaları bir yerlere göndermek için yanıtla veya ielt olayında outlook düz metin yapıyor.
İletiyi yeni pencere açıp html biçim yapma sonra tekrar imza ekleme(imza logolu) uzun iş oluyor.
Ayarlarda devamlı html diye bir seçenek göremedim. Bazı eklentiler var güvenmedim.
VBA bilgim yok bir sistede VB kod buldum kullanayım mı?
Sub AlwaysReplyInHTML()Dim oSelection As Outlook.SelectionDim oItem As Object'Get the selected itemSelect Case TypeName(Application.ActiveWindow)Case "Explorer"Set oSelection = Application.ActiveExplorer.SelectionIf oSelection.Count > 0 ThenSet oItem = oSelection.Item(1)ElseMsgBox "Please select an item first!", vbCritical, "Reply in HTML"Exit SubEnd IfCase "Inspector"Set oItem = Application.ActiveInspector.CurrentItemCase ElseMsgBox "Unsupported Window type." & vbNewLine & "Please select or open an item first.", _vbCritical, "Reply in HTML"Exit SubEnd Select Dim oMsg As Outlook.MailItemDim oMsgReply As Outlook.MailItemDim bPlainText As Boolean'Change the message format and replyIf oItem.Class = olMail ThenSet oMsg = oItemIf oMsg.BodyFormat = olFormatPlain ThenbPlainText = TrueEnd IfoMsg.BodyFormat = olFormatHTMLSet oMsgReply = oMsg.ReplyIf bIsPlainText = True ThenoMsg.BodyFormat = olFormatPlainEnd IfoMsg.Close (olSave)oMsgReply.Display'Selected item isn't a mail itemElseMsgBox "No message item selected. Please select a message first.", _vbCritical, "Reply in HTML"Exit SubEnd If'CleanupSet oMsgReply = NothingSet oMsg = NothingSet oItem = NothingSet oSelection = NothingEnd Sub
Bu kodu kendi bilgisayarımda çalıştırdım iletileri artık otomatik olarak HTML biçimde yanıtlamaya başladı. Kodu txt dosyasına atıp NOD32 taradım sıkıntı olmadı yine emin olmak için siz değerli insanlara sormak istedim.
saygılarımla.Merhaba
Bir test makineniz yok mu?
Görünürde kodda bir sorun yok.
Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************
Merhaba
Bir test makineniz yok mu?
Görünürde kodda bir sorun yok.
Merhaba Hakan bey,
Ne yazıkki yok bütçe ayırmıyorlar. Halbuki bir tanede yedek pc bulunsun sizlerin pc arızalandığında 2-3gün belkide 1 hafta boş boş beklemeyin yedektekini kullanırsınız desemde anlatamıyorum/anlamıyor/anlamak istemiyorlar vs.... Benimde yoğunluk çok virtualbox ta deneyemedim kendimde çalıştırdım NOD32 çalışır durumda bir sorun olmadı. Kodu muhasebe departmanı pc de çalıştıracağım için tereddüt etmiştim.
Teşekkür ederim.
Sizin adınıza üzüldüm, gerçekten Türkiye de IT işi yapmak zor.
Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************
