“ch.setopt（ch.HTTPPOST，data.items（））TypeError：setopt的无效参数”我收到此错误

Question

当我将所有授权数据放入

时

Public Sub HighLightRows()

    Const START_ROW As Long = 2 '<< use a Constant for fixed values
    Const VALUE_COL As Long = 1

    Dim rw As Range, emptyCells As Long, i As Long, currentValue, tmp

    Dim arrColors
    arrColors = Array(37, 2)

    Set rw = ActiveSheet.Rows(START_ROW)
    currentValue = Chr(0) 'dummy "current value"

    Do While emptyCells < 10 'quit after 10 consecutive empty cells

        tmp = rw.Cells(VALUE_COL).Value
        If Len(tmp) > 0 Then
            If tmp <> currentValue Then
                i = i + 1
                currentValue = tmp 'save the new value
            End If
            'assign the color to a specific set of cells in the row
            '   starting at cell 1 and 5 columns wide
            rw.Cells(1).Resize(1, 5).Interior.ColorIndex = arrColors(i Mod 2)
            emptyCells = 0 'reset empty row counter
        Else
            emptyCells = emptyCells + 1 'increment empty row counter
        End If

        Set rw = rw.Offset(1, 0) 'next row
    Loop

End Sub

我在

收到错误

data = {
  'token': 'XXXXXXXXXXXXXXXXXXXXXXXXXXX',
  'content': 'file',
  'action': 'import',
  'record': '',
  'field': 'record_id',
  'event': '',
  'returnFormat': 'csv',
  'file': '(pycurl.FORM_FILE, file)'
}

说

  

ch.setopt（ch.HTTPPOST，data.items（））   TypeError：setopt`

的无效参数

其余代码：

h.setopt(ch.HTTPPOST, data.items())