/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Macro - sende dokument via mail
Fra : Dennis


Dato : 21-08-03 12:25

Hej

Det er meningen af folk skal udfylde et skema i et worddukument, som
tilsendes pr mail.

Når man så har udfyldt skemaet skal man klikke på en knap/eller link, som så
vedhæfter worddokumentet, så det kan sendes pr mail. Det er lykkedes mig at
få dokumentet vedhæftet, men jeg kan ikke få udfyldt modtager email.

ActiveDocument.SendMail
vedhæfter dokument, men hvad skriver man for at på modtagers e-mail udfyldt
?

mvh

Dennis




 
 
anderssk (29-08-2003)
Kommentar
Fra : anderssk


Dato : 29-08-03 10:28

Prøv at leg med dette stykke kode.
Det lægge en mail klar i kladder


Sub Mail()
Dim olApp As Object, olDrafts As Object
Dim olMail As Object
Dim Bdy As String
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
Set olDrafts = olApp.GetNamespace("MAPI").GetDefaultFolder(16)
With olMail
.Subject = "Emne"
Bdy = "Tekst" & vbCrLf & vbCrLf
Bdy = Bdy & "Tekst" & vbCrLf
.Recipients.Add "modtageradresse"
.Attachments.Add "evt. vedhæftet filnavn og sti"
.Move olDrafts
End With
Set olMail = Nothing
Set olApp = Nothing

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"


Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408878
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste