Met VB6 kan ook.
Hallo Barry_127,
Hier volgt een aantal stappen hoe je m.b.v. VB6 een database (mdb) programma
moet maken. Ik geef hier een voorbeeld van een database programma waarin de
namen, adressen en woonplaatsen van personen worden vastgelegd.
Start VB6 op.
1) Klik achtereenvolgens binnen de IDE van VB6 op Adds-Ins/Visual Data
Manager/File/New/Microsoft Access/Version 7.0. MD
Typ een bestandsnaam in (als voorbeeld typ ik hier c:\naw)
2) Er verschijnt een venster met de naam "Database Window".
Rechtsklik in dat scherm op "Properties" en klik op "New Table".
3) Er verschijnt een nieuw scherm met de naam "Table Structure".
Typ bovenaan in dat scherm "naw-gegevens" (zonder de aanhalingstekens)
(naw staat voor naam, adres en woonplaats)
a) Klik op "Add Field", er verschijnt dan een scherm met de naam "Add Field".
Typ in het invoervak voor Name "naam" in (zonder de aanhalingstekens)
Het gegevenstype staat al goed, namelijk op Text. Dit laat je zo.
De Size (staat standaard op 50), voor het gemak laat je dit zo.
Klik nu op OK en hierna op Close.
Je ziet bij de Field List, dat er een veld genaamd naam is aangemaakt.
Je hebt nu één v.d. 3 naw-gegevens velden al in de database ingevoerd. Je
moet nu nog de andere 2, namelijk adres en woonplaats, velden gaan
vastleggen.
b) Klik wederom op "Add Field". Voer in het invoervak (bovenaan) "adres" in
(zonder de aanhalingstekens)
Het soort gegevenstype en Size(lengte v.h. veld) kun je net bij het veld naam
ook zo laten.
Klik nu op OK en hierna op Close.
Je ziet bij de Field List, dat er een veld genaamd adres is aangemaakt.
Je moet nu nog een veld toevoegen, waarvan de naam v.h. veld woonplaats is.
Zie stap a of b hoe je dit moet doen.
Heb je dit al gedaankan, dan klik je op de knop "Build the Table"
Het scherm "Table Structure" sluit zich. Sluit ook "VisData" af.
"VisData" is een ontwikkel-tool voor databases, dat je in punt 1 hebt
aangeroepen.
We zijn nog steeds in de IDE van VB. IDE = Integrated Development
Environment, eigenlijk dus VB6 zelf.
We gaan nu de reeds aangemaakte database (c:\naw.mdb) met behulp van VB6 van naw-gegevens voorzien, bijvoorbeeld je eigen naam, adres en woonplaats of die van iemand anders.
Ik leg je nu kort en bondig uit:
1) plaats 3 text-boxen, een knop en een Data-control op het Form.
(zo'n Dat-control heet in de Tool-Box Data)
2) Rechtsklik de Data-control en klik op Eigenschappen.
Je moet in ieder geval ervoor zorgen, dat het Properties venster de eigenschappen van die Data-control weergeeft.
3) In dat Properties venster rechts naast "Databasename" voer je c:\naw.mdb in.
RecordSetType (even naar beneden gaan) moet op Table geselecteerd worden.
En voor RecordSource naw-gegevens (naw-gegevens is de tabelnaam van naw.mdb)
Controleer verder of Connect wel op Access staat ingesteld.
4) Nu de eigenschappen voor de 3 Text-boxen instellen. Alle 3 krijgen dezelfde eigenschappen(properties) mee.
Dubbelklik op de eigenschap DataSource, je ziet dat Data1 automatisch te voorschijnt komt. Bij de eigenschap DataField klik je op naam.
Doe dit ook hetzelfde met de andere 2 Text-boxen. Behalve, dat je bij de 2e en 3e text-boxen respectievelijk adres en woonplaats moet meegeven bij de eigenschap DataField.
5) Code voor de knop
Code:
Private Sub Command1_Click()
Data1.Recordset.MoveLast
Data1.Recordset.AddNew
End Sub
Geef de knop de naam Toevoegen.
Middels het Data-Contol kun je navigeren. Naar het vorige en/of naar het volgende record. Rekt dit control ook even uit.
Run het programm, en ga als volt te werk:
Voer de 3 invoervelden in, respectievelijk naam, adres en woonplaats.
Klik hierna op de knop.
Sucess,
Dennis.
)
