Question

以下是XML的摘录：

Sub CutPaste()

Dim Lastrow As Long

ThisWorkbook.Sheets("Sheet1").Range("E5:H5").Copy
Lastrow = Sheets("Sheet2").Cells(Rows.Count, 5).End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial

End Sub

1）是否可以将其导入mysql并自动创建表？

2）我尝试了

<?xml version='1.0' encoding='iso-8859-15'?>
<annonces>
    <annonce>
        <transac>V</transac>
        <type_bien>Maison</type_bien>
        <texte>hello world</texte>
        <p_tel>1210212</p_tel>
        <ann_prix>10</ann_prix>
        <ann_cp>2870</ann_cp>
        <ann_ville>CREPY</ann_ville>
        <ann_dept>2</ann_dept>
        <ann_surface>246</ann_surface>
        <ann_nbpieces>7</ann_nbpieces>
        <first_parution>1999-01-01</first_parution>
        <first_prix>0 &amp;euro;</first_prix>
    </annonce>
    <annonce>
    .....
</annonces>

adn得到了结果

查询OK，0行受影响（0.00秒）记录：0已删除：0已跳过： 0警告：0

Answer 1

您可以使用此代码，我认为适合您

LOAD XML LOCAL INFILE '/datas/data.xml'  INTO TABLE data(field1,field2,field3.field4...);

您也可以使用此代码

 LOAD XML LOCAL INFILE '/datas/data.xml' INTO TABLE  data;

您需要确保文件路径正确，表名和字段值与xml文件相同，并且无法使用单个查询插入和创建在INFILE之前使用LOCAL我认为它会起作用

如何将XML数据导入Mysql表？

1 个答案: