2017-09-08 23 views
-1

SendGrid v6.3.4.0
VBのWindows 10 64bのプロVB.NET SendGridエラー "transportWebは"

私はVBの窓アプリにSendGridの電子メールを追加したいの2017 Proの
宣言されていません。
NuGet SendGridをプロジェクトに追加しました。(参照の追加など)問題なく。 ビルドエラーが発生します(下記のSub send_by_SendGridの場所を参照してください): "transportWeb"が宣言されていません。

これは他のすべてのコンピュータで動作します。

Imports SendGrid 

...

Sub send_by_SendGrid(ByVal Addr, ByVal Subject, ByVal Message, ByVal From_Address) 

    ' Prevent email problem with Verizon: 
    addr=replace(addr,"vzwpix","vtext",) 

    if subject = "" then 
     subject = " " 
     'Message = "" 
    End If 

    ' Create the email object first, then add the properties. 
    Dim myMessage As SendGridMessage 
    myMessage = New SendGridMessage() 

    ' Add the message properties. 
    myMessage.AddTo(Addr) 
    myMessage.From = New MailAddress(From_Address) 


    if Subject <> "" then 
     myMessage.Subject = Subject 
    end if 

    ' Add plain text body only: 
    myMessage.Text = Message 

    Dim username As String 
    Dim pswd As String 
    username = "[email protected]" 
    pswd = "MY_PW" 



    Dim credentials As NetworkCredential 

    credentials = New NetworkCredential(username, pswd) 
    ' // Create an Web transport for sending email. 
    transportWeb = New Web(credentials) <<<<<<<<<<<<<<< 'transportWeb' is not declared 

    transportWeb.DeliverAsync(myMessage) <<<<<<<<<<<<<<<<<< 'transportWeb' is not declared 
End Sub 
+0

に見えます –

答えて

0

変更:あなたはtransportWebを宣言する必要があるよう

Dim transportWeb As New Web(credentials) 

transportWeb = New Web(credentials)