CDO.dll Dosyası Ne İşe Yarar ?

[baydeniro]

Merhaba arkadaşlar. CDO.dll dosyasının işlevi hakkında yardıma gereksinmem var :

1) Bu dosya her bilgisayarda olmalı mı ?
2) Ana işlevi mail gönderme ile mi ilgilidir ?
3) Nereden download edebilirim ?

Teşekkürler.

 

[modalı]

Sayın serdarokan,

Açıklama :

cdo.dll dosyası bir modül uygulamasıdır. İlişkili olduğu yazılım : Microsoft Exchange from Microsoft Corporation.

Tavsiye :

Önemli bir sistem parçası değildir ama kaldırmadan önce bu dosyayı kullanan uygulama olmadığına emin olunuz.


Yazılımcı :

Microsoft Corporation

İsim :

Collaboration Data Objects 1.21s for Windows NT

Konum :


Uygulama :

Microsoft Exchange

Risk :

0 / 5

Spyware :

cdo.dll spyware değildir.

Adware :

cdo.dll adware değildir.

İndireceğiniz yerlerden biri:

http://www.dlldll.net/download/cdo.dll_file.html

İyi çalışmalar

 

[baydeniro]

Aslında benim asıl merak ettiğim konu ; aşağıda yazdığım makroyu işyerinde kullandığımda Send tuşuna basmaya gerek kalmadan mail gönderebiliyorum. Ama evden hiç gönderemiyorum. Send tuşunda takılıyor : Bu neden olabilir acaba.

Not : Outook'a Gmail tanımlı ve diğer makro kodları ile mail atabiliyorum.


Sub CDO_Mail_Small_Text()
Dim iMsg As Object
Dim iConf As Object
Dim strbody As String
' Dim Flds As Variant

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

' iConf.Load -1 ' CDO Source Defaults
' Set Flds = iConf.Fields
' With Flds
' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
' = "Fill in your SMTP server here"
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
' .Update
' End With

strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"

With iMsg
Set .Configuration = iConf
.To = "serdar.okan@yahoo.com"
.CC = ""
.BCC = ""
.From = """Serdar"" <serdar.okan@gmail.com>"
.Subject = "Important message"
.TextBody = strbody
.Send
End With
End Sub