Generere en mail fra Access

du kan bruge denne:

docmd.SendObject ,,,Me!To,,,ME!Emne,,True

Jeg kan ikke lige gennemskue, hvorfor det ikke virkede da jeg prøvede det lige før, ud fra et af de spørgsmål der allerede lå på emnet. Nå men pyt det virker næsten nu. Hvis jeg lukker mail programmet uden at sende mailen kommer der en fejlmeddelelse, kan man ikke undgå dette?

Ja, du kan enten fjerne alle fejlmeddelelser således:

On Error resume next
docmd.SendObject ,,,Me!To,,,ME!Emne,,True


Eller håndtere eventulle fejl individuelt:

Private Sub cmdSendMail_Click()
  On Error Goto Err_SendMail
  docmd.SendObject ,,,Me!To,,,ME!Emne,,True
  Exit sub
Err_SendMail:
  Select Case Err
    Case 2501
      resume next
    case else
      msgbox Err.Description
  end select
End Sub

Nu skriver du Case 2501, og så er det jeg kommer til at tænke på, hvor ved du fra hvad fejl 2501 er? Er det noget man kan søge på, så man kan lave en bedre error handling?

Godt spørgsmål!

da du ikke havde fejlhåndtering på, skrev den selv 2501 i fejlmeddelelsen.

Men hvis du ændre din msgbox-sætning til således:

    MsgBox Err & ": " & Err.Description

...så vil den skrive fejlkoden hver gang, der opstår en ukendt fejl. Derefter kan du så indføre den i dit select-statement.

I dette tilfælde kunne en fejl være, at der ikke er installeret et mail-program på maskinen. Men den fejlkode kan være svær at fremkalde, hvis man ikke lige har lyst til at afinstallere outlook.

Men metoden er som regel at prøve sig frem...

Lige et sidste spørgsmål, er det muligt, at styre størrelsen på det e-mail vindue der kommer frem?

ikke med denne metode. Den vælget vist bare den størrelse, som din sidste mail havde.

Ikke engang hvis du skriver koden specifikt til f.eks. Outlook, tror jeg, at du kan styre denne størrelse.

Det er ok, hvis det havde været muligt havde det været dejligt, men det har ikke den store betydning.

Takker.

//Oergaard