Merhaba arkadaşalar,
aşagıdaki kod ile win7 işletim sistemi ile fevkalede e-mail gönderebiliyorum ofis2010 ile
ama win10 işletim sisteminde eklediğim hatayı veriyor,
aantivürüs prg.yok yalnız windovs un Windovs defenderi aktif ondanmı acaba yoksa
win10 da smtpserverport farklımı çalışıyor?

[vb]
Sub MailGonderr()
Dim firma, yoll, YedekYeri As String
firma = Dlookup ("[FirmaAdi]", "TblYetki")
YedekYeri = Dlookup ("[YedeklenecekYer]", "TblYetki")
yoll = YedekYeri & "\Abc" & Date & ".rar"