Question : Using le rachat avec la défunte attache

J'essaye de convertir simplement ceci en attendre tard. A essayé quelques choses de base mais subsistance obtenant des erreurs. le
I AM sure c'est une difficulté simple de syntaxe.  J'ai regardé quelques autres reponses en d'autres fils mais je continue à obtenir des erreurs de compilation. le

I a essayé ceci mais il n'a pas aimé tous les faibles rapports après établissement de l'objOL de l'object

Dim d'objOL en tant qu'application d'objOL d'Object
Set = de

Dim de CreateObject (« Outlook.Application ») comme objOutlookMsg d'objOL.Application
Dim comme objOutlookRecip d'objOL.MailItem
Dim comme objOutlookAttach d'objOL.Recipient
Dim comme objOL.Attachment class= > " clair " de

> de " codeSnippet " de class= de

class= " lineNumbers " de

class= de

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 :

l'id= " codeSnippet846796 " class= " de ' voici mon extrait de code courant 'avec l'attache tôt Faible application comme Outlook.Application Faible objOutlookMsg comme Outlook.MailItem Faible objOutlookRecip comme Outlook.Recipient Faible objOutlookAttach comme Outlook.Attachment Placer l'application = le CreateObject (« Outlook.Application ») Obscurcir SafeItem, oItem, étiquette Placer SafeItem = CreateObject (« Redemption.SafeMailItem ») 'créent un exemple de Redemption.SafeMailItem Placer l'oItem = l'Application.CreateItem (0) 'créent un nouveau message SafeItem.item = oItem 'ont placé la propriété d'article 'etc. ......

class= de

Réponse : Using le rachat avec la défunte attache

Vous devez obscurcir TOUT comme objet :

Faible application comme objet
Faible objOutlookMsg comme objet
Faible objOutlookRecip comme objet
Faible objOutlookAttach comme objet