Teď jste offline a čekáte, až se znova připojí internet.

Jak odstranit tabulku z databáze pomocí jazyka

Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.

Projděte si také anglickou verzi článku:110959
Právní omezení pro obsah znalostní báze týkající se produktů, jejichž podpora byla ukončena
Tento článek byl napsán o produktech, pro které společnost Microsoft již neposkytuje nadále podporu. Článek je tedy nabízen v takovém stavu, v jakém je, a nebude již nadále aktualizován.
Souhrn
Tento článek popisuje odstranění tabulky z databáze pomocí pro Windows Professional Edition aplikace Visual Basic verze 3.0.

Tento postup funguje pro databázi, která je v nativním formátu databáze aplikace. Nepatrné změny jej bude také pracovat s databází aplikace Access.
Další informace
Odstranění tabulky z databáze Microsoft Access v aplikaci Visual Basic, použijte některou z následujících metod:

  • Otevřete databázi jazyka data Manager vyberte tabulku a zvolte tlačítko Odstranit. Můžete spustit program Správce dat, v nabídce Okno příkaz jazyka nebo ze souboru správce systému Windows (spuštění v adresáři jazyka DATAMGR.EXE) Odstranění tabulky z libovolného typu databáze podporována jazyka.
  • Použít níže uvedené tabulky odstranit program jazyka ukázkové databáze pomocí objektové proměnné.
  • Otevřete databázi v aplikaci Access, vyberte tabulku a zvolte odstranit z nabídky Úpravy.
Upozornění: Při odstranění tabulky dat uložených v této tabulce také odstraněny. Pokud chcete zachovat data v tabulce, kterou chcete odstranit, zápis jazyka aplikace před odstraněním existující tabulku zkopírovat data do nové tabulky.

Pokud chcete odstranit všechny záznamy v tabulce a nadále zachovat TableDef definice tabulky, můžete provést příkaz SQL odstranit metody Execute. Například:
   Dim db as database   Set db=OpenDatabase("testing.mdb")   db.Execute "Delete From BadTable"				

Ukázkový program

  1. Spuštění nového projektu v jazyka. Jako výchozí je vytvořen formulář Form1.
  2. Přidat následující kód události Load formuláře:
       Sub Form_Load ()      Dim db As database      Dim tds As TableDefs      form1.Show  ' Must Show form in Load event for Print to be visible.      form1.WindowState = 2   ' Maximize Form1 to make room for table list.      sourcedb = "c:\VB3\BIBLIO.MDB"  ' Original master database.      destdb = "C:\TEST.MDB"     ' Path to database with table to delete.      tabletodelete = "Authors"      FileCopy sourcedb, destdb  ' Use copy of database; preserve original.      Set db = OpenDatabase(destdb)      Set tds = db.TableDefs     ' Open the TableDefs collection.      ' Display names of all tables in database:      For j = 0 To tds.Count - 1         Print tds(j).Name      Next      Print      ' Delete a table. (This deletes the TableDef and all records):      tds.Delete tabletodelete      ' or use:   db.TableDefs.Delete tabletodelete      ' If you want to delete all records and still preserve the TableDef      ' table definition, use the following instead of the above Delete:      ' db.Execute "Delete From " & tabletodelete      ' Display names of all tables in database:      Print "List of tables after deleting one table:": Print      For j = 0 To tds.Count - 1         Print tds(j).Name      Next   End Sub						
  3. Spuštění programu nebo stisknutím klávesy F5. Program zobrazí seznam všech tabulek v databázi před a po odstranění tabulky. Zavřete formulář program ukončit.
Můžete také potvrdit, že v tabulce byl odstraněn z databáze otevřením databáze TEST.MDB pomocí dat správce dodávané s jazyka nebo bude.

Hierarchie objektů databáze

Objekt hierarchie v horní části databáze je objekt databáze nebude zaměňovat s vlastnost databáze řízení dat. Vlastnosti objektu databáze je kolekce TableDefs, což je také objekt. Kolekce TableDefs představuje všechny jednotlivé TableDef objekty přidružené tabulky objektů, včetně veškeré připojené externí tabulky. Objekty TableDef každý reprezentují strukturu nebo metadata tabulky.

Každý objekt TableDef se skládá z vlastností. Například vlastnost název poskytuje název tabulky. Vlastnosti pole a indexy objekt TableDef jsou kolekce dva objekty přístup další data, objekt pole a objekt index. Další informace naleznete v nabídce Visual Basic.

Další příklady datových

VISDATA.MAK projektu, které je nainstalován v adresáři VB3\SAMPLES\VISDATA poskytuje rozsáhlými příklady přístup k datům. Ukázkový program VISDATA používá funkci přístup všech dat v jazyka. Odkazovat na zdrojový kód VISDATA příklady ukazují, jak použít funkci přístup každého data.
3.00

Upozornění: Tento článek je přeložený automaticky

Vlastnosti

ID článku: 110959 - Poslední kontrola: 01/09/2003 05:10:11 - Revize: 1.1

Microsoft Visual Basic 3.0 Professional Edition

  • kbmt KB110959 KbMtcs
Váš názor
var varAutoFirePV = 1; var varClickTracking = 1; var varCustomerTracking = 1; var Route = "76500"; var Ctrl = ""; document.write(" ">