VB.netでTrello APIを使い、カードに画像を追加してみました。

投稿日：2017年10月13日

VB.netでTrello APIを使って、カードを作成することができるようになりました。
→Trello APIを使ってみました。
→VB.netでTrello APIを使ってみました。

無在庫ネットショップの注文を管理したいので、カードに画像を追加したいです。

カードを作成した時のレスポンスでカードIDがわかるので、カードIDと画像URLを指定すれば良いです。

リスト一覧を取得するコードです。

       Dim sURL As String
        Dim objEnc As System.Text.Encoding = System.Text.Encoding.UTF8
        Dim objWC AsSystem.Net.WebClient
        Dim sEndpoint As String
        Dim s開発者向けAPIキー As String = "[開発者向けAPIキー]"
        Dim sトークン As String = "[トークン]"
        Dim sカードID As String = "[カードID]"
        Dim s画像URL As String = "[画像URL]"
        Dim byResult As Byte()
        Dim sJSON As String
        sEndpoint = "https://trello.com/1/";
        sURL = sEndpoint
        sURL &= "cards/"
        sURL &= sカードID
        sURL &= "/attachments"
        Dim objPostData As New System.Collections.Specialized.NameValueCollection
        objPostData.Add("key", s開発者向けAPIキー)
        objPostData.Add("token", sトークン)
        objPostData.Add("url", s画像URL)
        objWC = NewSystem.Net.WebClient()
        byResult = objWC.UploadValues(sURL, objPostData)
        '結果はJOSN形式で渡されます。
        sJSON = System.Text.Encoding.UTF8.GetString(byResult)

Dim sURL As String

Dim objEnc As System.Text.Encoding = System.Text.Encoding.UTF8

Dim objWC AsSystem.Net.WebClient

Dim sEndpoint As String

Dim s開発者向けAPIキー As String = "[開発者向けAPIキー]"

Dim sトークン As String = "[トークン]"

Dim sカードID As String = "[カードID]"

Dim s画像URL As String = "[画像URL]"

Dim byResult As Byte()

Dim sJSON As String

sEndpoint = "https://trello.com/1/";

sURL = sEndpoint

sURL &= "cards/"

sURL &= sカードID

sURL &= "/attachments"

Dim objPostData As New System.Collections.Specialized.NameValueCollection

objPostData.Add("key", s開発者向けAPIキー)

objPostData.Add("token", sトークン)

objPostData.Add("url", s画像URL)

objWC = NewSystem.Net.WebClient()

byResult = objWC.UploadValues(sURL, objPostData)

'結果はJOSN形式で渡されます。

sJSON = System.Text.Encoding.UTF8.GetString(byResult)