Questione : Accedere al programma che trasmette un email

OS: Windows Vista
Application: Microsoft Access 2003 e 2007
I hanno scritto un programma che qualcuno può chiedere una domanda o segnalano ad un invio un email. Il email è introdotto 2003. Ma, il email non è trasmesso quando apre ed utilizzando la forma nell'accesso 2007. Ho preso il codice dal Internet per trasmettere il email. Ho fornito class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
il >Dim notpretty " del class= " del id= " codeSnippet835528 del 
 0
    'La prospettiva non stava facendolo funzionare, non inizia dal codice
    Regolare il oOutlookApp = CreateObject (“Outlook.Application„)
    bStarted = allineare
    Concluder se

'Generare un nuovo mailitem
    Regolare il oItem = oOutlookApp.CreateItem (olMailItem)

    Con oItem
    'Regolare il destinatario per il nuovo email
    Se infoReqMod.ReqInfoData.RptOpt = 1 allora
        . Per = “[email protected]„
    ElseIf infoReqMod.ReqInfoData.RptOpt = 2 allora
        . Per = “METRICA E TECNOLOGIA di DL KNA SSC A/P„
    ElseIf infoReqMod.ReqInfoData.RptOpt = 3 allora
        . Per = “[email protected]„
    Concluder se
    'Regolare il destinatario per una copia
        .CC = “[email protected]„
    'Regolare l'oggetto
    . Oggetto = “richiesta di informazioni„
    'Il contenuto del documento è usato come il corpo per il email
    . Corpo = infoReqMod.CreateBody
    
    Se infoReqMod.attachments.blnHaveAttach = allora allineano
        Oscurare la i come numero intero
        
        Per i = 0 a infoReqMod.attachments.intCnt - 1
            .attachments. Aggiungere infoReqMod.attachments.strAttach (i)
        Dopo
    Concluder se
    
    . Trasmettere
Concluder con

Se allora bStarted
    'Se iniziassimo la prospettiva dal codice, quindi vicino esso
    oOutlookApp.Quit
Concluder se
class= del

Risposta : Accedere al programma che trasmette un email

Sì.  Un frigorifero è una pompa termica.
Per rendere la parte interna più fredda, deve rendere la parte esterna più calda.
Altre soluzioni  
 
programming4us programming4us