- PCI bővítőhelyet elfoglaló Icy Dock mobilrack M.2-es SSD-knek
- Elon Musk járatára váltott jegyet a legújabb magyar műhold
- Viszonylag olcsó, 26,5 hüvelykes QD-OLED monitor bukkant fel az MSI kínálatában
- Jönnek az egyes, problémákkal küzdő ASUS ROG noteszgépek kipofozott BIOS-ai
- GeForce RTX 5060: Ezt kapjuk 150 ezerért
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Fujifilm X
- GeForce RTX 5060: Ezt kapjuk 150 ezerért
- Akciókamerák
- Milyen notebookot vegyek?
- Jönnek az egyes, problémákkal küzdő ASUS ROG noteszgépek kipofozott BIOS-ai
- Hobby elektronika
- HiFi műszaki szemmel - sztereó hangrendszerek
- Milyen videókártyát?
- Apple asztali gépek
Ú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
- Bomba ár! Acer Aspire ES1 - AMD A8 I 8GB I 180GB SSD I 15,6" HD I HDMI I Cam I W10 I Garancia!
- Acer Predator Helios 300 - PH315-51
- Bomba Ár! Fujitsu LifeBook S762 - i5-3GEN I 8GB I 320GB I DVDRW I 13,3" HD I DP I W10 I Garancia!
- Bomba ár! Dell Latitude E6540 - i7-4GEN I 8GB I 256SSD I Radeon I 15,6" FHD I Cam I W10 I Garancia!
- Bomba ár! Dell Latitude E6510 - i7 I 4GB I 250GB I DVDRW I Nvidia I 15,6" HD+ I Cam I W10 I Gari!
- BESZÁMÍTÁS! ASUS ROG STRIX Z390-H GAMING alaplap garanciával hibátlan működéssel
- GYÖNYÖRŰ iPhone 11 128GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS3128
- Bomba ár! Dell Latitude 5520 - i5-11GEN I 16GB I 256SSD I HDMI I 15,6" FHD I Cam I W11 I Gari
- Lenovo ThinkPad X13 Gen 2 i5-1145G7 16GB 512GB FHD+ 100% sRGB - 1 év garancia
- Honor X8 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest