Kuidas kopeerida RecordSet tabelisse kohta Access 2007

Kuidas kopeerida RecordSet tabelisse kohta Access 2007 Jupiterimages / Brand X Pictures / Getty Images

Tee Microsoft Access 2007 andmebaaside dünaamilisem ja automatiseerida Visual Basic Editor (VBE).VBE on programmeerimine karbiga Access, mis kasutab Visual Basic for Applications (VBA).Üks funktsioone VBA on luua andmebaasi andmetega ning salvestada recordset, mida saab kasutada ja manipuleerida koodi.Kui olete lõpetanud töötavad recordset koodi, saate selle salvestada laua juurde tagasi, et siis tõmmatakse see või kopeerige see teine ​​tabel.

juhised

  1. Open oma andmebaasi Microsoft Access 2007 ja avada Visual Basic Editor.Vajuta "Database Tools" tab ja siis "Visual Basic" alates "Makrod ja amp; Code" grupp.

  2. Vajuta "Lisa" menüükoht Visual Basic Editor ja seejärel nupul "moodul."Või kui teil on vormis või eelmise moodul, mida soovite kasutada seda menetlust, avatud, et mitte topeltklõpsuga seda alates Project Explorer akna vasakul pool ekraani.

  3. Kirjutage protseduur, mis tõmbab recordset andmebaasist:

    "Sub RecordsetExample ()

    Dim dbTest kui Database" Muutuv et hoiab oma andmebaasi

    Dim rsRecordset kui Recordset "Muutuv et hoiab oma recordset

    Set dbTest = OpenDatabase ("MyDatabase.mbd") "Muuda seda nime oma andmebaasis

    Mis dbTest

    seatud rsRecordset = .OpenRecordset (" Tabel 1. "dbOpenTable)" Muuda Tabel 1. nime oma laua

    lõpus "

  4. Kirjutage kood kopeerida recordset teise laua.Kood näeb välja selline:

    "Dim sqlStatement String

    " päringu lisada tabelile. Muuda Tabel2 nimetada oma laua

    sqlStatement = "INSERT INTO Tabel2 väärtused" & amp; rsRecordset

    Mis rsRecordset

    rsRecordset.MoveFirst

    Do

    rsRecordset.RunSQL (sqlStatement)

    rsRecordset.MoveNext

    Loop samas ei rsRecordset.EOF

    lõpus "

  5. Vajuta" Save "ikooni Visual Basic Editor.Vajuta "Run (!)" Nuppu, kui soovid käivitada korras ja kopeerida recordset tabeli nüüd.Kui ei, sulgege Visual Basic Editor ja vajuta "Office" nuppu ja seejärel "Salvesta", et muudatused salvestada andmebaasi.

62
0
1
Andmebaasitarkvaraga