金数据 API

@畅心 畅神，速度杠杠的。

let
源 = Record.Combine(Json.Document(Web.Contents("https://jinshuju.net/api/v1/forms/Gf0HpF", [Headers=[ Authorization="Basic "&Binary.ToText(Text.ToBinary("Sgc9Yq7J2kfmfcWKXgy_bQ:6-rdf70n93bEwkDPcYnuw"))]]))[fields]),
提指定记录 = Table.FromColumns( List.Transform(Table.ToColumns(Table.ExpandRecordColumn(Record.ToTable(源), "Value", {"label"})),each ),{"Name","Value"}),
提升的标题 = Table.PromoteHeaders(Table.Transpose(提指定记录), [PromoteAllScalars=true])
in
提升的标题

按以上修改的一个字段名称提取，不知可否再优化。谢谢！

@0086 提指定记录 =List.Transform(源,each Record.ToList(_){0}[label])

@畅心

要这种格式，好追加用做表头。同名字段合并。

您的结果是

感谢了。

@0086

Table.TransformColumns(Table.FromRecords({源}),{},each [label])

碰到一下新问题，共有2720条记录，现在只能读取到50条记录的。

源y = Table.FromRecords(Json.Document(Web.Contents("https://jinshuju.net/api/v1/forms/DYk6v5/entries", [Headers=[ Authorization="Basic "&Binary.ToText(Text.ToBinary("Sgc9Yq7J2kfmfcWKXgy_bQ:6-rdf_70n93bEwkDPcYnuw"))]]))[data]),

@0086

源y=Table.Combine(List.Transform({0..54},each Table.FromRecords(Json.Document(Web.Contents("https://jinshuju.net/api/v1/forms/DYk6v5/entries?next="&Text.From(if _=0 then 0 else _*50+1), [Headers=[ Authorization="Basic "&Binary.ToText(Text.ToBinary("你的key:对应secret"))]]))[data])))

@0086 在不知道总数据2720的时候，科学一点就是应该用List.Generate判断每次接口返回的next值而建立下一次取值范围。