ADO (Active Data Objects ) Data Control ( ADODC ) er en ny metode tilføjet i Visual Basic 6.0. Det tillader en programmør til at sætte kontrol, såsom etiketter , tekstbokse , lister og andre display kontroller , i en form og tilslutte dem til Data Control , som derefter forbinder til en database. Dette giver betydeligt mere magt til udvikleren i at skabe og vedligeholde databaser. Opsætning af ADODC kan være kompliceret, men at følge disse trin vil gøre processen ligetil. Ting du skal
Visual Basic 6.0
Vis Flere Instruktioner
1

Højreklik på Visual Basic 6.0 program og vælg " Kør som administrator ". Start et nyt projekt ved at klikke på "File " og derefter " Nyt projekt ". Vælg "Data Project" skabelon fra listen.
2

Dobbeltklik på " frmDataEnv " vist i "Data Project" på listen til højre . Placer en ADO Data Control i formularen ved at dobbeltklikke på den ADODC kontrol i værktøjskassen til venstre på skærmen.
3

Set op en forbindelse til en eksisterende database ved at højreklikke klikke på ADODC kontrol nu om form og vælge " ADODC Egenskaber". På ejendomme siden , skal du sørge for "Use Connection String " er valgt , og klik på " Build ". Følg de trin, der vises , som vil føre dig gennem valg af den type data til at bruge, hvor man kan finde databasen på din computer, og om ikke at bruge en adgangskode .
4

Klik på " test Connection " knappen på " Connection "fanen af data Link Properties , når alle oplysninger fra trin 3 er færdig. Hvis forbindelsen mislykkes , skal du gå tilbage igen og igen de indstillinger, valgt at forbinde til din database.
5

Place to Kommandoknapper på fmDataEnv ved at dobbeltklikke på " Button " kontrol i værktøjskassen og derefter gøre dette igen . Ændre navnet på en knap for at " cmdAddNewRecord ", og Caption til " Tilføj ny post. " Skift navn på den anden knap til " cmdDeleteRecord ", og Caption til " Slet post ".
6

Dobbeltklik på " cmdAddNewRecord " og indsæt denne kode mellem begyndelsen og slutningen af rutinen : " Adodc1.Recordset.AddNew ". Gør det samme for cmdDeleteRecord " knap med denne kode: " . Adodc1.Recordset.Delete "( . Må ikke indeholde den periode i slutningen af ​​denne kode)
7

Skriv koden til at tage sig af, hvad der skal ske, når brugeren klikker på et af de valg i trin 6: Private Sub Form_Load () Adodc1.Recordset.ActiveConnection.BeginTransEnd SubPrivate Sub Form_Unload ( Cancel As Integer ) Hvis MsgBox ( "Accepter rekord ændringer? " , vbYesNo ) = vbYes IfEnd Sub
8

Afslut ADODC setup ved at tilføje etiketter og TextBox kontroller til formularen for at oprette en mekanisme for en bruger at tilføje eller slette poster. De konkrete kontroller vil afhænge af databasen behov. Se billedet for et eksempel på , hvordan dette vil se ud.