从PowerQuery插入SQL

Question

我需要将excel上的查询转换为SQL上的Insert，我不会创建一个函数来处理任何查询，并调用它，所以他需要非常可重用。

let
    SQL = (TableX as table) => let
        // Get Columns Name abd use on the columns INSERT
        SOURCE = TableX,
        Names = Table.ColumnNames(SOURCE),
        ListN = Table.FromList(Names),
        TransposeN = Table.Transpose(ListN),
        CombineN = Table.CombineColumns(TransposeN,Table.ColumnNames(TransposeN),Combiner.CombineTextByDelimiter(",", QuoteStyle.None),"M"),
        ColunmsAsText = List.Single(CombineN[M]),
        // ColumnsasText is all the Columns Name
        // This part I cant do I need to format all columns acording to the type and Combine They
        COLUNMS = (ListN as text) => let
            TYPE = some.function.to.get.type(SOURCE[ListN]),
            if TYPE = date then FIELDS = FIELDS & "'" & Date.ToText([ListN], "yyyy-MM-dd") & "'," else
            if TYPE = text then FIELDS = FIELDS & "'" & [ListN] & "'," else
            if TYPE = number then FIELDS = FIELDS & [ListN] & "," else FIELDS = FIELDS & "#error,"
   in
        FIELDS
        INSERT = "INSERT INTO " & "TABLENAME" & " (" & ColunmsAsText & ") VALUES (" & FIELDS & ");",
        NEWCOLUMNADD = Table.AddColumn(SOURCE, "SQL", each INSERT)
in
    NEWCOLUMNADD
in
    SQL

问题是字段变量，我需要组成一个包含所有列的字符串，函数"some.function.to.get.type"，对于每一行，输出如下所示：

 INSERT INTO (Column_name1, Column_name2, Column_name3) value (15, '2017-05-20', 'Text hear');

坦克求救。

Answer 1

你想要Value.Type

Value.Type("abc") = type text