Daten in Dataset einfügen und anschließend als xmlshema speichern

  • VB.NET
  • .NET (FX) 4.0

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    Daten in Dataset einfügen und anschließend als xmlshema speichern

    Einen Schönen guten Tag @ll,

    Bin dann auch mal wieder da und bringe gleich die ein oder andere Frage mit :D

    Hintergrund zu meinem bisherigen vorhaben.

    Ich habe ein DataSet erstellt um einfache werte aus Textboxen und ComboBoxen darinnen abzuspeichern und wieder abrufen zu können via XMLShema, was mir als sehr sinnvoll und einfach erschien. Zudem habe ich Eine ComboBox als Auswahl Einheit gewählt um nur eine gewisse Textboxen und Labels je Auswahl Anzuzeigen und die restlichen zu verbergen.

    Die erste frage wäre:

    Könnte mir jemand den Befehl für meinen Button5 verraten zum Speichern meiner Eingabe der Textboxen / ComboBoxen im DataSet , und es Anschließend im XMLShema zu Speichern ?

    und die Zweite Frage:

    Gibt es eine Einfache und Elegantere Lösung zu meinen ComoBox1 Einträgen ?

    Ich danke Schon einmal für die Hilfe :)

    Liebe Grüße,
    Sonaca

    VB.NET-Quellcode

    1. Option Strict On
    3. Imports System.IO
    4. Imports System.Data.Common
    5. Imports System.Data.SqlClient
    7. Public Class Main
    9. #Region "Deklarationen"
    11. Dim path As String = My.Application.Info.DirectoryPath ' Deklaration zum Ordner von wo aus die exe gestartet wurde
    13. Dim ds As DataSet = New DataSet()
    14. Dim da As DbDataAdapter = New SqlDataAdapter()
    15. Dim cmd As DbCommand = New SqlCommand()
    17. #End Region
    19. Private Sub Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    21. udBeispiel.Show()
    23. If File.Exists(path & "\updater.xml") Then
    24. ds.ReadXml(path & "\updater.xml")
    25. Else
    26. ds.ReadXmlSchema(path & "\updater.xsd")
    27. ds.WriteXml(path & "\updater.xml", XmlWriteMode.WriteSchema)
    28. End If
    30. End Sub
    32. Private Sub comboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboBox1.SelectedIndexChanged, comboBox1.SelectedValueChanged
    34. If comboBox1.SelectedIndex = 0 Then
    36. #Region "Fenster 1 Anzeigen"
    37. Label2.Show()
    38. HöheLabel.Show()
    39. HöheTextBox.Show()
    40. BreiteLabel.Show()
    41. BreiteTextBox.Show()
    42. Hintergrund_BildLabel.Show()
    43. Hintergrund_BildTextBox.Show()
    44. Hintergrund_MusikLabel.Show()
    45. Hintergrund_MusikTextBox.Show()
    46. Start_ButtonLabel.Show()
    47. ComboBox2.Show()
    48. Update_ButtonLabel.Show()
    49. ComboBox3.Show()
    50. Register_BttonLabel.Show()
    51. ComboBox4.Show()
    52. Abbruch_ButtonLabel.Show()
    53. ComboBox5.Show()
    55. #End Region
    57. #Region "Fenster 2 Ausblenden"
    59. AnzeigenComboBox.Hide()
    60. AnzeigenLabel.Hide()
    61. HöheTextBox1.Hide()
    62. BreiteTextBox1.Hide()
    63. Position_XTextBox.Hide()
    64. Position_YTextBox.Hide()
    65. URLTextBox.Hide()
    66. AnzeigenComboBox1.Hide()
    67. HöheTextBox2.Hide()
    68. BreiteTextBox2.Hide()
    69. Position_XTextBox1.Hide()
    70. Position_YTextBox1.Hide()
    71. URLTextBox1.Hide()
    72. HöheLabel1.Hide()
    73. BreiteLabel1.Hide()
    74. Position_XLabel.Hide()
    75. Position_YLabel.Hide()
    76. URLLabel.Hide()
    77. AnzeigenLabel1.Hide()
    78. HöheLabel2.Hide()
    79. BreiteLabel2.Hide()
    80. Position_XLabel1.Hide()
    81. Position_YLabel1.Hide()
    82. URLLabel1.Hide()
    83. Label3.Hide()
    84. Label4.Hide()
    86. #End Region
    88. #Region "Fenster 3 Ausblenden"
    90. Label5.Hide()
    91. Start_Button_HöheTextBox.Hide()
    92. Start_Button_BreiteTextBox.Hide()
    93. Start_Button_Pos__XTextBox.Hide()
    94. Start_Button_Pos__YTextBox.Hide()
    95. Update_Button_HöheTextBox.Hide()
    96. Update_Button_BreiteTextBox.Hide()
    97. Update_Button_Pos__XTextBox.Hide()
    98. Update_Button_Pos__YTextBox.Hide()
    99. Start_Button_HöheLabel.Hide()
    100. Start_Button_BreiteLabel.Hide()
    101. Start_Button_Pos__XLabel.Hide()
    102. Start_Button_Pos__YLabel.Hide()
    103. Update_Button_HöheLabel.Hide()
    104. Update_Button_BreiteLabel.Hide()
    105. Update_Button_Pos__XLabel.Hide()
    106. Update_Button_Pos__YLabel.Hide()
    108. #End Region
    110. #Region "Fenster 4 Ausblenden"
    112. Label6.Hide()
    113. Register_Button_HöheTextBox.Hide()
    114. Register_Button_BreiteTextBox.Hide()
    115. Register_Button_Pos__XTextBox.Hide()
    116. Register_Button_Pos__YTextBox.Hide()
    117. Register_Button_URLTextBox.Hide()
    118. Abbruch_Button_HöheTextBox.Hide()
    119. Abbruch_Button_BreiteTextBox.Hide()
    120. Abbruch_Button_Pos__XTextBox.Hide()
    121. Abbruch_Button_Pos__YTextBox.Hide()
    122. Register_Button_HöheLabel.Hide()
    123. Register_Button_BreiteLabel.Hide()
    124. Register_Button_Pos__XLabel.Hide()
    125. Register_Button_Pos__YLabel.Hide()
    126. Register_Button_URLLabel.Hide()
    127. Abbruch_Button_HöheLabel.Hide()
    128. Abbruch_Button_BreiteLabel.Hide()
    129. Abbruch_Button_Pos__XLabel.Hide()
    130. Abbruch_Button_Pos__YLabel.Hide()
    132. #End Region
    134. End If
    136. If comboBox1.SelectedIndex = 1 Then
    138. #Region "Fenster 1 Ausblenden"
    140. Label2.Hide()
    141. HöheLabel.Hide()
    142. HöheTextBox.Hide()
    143. BreiteLabel.Hide()
    144. BreiteTextBox.Hide()
    145. Hintergrund_BildLabel.Hide()
    146. Hintergrund_BildTextBox.Hide()
    147. Hintergrund_MusikLabel.Hide()
    148. Hintergrund_MusikTextBox.Hide()
    149. Start_ButtonLabel.Hide()
    150. ComboBox2.Hide()
    151. Update_ButtonLabel.Hide()
    152. ComboBox3.Hide()
    153. Register_BttonLabel.Hide()
    154. ComboBox4.Hide()
    155. Abbruch_ButtonLabel.Hide()
    156. ComboBox5.Hide()
    158. #End Region
    160. #Region "Fenster 2 Anzeigen"
    162. AnzeigenComboBox.Show()
    163. AnzeigenLabel.Show()
    164. HöheTextBox1.Show()
    165. BreiteTextBox1.Show()
    166. Position_XTextBox.Show()
    167. Position_YTextBox.Show()
    168. URLTextBox.Show()
    169. AnzeigenComboBox1.Show()
    170. HöheTextBox2.Show()
    171. BreiteTextBox2.Show()
    172. Position_XTextBox1.Show()
    173. Position_YTextBox1.Show()
    174. URLTextBox1.Show()
    175. HöheLabel1.Show()
    176. BreiteLabel1.Show()
    177. Position_XLabel.Show()
    178. Position_YLabel.Show()
    179. URLLabel.Show()
    180. AnzeigenLabel1.Show()
    181. HöheLabel2.Show()
    182. BreiteLabel2.Show()
    183. Position_XLabel1.Show()
    184. Position_YLabel1.Show()
    185. URLLabel1.Show()
    186. Label3.Show()
    187. Label4.Show()
    189. #End Region
    191. #Region "Fenster 3 Ausblenden"
    193. Label5.Hide()
    194. Start_Button_HöheTextBox.Hide()
    195. Start_Button_BreiteTextBox.Hide()
    196. Start_Button_Pos__XTextBox.Hide()
    197. Start_Button_Pos__YTextBox.Hide()
    198. Update_Button_HöheTextBox.Hide()
    199. Update_Button_BreiteTextBox.Hide()
    200. Update_Button_Pos__XTextBox.Hide()
    201. Update_Button_Pos__YTextBox.Hide()
    202. Start_Button_HöheLabel.Hide()
    203. Start_Button_BreiteLabel.Hide()
    204. Start_Button_Pos__XLabel.Hide()
    205. Start_Button_Pos__YLabel.Hide()
    206. Update_Button_HöheLabel.Hide()
    207. Update_Button_BreiteLabel.Hide()
    208. Update_Button_Pos__XLabel.Hide()
    209. Update_Button_Pos__YLabel.Hide()
    211. #End Region
    213. #Region "Fenster 4 Ausblenden"
    215. Label6.Hide()
    216. Register_Button_HöheTextBox.Hide()
    217. Register_Button_BreiteTextBox.Hide()
    218. Register_Button_Pos__XTextBox.Hide()
    219. Register_Button_Pos__YTextBox.Hide()
    220. Register_Button_URLTextBox.Hide()
    221. Abbruch_Button_HöheTextBox.Hide()
    222. Abbruch_Button_BreiteTextBox.Hide()
    223. Abbruch_Button_Pos__XTextBox.Hide()
    224. Abbruch_Button_Pos__YTextBox.Hide()
    225. Register_Button_HöheLabel.Hide()
    226. Register_Button_BreiteLabel.Hide()
    227. Register_Button_Pos__XLabel.Hide()
    228. Register_Button_Pos__YLabel.Hide()
    229. Register_Button_URLLabel.Hide()
    230. Abbruch_Button_HöheLabel.Hide()
    231. Abbruch_Button_BreiteLabel.Hide()
    232. Abbruch_Button_Pos__XLabel.Hide()
    233. Abbruch_Button_Pos__YLabel.Hide()
    235. #End Region
    237. End If
    239. If comboBox1.SelectedIndex = 2 Then
    241. #Region "Fenster 1 Ausblenden"
    243. Label2.Hide()
    244. HöheLabel.Hide()
    245. HöheTextBox.Hide()
    246. BreiteLabel.Hide()
    247. BreiteTextBox.Hide()
    248. Hintergrund_BildLabel.Hide()
    249. Hintergrund_BildTextBox.Hide()
    250. Hintergrund_MusikLabel.Hide()
    251. Hintergrund_MusikTextBox.Hide()
    252. Start_ButtonLabel.Hide()
    253. ComboBox2.Hide()
    254. Update_ButtonLabel.Hide()
    255. ComboBox3.Hide()
    256. Register_BttonLabel.Hide()
    257. ComboBox4.Hide()
    258. Abbruch_ButtonLabel.Hide()
    259. ComboBox5.Hide()
    261. #End Region
    263. #Region "Fenster 2 Ausblenden"
    265. AnzeigenComboBox.Hide()
    266. AnzeigenLabel.Hide()
    267. HöheTextBox1.Hide()
    268. BreiteTextBox1.Hide()
    269. Position_XTextBox.Hide()
    270. Position_YTextBox.Hide()
    271. URLTextBox.Hide()
    272. AnzeigenComboBox1.Hide()
    273. HöheTextBox2.Hide()
    274. BreiteTextBox2.Hide()
    275. Position_XTextBox1.Hide()
    276. Position_YTextBox1.Hide()
    277. URLTextBox1.Hide()
    278. HöheLabel1.Hide()
    279. BreiteLabel1.Hide()
    280. Position_XLabel.Hide()
    281. Position_YLabel.Hide()
    282. URLLabel.Hide()
    283. AnzeigenLabel1.Hide()
    284. HöheLabel2.Hide()
    285. BreiteLabel2.Hide()
    286. Position_XLabel1.Hide()
    287. Position_YLabel1.Hide()
    288. URLLabel1.Hide()
    289. Label3.Hide()
    290. Label4.Hide()
    292. #End Region
    294. #Region "Fenster 3 Anzeigen"
    296. Label5.Show()
    297. Start_Button_HöheTextBox.Show()
    298. Start_Button_BreiteTextBox.Show()
    299. Start_Button_Pos__XTextBox.Show()
    300. Start_Button_Pos__YTextBox.Show()
    301. Update_Button_HöheTextBox.Show()
    302. Update_Button_BreiteTextBox.Show()
    303. Update_Button_Pos__XTextBox.Show()
    304. Update_Button_Pos__YTextBox.Show()
    305. Start_Button_HöheLabel.Show()
    306. Start_Button_BreiteLabel.Show()
    307. Start_Button_Pos__XLabel.Show()
    308. Start_Button_Pos__YLabel.Show()
    309. Update_Button_HöheLabel.Show()
    310. Update_Button_BreiteLabel.Show()
    311. Update_Button_Pos__XLabel.Show()
    312. Update_Button_Pos__YLabel.Show()
    314. #End Region
    316. #Region "Fenster 4 Ausblenden"
    318. Label6.Hide()
    319. Register_Button_HöheTextBox.Hide()
    320. Register_Button_BreiteTextBox.Hide()
    321. Register_Button_Pos__XTextBox.Hide()
    322. Register_Button_Pos__YTextBox.Hide()
    323. Register_Button_URLTextBox.Hide()
    324. Abbruch_Button_HöheTextBox.Hide()
    325. Abbruch_Button_BreiteTextBox.Hide()
    326. Abbruch_Button_Pos__XTextBox.Hide()
    327. Abbruch_Button_Pos__YTextBox.Hide()
    328. Register_Button_HöheLabel.Hide()
    329. Register_Button_BreiteLabel.Hide()
    330. Register_Button_Pos__XLabel.Hide()
    331. Register_Button_Pos__YLabel.Hide()
    332. Register_Button_URLLabel.Hide()
    333. Abbruch_Button_HöheLabel.Hide()
    334. Abbruch_Button_BreiteLabel.Hide()
    335. Abbruch_Button_Pos__XLabel.Hide()
    336. Abbruch_Button_Pos__YLabel.Hide()
    338. #End Region
    340. End If
    342. If comboBox1.SelectedIndex = 3 Then
    344. #Region "Fenster 1 Ausblenden"
    346. Label2.Hide()
    347. HöheLabel.Hide()
    348. HöheTextBox.Hide()
    349. BreiteLabel.Hide()
    350. BreiteTextBox.Hide()
    351. Hintergrund_BildLabel.Hide()
    352. Hintergrund_BildTextBox.Hide()
    353. Hintergrund_MusikLabel.Hide()
    354. Hintergrund_MusikTextBox.Hide()
    355. Start_ButtonLabel.Hide()
    356. ComboBox2.Hide()
    357. Update_ButtonLabel.Hide()
    358. ComboBox3.Hide()
    359. Register_BttonLabel.Hide()
    360. ComboBox4.Hide()
    361. Abbruch_ButtonLabel.Hide()
    362. ComboBox5.Hide()
    364. #End Region
    366. #Region "Fenster 2 Ausblenden"
    368. AnzeigenComboBox.Hide()
    369. AnzeigenLabel.Hide()
    370. HöheTextBox1.Hide()
    371. BreiteTextBox1.Hide()
    372. Position_XTextBox.Hide()
    373. Position_YTextBox.Hide()
    374. URLTextBox.Hide()
    375. AnzeigenComboBox1.Hide()
    376. HöheTextBox2.Hide()
    377. BreiteTextBox2.Hide()
    378. Position_XTextBox1.Hide()
    379. Position_YTextBox1.Hide()
    380. URLTextBox1.Hide()
    381. HöheLabel1.Hide()
    382. BreiteLabel1.Hide()
    383. Position_XLabel.Hide()
    384. Position_YLabel.Hide()
    385. URLLabel.Hide()
    386. AnzeigenLabel1.Hide()
    387. HöheLabel2.Hide()
    388. BreiteLabel2.Hide()
    389. Position_XLabel1.Hide()
    390. Position_YLabel1.Hide()
    391. URLLabel1.Hide()
    392. Label3.Hide()
    393. Label4.Hide()
    395. #End Region
    397. #Region "Fenster 3 Ausblenden"
    399. Label5.Hide()
    400. Start_Button_HöheTextBox.Hide()
    401. Start_Button_BreiteTextBox.Hide()
    402. Start_Button_Pos__XTextBox.Hide()
    403. Start_Button_Pos__YTextBox.Hide()
    404. Update_Button_HöheTextBox.Hide()
    405. Update_Button_BreiteTextBox.Hide()
    406. Update_Button_Pos__XTextBox.Hide()
    407. Update_Button_Pos__YTextBox.Hide()
    408. Start_Button_HöheLabel.Hide()
    409. Start_Button_BreiteLabel.Hide()
    410. Start_Button_Pos__XLabel.Hide()
    411. Start_Button_Pos__YLabel.Hide()
    412. Update_Button_HöheLabel.Hide()
    413. Update_Button_BreiteLabel.Hide()
    414. Update_Button_Pos__XLabel.Hide()
    415. Update_Button_Pos__YLabel.Hide()
    417. #End Region
    419. #Region "Fenster 4 Einblenden"
    421. Label6.Show()
    422. Register_Button_HöheTextBox.Show()
    423. Register_Button_BreiteTextBox.Show()
    424. Register_Button_Pos__XTextBox.Show()
    425. Register_Button_Pos__YTextBox.Show()
    426. Register_Button_URLTextBox.Show()
    427. Abbruch_Button_HöheTextBox.Show()
    428. Abbruch_Button_BreiteTextBox.Show()
    429. Abbruch_Button_Pos__XTextBox.Show()
    430. Abbruch_Button_Pos__YTextBox.Show()
    431. Register_Button_HöheLabel.Show()
    432. Register_Button_BreiteLabel.Show()
    433. Register_Button_Pos__XLabel.Show()
    434. Register_Button_Pos__YLabel.Show()
    435. Register_Button_URLLabel.Show()
    436. Abbruch_Button_HöheLabel.Show()
    437. Abbruch_Button_BreiteLabel.Show()
    438. Abbruch_Button_Pos__XLabel.Show()
    439. Abbruch_Button_Pos__YLabel.Show()
    441. #End Region
    443. End If
    445. End Sub
    447. Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
    449. End Sub
    451. End Class

    Pack doch die ganzen Controls die angezeigt/ausgeblendet werden sollen in eine GroupBox und blende einfach die GroupBox ein/aus. Alternativ nen TabControl verwenden, gleiche vorgehensweise und dann die TabPages ein-/ausblenden.

    Edit: Was genau macht dein Programm denn bzw. was soll es machen? Sind ganz schön viele Controls mit denen du so rumhantierst, evtl. kann man da auch noch was optimieren. Evtl. reicht es schon den Text eines Buttons zu ändern und dann je nachdem eine andere Methode aufzurufen ...
    "Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. Lehre einen Mann zu fischen und du ernährst ihn für sein Leben."

    Wie debugge ich richtig? => Debuggen, Fehler finden und beseitigen
    Wie man VisualStudio nutzt? => VisualStudio richtig nutzen

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „mrMo“ ()

    @mrMo Jou.
    @Sonaca und mit .Visible = True | False brauchst Du noch nicht mal ein If.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Servus, erst einmal danke für eure antworten :)

    Es handelt sich um einen simplen updater für die privat Server ebene.

    Der hoster soll seine Oberfläche selbst grafisch disingnen können, sprich Größen und Positionen sowie aussehen der einzelnen Elemente selbst festlegen, und es dann so an den endbenutzer ( seine spieler )weiterleiten.

    Gestaltet auf 2 forms
    Die erste ( aus der der code resultiert ) ist zum speichern und ausgeben der Daten.

    Die 2. soll sich anhand der Daten halt gestalten und dem user das Endprodukt dann direkt anzeigen, was er sich gestaltet hat.

    Und da dachte ich mir das sich da ein dataset mehr empfiehlt als das Standarte XML verfahren, bzw es wirkte eimfacher und übersichtlicher :)

    @RoadFromGermany hast du vll. Einmal einen code Beispiel für mich, damit ich mir was unter deinem tip vorstellen kann ? Habe gerade keine Ahnung worauf du anspielst bzw wie ich das realisieren kann

    Grüße

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Sonaca“ ()

    Sonaca schrieb:

    einen code Beispiel
    Klar doch:

    VB.NET-Quellcode

    1. Label1.Visible = (comboBox1.SelectedIndex = 1)
    2. GroupBox1.Evabled = (comboBox1.SelectedIndex != 2)
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    @Sonaca Wozu brauchst Du ein XML-Schema auf der Festplatte?
    Organisiere Dein DataSet im Progamm.
    Ein anderes Beispiel, aber es funktioniert, gugst Du hier.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook
Telefonspende