Toon posts:

[access97] formulieren

Pagina: 1
Acties:

Verwijderd

Topicstarter
Hallo,

heeft iemand misschien enig idee hoe ik het volgende probleem kan oplossen :

ik heb een formulier gemaakt die afhankelijk is van een lege database, deze database zal gevuld worden dmv handmatige invoer.

een aantal invoervelden zullen afhankelijk zijn van andere tabellen.

nu is mijn probleem dat als men een artikelnummer wilt invoeren dmv keuzelijst die afhankelijk is van een andere tabel dat wanneer de keuze is gemaakt ook de (dan nog lege) velden worden gevult met de daarbij behorende omschrijving en artikelnummer van de leverancier.

iemand ?

  • BtM909
  • Registratie: Juni 2000
  • Niet online

BtM909

Watch out Guys...

Kan je je verhaal / probleem iets duidelijker verwoorden... Ik kan er geen brood van bakken.

Ace of Base vs Charli XCX - All That She Boom Claps (RMT) | Clean Bandit vs Galantis - I'd Rather Be You (RMT)
You've moved up on my notch-list. You have 1 notch
I have a black belt in Kung Flu.


Verwijderd

Topicstarter
haha, ok zal het proberen wat te verduidelijken.

ik heb:

formulier x (10 items handmatig in te vullen)
tabel a (leeg)
tabel b (artnr, omschrijving, artnr lev)

het is dus de bedoeling dat tabel a wordt gevuld dmv formulier x. Echter in formulier x heb ik een keuzelijst (artikelnummer) toegevoegd die tabel b vertegenwoordigd.
Ik wil het formulier nu zo maken dat als men een keuze heeft gemaakt met de keuzelijst, de overige items in formulier x (omschrijving, artikelnummer van de leverancier) automatisch worden aangevuld, dus de omschrijving etc uit tabel b.

misschien zo iets duidelijker?

  • Black Hawk
  • Registratie: Oktober 2003
  • Laatst online: 21-05 15:09
gegevens ophalen uit een tabel (met sql) Je maakt dan gebruik van een keuzelijst die de naam KeuzelijstArtikel heeft. Ook selecteer je de verwijzing naar DBNamespace library en Microsoft DAO library in vb-editor (verwijzingen in menu extra) Kies de nieuwste versies


Dim db as Dao.Dababase
Dim tblNaam as String
Dim artNr as String

set db = CurrendDb()

tblNaam = 'vul hier de naam van de tabel in
artNr = Me.KeuzelijstArtikel.value

db.openRecordSet(Select * From " & tblNaam & " Where artikelnummer = " & artNr)

Wie nooit tijd heeft, kan er niet mee omgaan.


Verwijderd

Topicstarter
Dim db as Dao.Dababase
Dim tblNaam as String
Dim artNr as String

set db = CurrendDb()

tblNaam = 'vul hier de naam van de tabel in
artNr = Me.KeuzelijstArtikel.value

db.openRecordSet(Select * From " & tblNaam & " Where artikelnummer = " & artNr)


moet ik deze code achter de keuzelijst van het artikelnumer zetten? en zoja dan afterupdate? of moet ik deze code achter de items zetten die dat automatisch ingevuld gaan worden na de keuze uit de keuzelijst?

  • Black Hawk
  • Registratie: Oktober 2003
  • Laatst online: 21-05 15:09
geef ff je mail adres, dan zal ik een voorbeeldje mailen (winzip, 17 kb)

Wie nooit tijd heeft, kan er niet mee omgaan.


  • Black Hawk
  • Registratie: Oktober 2003
  • Laatst online: 21-05 15:09
Geloof je me niet ?? :|

[ Voor 21% gewijzigd door Black Hawk op 01-12-2003 13:48 ]

Wie nooit tijd heeft, kan er niet mee omgaan.

Pagina: 1