Excel Power BI 调用古诗词API

let    Response = Web.Contents("https://poetry.palemoky.com/api/poems/random"),    JsonResult = Json.Document(Response),    PoemData = JsonResult[data],    Title = PoemData[title],    Author = PoemData[author][name],    Dynasty = PoemData[dynasty][name],    ContentLines = PoemData[content],    ContentText = Text.Combine(ContentLines, "#(lf)"),    FullText = Title & "#(lf)" &                Author & "#(lf)" &                Dynasty & "#(lf)" &                ContentText,    Result = #table({"诗词内容"}, {{FullText}})in    Result