Insert data fra XML-fil i Database

jeg ville nok loope gennem data sættet og lave en insert per række

principielt bør man kunne opdatere en database med et data sæt som er
kompatibelt med det data sæt som hører til databasen, men det tror jeg ikke
er umagen værd at bøvle med

jeg er sådan lidt halv nybegynder, så hvordan kunne man gøre det?

Hvis nu jeg starte med at hente én række ud fra datasættet..



Table = objDataset.Tables("XML_Biler")

For each Table.Datarow
 
  objRow("Colonne1") = varCol1
  objRow("Colonne2") = varCol2

Next

Eller er det helt hen i skoven?

Dim dt As DataTable = ds.Tables("XML_Biler")
For Each dr As DataRow In dt.Rows
    Dim ins As OldDbCommand = New OleDbCommand("INSERT INTO DB_Biler VALUES(" & dr("numcol") & ",'" & dr("textcol") & "')", con)
    ins.ExecuteNonQuery
Next

utestet - men det er ikke helt ved siden ad

[problemstillingen var oplagt til parameters, men lad os glemme dem lige nu]

Okay,  har rodet lidt med det, og får fejlen

Exception Details: System.NullReferenceException: Object reference not set to an instance of an object.

i - For Each dr As DataRow In dt.Rows - linien

Så den skal vel ha et interval den skal løbe i eller hva?

noget i stil med Rows(0) - Rows(Count - 1)...

Lige nu ar jeg koden:

    Dim strRes, strConn, strSQL as string

    ' Build a connection string
    strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
    strConn += server.mappath("./DB/MyRentACar.mdb") + ";"

    ' open the connection to the database
    Dim objConn as New OLEDBConnection(strConn)
    Dim OldDbCommand as new OledbCommand(strSQL, objConn)

    objConn.Open()


        For Each dr As DataRow In dt.Rows 'dt er datatable med XML'ens indhold

            strSQL = "INSERT INTO Cars VALUES('" & dr("CarID") & "','" & dr("make") & "','" & dr("model") &"'," & dr("year") & "," & dr("pricegroup") & ",'" & dr("picture") & "')"
            Dim ins As New OleDbCommand(strSQL, objConn)
            ins.ExecuteNonQuery
        Next

    objConn.close()

har du fået dt initialiseret rigtigt ?

Dim dt As DataTable = ds.Tables("XML_Biler")

ja, det er jeg sikker på

Okay, nu virker det sgu :D

Det er helt kannont.  Fik tilrettet diverse ting og sager og endte med noget der virkede :D

Smid et svar så får du point.

ok

Sådan der

Og tak for hjælpen, Det skal afleveres i morgen så var lidt presset :D