- Kompakt vízhűtés
- TCL LCD és LED TV-k
- Steam Deck
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- Modding és elektronikai kérdések
- HiFi műszaki szemmel - sztereó hangrendszerek
- Kormányok / autós szimulátorok topikja
- 5.1, 7.1 és gamer fejhallgatók
- Ismét analóg billentyűzettel jelentkezett a Cherry Xtrfy
- ThinkPad (NEM IdeaPad)
Új hozzászólás Aktív témák
-
Oly
őstag
válasz
ArchElf
#1722
üzenetére
Szia
Private Sub Command1_Click()
Dim objOutlook, objMail, oAddSig
Set objOutlook = CreateObject("Outlook.Application")
objOutlook.Session.Logon
Set objMail = objOutlook.CreateItem(olMailItem)
Set objOutlook = objMail.GetInspector
With objMail
.SentOnBehalfOfName = "nemazennevem@valami.hu"
.To = "to"
.Cc = "cc"
.Subject = "Subject"
.Body = "body"
.Display
End With
Set objOutlook = Nothing
Set objMail = Nothing
End SubOutlook2007-nél átírja a feladót, Excelből indítva 2010-nél is.
HTML-ből, vagy VB6-tal csinált exe-nél már nem.
2010-nél egy lenyíló listából tudom kiválasztani az eddig használt feladókat. Lehet, hogy itt valami objektumként kezeli már?
Új hozzászólás Aktív témák
- BESZÁMÍTÁS! Apple Macbook Pro16 M4 Pro 24GB RAM 512GB SSD notebook garanciával hibátlan működéssel
- 27% - ASUS VY279HGR IPS Monitor! 1920x1080 / 120Hz / 1ms / FreeSync
- AKCIÓ! ASRock A520M R5 5500 16GB DDR4 512GB SSD RTX 2060 Super 8GB Rampage SHIVA Adata 600W
- Dell és HP szerver HDD caddy keretek, adapterek. Több száz darab készleten, szállítás akár másnapra
- HIBÁTLAN iPhone SE 2020 64GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS4307, 100% Akksi
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

