hallo zusammen,
ich versuche mittels eine for each schleife von einem bestehenden Dataset in
eine leeres Dataset Datensätze zu übernehmen. Funktioniert auch soweit, aber
sobald ich 2 neue Spalten hinzufüge die ich dort haben muss, streikt .net!
Fehlermeldung1: Die Spalte "h-path" gehört nicht zu Tabelle "Pictures"
Nach zahlreichen Versuchen des umbenennens (ohne Sonderzeichen, etc) habe
ich mir einmal das DataSet anzeigen lassen. KOmischerweise macht .net aus
meinen Spalten h-path und t-path folgendes -> Expr1002 und Expr1003.
Nachdem ich diese Namen (warum auch immer diese angelegt werden) für die
Spalten benutzt habe erschien folgende Fehlermeldung:
System.FormatException: Die Eingabezeichenfolge hat das falsche Format. at
System.Number.ParseDouble(String s, NumberStyles style, NumberFormatInfo
info) at System.Double.Parse(String s, NumberStyles style, IFormatProvider
provider) at System.Convert.ToDouble(String value, IFormatProvider provider)
at System.String.System.IConvertible.ToDouble(IFormatProvider provider) at
System.Convert.ToDouble(Object value) at
System.Data.Common.DoubleStorage.Set(Int32 record, Object value) at
System.Data.DataColumn.set_Item(Int32 record, Object
value)<properties/H_A_101_C_LR_0.jpg> konnte nicht in der Expr1002-Spalte
gespeichert werden. Erwarteter Typ: Double.
Ich habe keine Ahnung wieso sich das .net fr überhaupt dagegen währt das
Dataset zu füllen, obwohl das Ausgangsdataset identisch ist mit dem zu
füllenden. Code hierfür siehe am Ende der Mail.
Kann mir jemand sagen wie ich sonst eine 1x1 Kopie einer Datenbanktabelle
erstellen kann, so dass es auch noch halbwegs perfomant ist?
Ich habe jetzt absolut keine Lust mehr hier den Fehler zu suchen, da es für
mich keinen Fehler gibt im Code, das scheint eher ein Bug zu sein. Oder doch
nicht???
Grüsse
Pat
Code:
Dim objDataSetB1 As New DataSet()
Dim objDataSetB2 As New DataSet()
Dim objDataAdapterB1 As New OleDbDataAdapter()
Dim objDataAdapterB2 As New OleDbDataAdapter()
Dim objCommand As New OleDbCommand()
objCommand.Connection = ALobjConnect
objCommand.CommandType = CommandType.Text
objCommand.CommandText = "SELECT * FROM tbl_photos"
objDataAdapterB1.SelectCommand = objCommand
objDataAdapterB1.Fill(objDataSetB1, "Pics")
Dim objCommand2 As New OleDbCommand()
objCommand2.Connection = objConnect
objCommand2.CommandType = CommandType.Text
objCommand2.CommandText = "SELECT property, serial, h-path, t-path FROM
Pictures"
objDataAdapterB2.SelectCommand = objCommand2
objDataAdapterB2.FillSchema(objDataSetB2, SchemaType.Source, "Pictures")
objDataSetB2.AcceptChanges()
Dim objDataRow, dtRow as DataRow
For Each dtRow in objDataSetB1.Tables("Pics").Rows
objDataRow = objDataSetB2.Tables("Pictures").NewRow()
objDataRow("property") = dtRow("property")
objDataRow("serial") = dtRow("serial")
objDataRow("Expr1002") = dtRow("h-path").ToString
objDataRow("Expr1003") = dtRow("t-path").ToString
objDataSetB2.Tables("Pictures").Rows.Add(objDataRow)
Next
Dim objCommandBuilder As New OleDbCommandBuilder(objDataAdapterB2)
objDataAdapterB2.InsertCommand = objCommandBuilder.GetInsertCommand()
outInsert.InnerText = objDataAdapterB2.InsertCommand.CommandText
objDataAdapterB2.Update(objDataSetB2, "Pictures")
_______________________________________________
Asp.net Mailingliste, Postings senden an:
[EMAIL PROTECTED]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/asp.net
