Prístup ku databáze mdb   zodpovězená otázka

VB.NET, Databáze

Dobrý deň.

Prosím o radu. Možno sa to niekomu bude zdať banalita, ale X rokov som robil vo VB 6 a teraz sa snažím písať vo VB 2005, takže sa učím. Neviem prísť na to, ako ukladať dáta do mdb databázy. Mám ListBox, v ktorom sa periodicky opakujú dáta (napríklad výrobné číslo, názov zariadenia, dátum poslednej opravy a podobne). No a mám databázu, ktorej stĺpce sú pomenované ako v hore uvedenom. Ja chcem tieto dáta z ListBoxu ukladať do príslušných stĺpcov v mdb. A ja neviem ako. Čo všetko musím použiť a aká je syntaxa pre vkladanie do databázy. Ďakujem za každú pomoc.

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Zdravím.

Co Vám zd euvedu je jen jeden z mnoha řešení. Jde to řešit přes OleDB (jak je níže popásno), ale taktéž by to šlo řešit i přes ADO.NET. Ale taktéž se zatím učím a k ADO.NET jsem se ještě nedostal.

Pro OleDB:

Imports System.Data.OleDb

Public Class Form1

.....

    'Persist Security Info=False;" if your DB is not PWD protected
    Dim PwdCon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "/database.mdb; Jet OLEDB:Database Password=xXx;"  
    Dim oledbcon As New OleDbConnection(PwdCon)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        ' Přidat nový záznam
        Try
            oledbcon.Open()
            Dim strSQL As String = "INSERT INTO Table1 VALUES ('" & txtID.Text & "','" & txtJmeno.Text & "','" & txtPrijmeni.Text & "')"
            Dim cmd As OleDbCommand = New OleDbCommand(strSQL, oledbcon)
            Dim objadd As OleDbDataReader
            objadd = cmd.ExecuteReader
            objadd.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            oledbcon.Close()
            txtID.Text = ""
            txtJmeno.Text = ""
            txtPrijmeni.Text = ""
            MessageBox.Show("Záznam byl přidán", "Informace", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End Try
....

Co se týká samotnéhop ListBoxu, comboboxu apod., nedávno jsem se ptal na podobnou otázku. Název diskuze je: "VB.NET problém s indexy (načítané z XML) u ComboBoxu"

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Ďakujem,

ale ja by som potreboval ADO.Net. Mám DB priamo ako súčasť programu. Ale skúsim aj takto. Uvidím. Možno to nakoniec budem riešiť cez JET. Ale ak niekto môže pomôcť s ADO, budem rád. Ďakujem.

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Nezkoušel jsem to, pouze to mm uloženo v záložkách:

Using ADO.NET with SQL Server and Access

- http://www.developerfusion.co.uk/show/42...

Executing a SQL query and SqlDataReader

- http://www.developerfusion.co.uk/show/42...

Stored Procedures and other queries with parameter

- http://www.developerfusion.co.uk/show/42...

Using the DataSet (only C#)

- http://www.developerfusion.co.uk/show/42...

... atd., ale pak už je jen C#

nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět

Zodpovězeno.

http://www.vbnet.cz/forum-tema--156-modi...

nahlásit spamnahlásit spam 0 odpovědětodpovědět
                       
Nadpis:
Antispam: Komu se občas házejí perly?
Příspěvek bude publikován pod identitou   anonym.
  • Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
    Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.
  • Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

Uživatel:
Heslo:

zapomenuté heslo

 

založit nový uživatelský účet

zaregistrujte se

 
zavřít

Nahlásit spam

Opravdu chcete tento příspěvek nahlásit pro porušování pravidel fóra?

Nahlásit Zrušit

Chyba

zavřít

feedback