Aynı yazıyı farklı kişilere hitaben nasıl gönderirim?

[mirefe]

Bende o yolun kodunu istiyoum.Yazar mısınız_?

 

[kmlztrk]

Bende o yolun kodunu istiyoum.Yazar mısınız_?

bu dosyayı deneyin

 

[mirefe]

Sn, kmlztrk,

Teşekkür ederim.3 ayrı sayfada da olduğunu göstermişsiniz.Sizin c:\deneme.xls yolunda sorun yok.Ancak masaüstünde bir jpg dosyasını gönderemiyorum.Burada ayrı bir yol kodumu yazılacak.

 

[kmlztrk]

Sn, kmlztrk,

Teşekkür ederim.3 ayrı sayfada da olduğunu göstermişsiniz.Sizin c:\deneme.xls yolunda sorun yok.Ancak masaüstünde bir jpg dosyasını gönderemiyorum.Burada ayrı bir yol kodumu yazılacak.

evet doyanın masaüstü yolu yani "C:\Documents and Settings\kmlztrk\Desktop\test.jpg" gibi yolun tamamı yazılacak

 

[mirefe]

c:\ içine atılırsa oluyor.Ancak aşağıdaki yolda olmuyor?

.Attachments.Add ("C:\Kullanıcılar\media\Masaüstü\Test.jpg")

 

[Levent Menteşoğlu]

Masaüstünün yerini aşağıdaki kod ile bulabilirsiniz.

masaustu= CreateObject("Wscript.Shell").SpecialFolders("Desktop")

 

[mustafaine1]

Levent Bey tesekkurler, kendim icinde sakladim kodunuzu, diger ozel klasorler ise soyleymis:

AllUsersDesktop
AllUsersStartMenu
AllUsersPrograms
AllUsersStartup
Desktop
Favorites
Fonts
MyDocuments
NetHood
PrintHood
Programs
Recent
SendTo
StartMenu
Startup
Templates

 

[halit3]

Özel klasörlerin yolunu aşağıdaki kod ile bulabilirsiniz.

Sub masaüstü()
Set WshShell = CreateObject("wscript.Shell")
For Each strFolder In WshShell.SpecialFolders
i = i + 1
Cells(i, 1).Value = strFolder
Next
End Sub

 

[kmlztrk]

Levent bey;

öncelikle elinize sağlık çok güzel olmuş benim sorum
iletiyi outlook'ta değil de varsayılan e-posta programında örneğin live mail'de nasıl oluşturabiliriz

yardımınızı bekliyorum

 

[Levent Menteşoğlu]

Levent bey;

öncelikle elinize sağlık çok güzel olmuş benim sorum
iletiyi outlook'ta değil de varsayılan e-posta programında örneğin live mail'de nasıl oluşturabiliriz

Aşağıdaki linkte size yardımcı olacak bilgiler bulabilirsiniz.

http://www.rondebruin.nl/sendmail.htm