Er det muligt at åbne følgende??

Du kan sende en mail direkte fra Access. Der ligger mange eksempler i ekspertens søgefunktion. Kan sende dig et eksempel hvor du sender med Outlook Express.

Du har ikke et Mugs hvor, jeg kan sende fra Microsoft Outlook - Jeg har samtidig problemer med at summere antal af afsendte tilbud som jeg har oprettet i et andet sp. du har forsøgt svaret på - Koden er ikke helt rigtig..

Jeg benytter ikke selv Microsoft Outlook. men prøv at lave en makro og brug handlingen SendObject. Evt. søg i ekspertens søgefunktion, spørgsmålet har været opppe flere gange.

Kan du give et link til spørgsmåler om summering, så vil jeg vende tilbage imorgen, hvis du ikke har fået et kvalificeret svar.

Lukker ned for iaften.

Hej mugs

Jeg vil gerne have det eksempel :) "sender med Outlook Express."

maul: ej@kollnet.fo

Hej.
Lav en knap, og ved klik skriver du:
Dim stAppName As String

    stAppName = "C:\Programmer\Outlook Express\msimn.exe"
    Call Shell(stAppName, 1)

Vh Henrik13

Jeg kan lave det som en test db til dig. Skriv dit access version.  :o)

faroe > Har prøvet ar sende, men får denne fejl:

Meddelelsen kunne ikke sendes, fordi en af modtagerne blev afvist af serveren. Den afviste e-mail-adresse var 'ej@kollnet.fo'. Emne 'Send e-mail', Konto: 'POP3.mail.dk', Server: 'SMPT.mail.dk', Protokol: SMTP, Svar fra server: '550 relaying mail to kollnet.fo is not allowed', Port: 25, Sikker (SSL): Nej, Serverfejl: 550, Fejlnummer: 0x800CCC79

Example of sending to ALL mail address

Dim rs As ADODB.Recordset
Dim Outl As Outlook.Application
Dim Post As Outlook.MailItem
Dim sBCC As String

   
    Set rs = New ADODB.Recordset
   
    rs.Open "Select Email From tblContacts", CurrentProject.Connection, adOpenForwardOnly, adLockReadOnly
   
    If Not rs.EOF Then
   
        Set Outl = CreateObject("Outlook.Application")
        Set Post = Outl.CreateItem(olMailItem)

        Do Until rs.EOF
       
            sBCC = sBCC & rs!Email & ";"
           
         
            rs.MoveNext
           
        Loop
       
        Post.BCC = sBCC
       
        'Display Outlook
        Post.Display
       
        Set Outl = Nothing
       
    End If

Hej Henrik Jeg sidder jobbet lige nu og kan ikke umiddelbart huske min version - Men jeg tror det er 2000 udgaven  - Jeg behøver ikke nødvendigvis, at kunne sende mails derfra - Men jeg vil bare gerne have en direkte genvej til outlook via et outlook ikon...Min mail er BittenNielsen69@hotmail.com - Mange tak!!

Er Sendt.  :o)

Kan vi se svaret også Henrik?

>> terry
Se 11/09-2003 23:40:56. Eller læg din E-mail så får du den tilsendt.
Vh Henrik13

eksperten@santhell.dk (XP)

Tak, og god weekend

Er sendt til terry.  :o)

Hej Henrik,
det er til Outlook Express og funkere kun hvis sti'en er den samme på alle PC'er!

Hej Terry
Det er rigtigt, mem jeg har spurt 7 af mine venner + mig selv, ingen har fløttede den.  :o)

Der er INGEN folder C:\Programmer på English XP :o)

Helt perfekt henrik - Men er det mulig at få ikonet outlook ind i knappen??

>>bol
Tak for poient
Jeg ser det først nu. Men det er ikke mugligt.  Men det kan ikke lade sig gøre, desværre.  :o)

Now I didnt get any points here, even though you did ask for an Outlook solution. None the less, if you want to see an Outlook icon on a butten, then copy it to the clipboard and using Paint cut the portion of the icon you want to a bmp file and use this as picture file to the button.