Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Deklarácie databázy rukoväť a konkretizovať ho otvorte databázu , do ktorej chcete vložiť nový záznam , ako v nasledujúcom ukážkovom kóde :
Dim MyDatabase ako databáza
Nastaviť MyDatabase = OpenDatabase ( " myDatabaseMdbFile.mdb " )
Nahradiť " myDatabaseMdbFile.mdb " s názvom súboru mdb pre databázu v otázke .
2
Prehlasujem , stolný rukoväť a konkretizovať ho otvorením tabuľky ( v databáze otvorili v kroku 1 ) , kde bude nový záznam ísť , ako v nasledujúcom ukážkovom kóde :
Dim myTable ako RecordSet
nastaviť myTable = myDatabase.OpenRecordSet ( " myTableName " , dbOpenDynaset )
Nahradiť " myTableName " s názvom vášho stola .
3
Pridať nový záznam do tabuľky , rovnako ako v nasledujúcej ukážke druhý a tretí príkaz priradenie novej oblasti hodnôt všetkých polí v riadku tabuľky . V tomto bode , nový záznam bol vložený do tabuľky .