JSON发布可从VBA更新Trello自定义字段

编程问答 2022-06-09

问题描述

我正在Excel中使用VBA和Tim Hall的惊人VBA-Tools，我几乎可以完成与trello相关的所有事情，创建名片，列表，评论等

最近几天让我感到沮丧的是，我无法在卡的自定义字段中输入值，我尝试了所有可以想到的事情

这是代码

 Sub atualizaCustomField(listaNome As String,cardNome As String,idCF As String,valor As String)
  Dim Client As New WebClient
  Client.BaseUrl = "https://api.trello.com/1/"
  Dim Request As New WebRequest

  Request.ContentType = "application/json"

  Request.Method = WebMethod.HttpPut
  Request.Resource = "cards/{idCard}/customField/{idCustomField}/item"
  Request.AddUrlSegment "idCard",pegaIDCard(listaNome,cardNome)
  Request.AddUrlSegment "idCustomField",idCF
  
  Request.AddQuerystringParam "key",ApplicationKey
  Request.AddQuerystringParam "token",UserToken
  Debug.Print Request.FormattedResource
   
  Dim Response As WebResponse
  'Set Response = Client.Execute(Request)
  Set Response = Client.PostJson(Client.BaseUrl & Request.FormattedResource,valor)
  Debug.Print valor
  Debug.Print Response.StatusCode & ": " & Response.Content
End Sub

与此不同的是，您必须发布JSON而不是像其他所有请求一样简单地发出请求，必须与该示例匹配（来自trello开发者网站）：

{
  "value": {
    "text": "<string>"
  }
}

在我的代码中，变量“ valor”包含此字符串。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excelexceljsonresttrello