Vyprázdnění databáze   zodpovězená otázka

VB.NET, WinForms, Databáze

23. 7. 2015 8:53

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Dobrý den,

potřeboval bych poradit jak jednoduše ve VB vymazat všechny položky v databázi. Dělám to takto:

For i As Integer = BindingSource1.Count - 1 To 0 Step -1
    DataDS.Tables("Tabulka").Clear()
    BindingSource1.RemoveAt(i)
    TableAdapter1.Update(Me.DataSource)
Next

Je to ale pomalé a určitě existuje lepší způsob. Zkoušel jsem DataDS.Tables("Tabulka").Clear() ale bez úspěchu.

Předem děkuji za radu.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 9:05

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

Obávám se, že takto pouze smažete položky. Pokud máte nastaven "autoincrement", tak při dalším vložení se nezačne od 1, ale bude pokračovat dalším číslem následujícím po původním posledním čísle. Na vymazání tabulky je příkaz 

truncate table nazevtabulky

ale nevím, jak se dá použít ve VB.NET. Já mažu tabulky v SQL Management studiu...
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 9:15

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Já SQL Management studio nepoužívám, nemám s tím zkušenosti. Mám databáze MS Access.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 9:17

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

Můžete zkusit ten SQL příkaz použít přímo v tom Accessu, podle mě by to mohlo fungovat i tam...
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 9:32

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Nemůžete mi poradit jak? S SQL nemám moc zkušeností a využívám v podstatě jen filtry, které zadám do BindigSource.Filter. Jak bych měl ve VB z WinForms předat tento příkaz databázi v Accessu?
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 10:47

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

Asi bych to zkusil přímo v tom souboru Accessu...
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 11:03

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Potřebuji to vyprázdnit z aplikace ve WinForms.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 12:16

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

a jak máte nastaveno připojení do DB?
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 15:37

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

K připojení využívám DataSource a Configiration Wizard, přičemž DB připojuji přes Database -> Dataset -> Microsoft Access Database File. A pak přes BindigSource.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

23. 7. 2015 15:47

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

zkuste se inspirovat tady

http://www.dotnetportal.cz/forum/tema/15...

jen do dotazu místo select zkuste dát to 

truncate table nazevtabulky
nahlásit spamnahlásit spam 0 odpovědětodpovědět

27. 7. 2015 10:03

anonym
 

91.139.14.34

Jak bych měl ve VB z WinForms předat tento příkaz databázi v Accessu?

Vymazání všech záznamů :

Dim cmd As New OleDbCommand("DELETE * FROM tablename", connection)
cmd.ExecuteNonQuery()

Odstranění celé tabulky pomocí SQL příkazu :

Dim cmd As New OleDbCommand("DROP TABLE tablename", connection)
cmd.ExecuteNonQuery()
nahlásit spamnahlásit spam 0 odpovědětodpovědět

27. 7. 2015 16:16

Michal Štěpánek
 

Hodnocení 19     Příspěvků 291

Pokud uděláte "jen" DELETE a následně vložíte záznam, tak v případě, že máte nastaveno AUTO_INCREMENT na "IDčku", bude číslování pokračovat následujícím číslem (po původním posledním záznamu) a nikoliv od jedničky.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

30. 7. 2015 23:11

Augustín Beňo
 

Hodnocení 0     Příspěvků 8

Ja mažem obsah tabuliek takto:

Pre každú tabulku vytvorim ďaľší TableAdapter

xy.TableAdapter.DeleteQ()

DELETE *

FROM xy

v programe zavolám príkaz xy.TableAdapter.DeleteQ
nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět

31. 7. 2015 12:35

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Něco takovýho jsem si představoval, ale nějak jsem to nepochopil. TableAdapter se mi vytvoří automaticky po přidání komponenty BindingSource, jen si podle potřeby přejmenuju. Tento TableAdapter ale žádné DeleteQ nemá, aspoň jsem nic takovýho nenašel.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

2. 8. 2015 18:25

Augustín Beňo
 

Hodnocení 0     Příspěvků 8

DeleteQ je názov môjho ďaľšieho TableAdapteru (TA)

V návrhovom zobrazení

1. Otvoriť xyDataAdapter.xsd

2.Klik pravým na TA

3. Vybrať Add Query

4. Delete

5. čo vlastne chcem mazať

6. určím názov daľšieho TA
nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět

3. 8. 2015 10:20

anonym
 

81.19.10.70

Díky za vysvětlení. Tohle jsem neznal a je to přesně to co jsem potřeboval. Zase jsem o něco chytřejší. :)
nahlásit spamnahlásit spam 0 odpovědětodpovědět

3. 8. 2015 10:50

Martin Mikulík
 

Hodnocení 0     Příspěvků 13

Ještě jednou dík. Předtím jsem se zapomněl přihlásit.
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