Re: [Asp.net] nochmals dataset und seine =?iso-8859-1?Q?t=FCcken?=

[Lars Berner]

Hi Pat,
gute Frage, woran das liegt..
Was mir auffällt: du weist den Wert jedes DataItems mit Bezug auf den 
Spaltennamen zu.
Du könntest statt

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
mal versuchen, ob folgendes besser klappt:
For Each dtRow in objDataSetB1.Tables("Pics").Rows
  objDataRow.ItemArray  =       dtRow.ItemArray
Next
..würde auch eine Menge Code sparen und evtl. etwas zur 
Performanceverbesserung beisteuern.

Versuchs mal
Viele Grüße
Lars
At 13:51 16.07.2004, you wrote:
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
---
Eingehende Mail ist zertifiziert virenfrei.
Überprüft durch AVG Antivirus System (http://www.grisoft.com/de).
Version: 6.0.720 / Virendatenbank: 476 - Erstellungsdatum: 14.07.2004

www.zoologie-online.de
Lars Berner
Stormcrow-Software
Postfach: 110123
69071 Heidelberg
---
Ausgehende Mail ist zertifiziert virenfrei.
Überprüft durch AVG Antivirus System (http://www.grisoft.com/de).
Version: 6.0.720 / Virendatenbank: 476 - Erstellungsdatum: 14.07.2004