*

Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: dlookup opslaan  (gelezen 5551 keer)

0 leden en 1 gast bekijken dit topic.

Offline dino

  • Lid
  • *
  • Berichten: 70
  • Geslacht: Man
  • De Oplossing!
dlookup opslaan
« Gepost op: 12 juli 2014, 11:16:48 »
is het mogelijk om gegevens gevonden met dlookup in tabel op te slaan
heb een combo daarmee zoek ik de gegevens van de klant bv 1000/janssen
de textbox er onder staat dus dlookup( Combo) let op dit is niet de formule . daar word dan neer gezet janssen dit wil ik dus ook hebben opgeslagen in veld van tabel.

Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: dlookup opslaan
« Reactie #1 Gepost op: 12 juli 2014, 16:44:14 »
Je vraag is een beetje vaag voor mij, dino.

Als je combobox gekoppeld is aan een veld van een tabel 'is' het ook meteen opgeslagen?

Gelogd
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline dino

  • Lid
  • *
  • Berichten: 70
  • Geslacht: Man
  • De Oplossing!
Re: dlookup opslaan
« Reactie #2 Gepost op: 12 juli 2014, 18:41:07 »
heel eenvoudig
Formulier met Combobox (combo13)hier in staan nummers en namen bv 1000 Benny
de txt box er naast staat de formule (=DLookUp("[projectnaam]";"[tblprojecten]";"[projectid]=" & [combo13])
hier uit komt dus mijn naam te staan .
nu moet het zo worden dat hij deze gegevens ook opslaat in tbl.......... in veld met de naam Personeelnaam.
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: dlookup opslaan
« Reactie #3 Gepost op: 12 juli 2014, 19:06:53 »
Ik begrijp nog steeds niet waar je naartoe wilt, dino...heb een beetje geduld met me
Wat is de rijbron van combo13?

Je kiest uit een keuzelijst een werknemer (dat geeft een werknemerID terug?)

mss is het handig als je een vbtje online zou zetten?
Gelogd
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline dino

  • Lid
  • *
  • Berichten: 70
  • Geslacht: Man
  • De Oplossing!
Re: dlookup opslaan
« Reactie #4 Gepost op: 12 juli 2014, 19:30:05 »
Projectid is de combo13 box daar in staan de nummers en namen
de box er naast  word dan automatie `s gevuld met de naam .
mooi die word gefilterd  uit de tbl personeel
maar moet worden opgeslagen in tblprojecten. onder werknemer of naam dat maakt niet uit .
maar inlezen gebeurd vanuit tbl personeel en word naar projecten opgeslagen.
nummers gaan goed namen niet omdat die worden gefilter met dlookup.
vandaar de vraag is dit wel mogelijk veel gezocht niets gevonden.
een vb gaat zo maar niet ff moet ik er ff een in mekaar sleutelen.


Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: dlookup opslaan
« Reactie #5 Gepost op: 12 juli 2014, 19:53:35 »
  • Als je formulier 'zelf' is gekoppeld aan tblProjecten (formulier/eigenschappen/recordbron=tblProjecten) en combo13 (rijbron = tblPersoneel)
  • Ik neem aan tblPersoneel minstens volgende velden bevat (PeroneelID, Naam )
  • de afhankelijke kolom van combo13 is 1.
  • tblProjecten bevat een veld PersoneelID en de besturingselementbron van combo13 is PersoneelID
dan wordt vanzelf een record in tblProjecten aangemaakt van zodra je het veld verlaat toch?
Gelogd
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline dino

  • Lid
  • *
  • Berichten: 70
  • Geslacht: Man
  • De Oplossing!
Re: dlookup opslaan
« Reactie #6 Gepost op: 12 juli 2014, 22:16:07 »
heb een stukje code gemaakt
helaas geeft hij alleen de Projectid
hoe moet ik dit veranderen zodat die wel projectnaam aangeeft


code<>Private Sub Combo13_AfterUpdate()
 
    Me.ProjectNaam = DLookup("[projectId]", "[tblprojecten]", "projectnaam='" & Me.ProjectNaam & "'")
    Me.ProjectNaam = Me.Combo13.Column(1)
   
    Dim rs As DAO.Recordset
    ssql = "SELECT ProjectId FROM TblProjecten WHERE projectnaam ='" & Me.ProjectNaam & "'"
    Set rs = CurrentDb.OpenRecordset(ssql)
    Me.ProjectNaam = rs!ProjectID
End Sub
code</>
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: dlookup opslaan
« Reactie #7 Gepost op: 13 juli 2014, 19:30:03 »
met een VB zou he handiger zijn, dino maar ik probeer. Ik vind het raar dat je in Me.ProjectNaam een ProjectID wil stoppen terwijl je die in de volgende zin gewoon uit je keuzelijst haalt.

In je sssql haal je maar één veld op en dat is de ProjectID. Als je ALLE velden uit tblProjecten wilt halen dan zou je

ssql = "SELECT * FROM TblProjecten WHERE projectnaam ='" & Me.ProjectNaam & "'" moeten gebruiken
dan zou
me.Projectnaam = rs!Projectnaam kunnen gebruiken.  maar je 'hebt' die projectnaam al want die zit ik de tweede kolom (column(1)) van je combo13.

Kan je je project niet zippen en ergens online zetten of een pm sturen?
Gelogd
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline dino

  • Lid
  • *
  • Berichten: 70
  • Geslacht: Man
  • De Oplossing!
Re: dlookup opslaan
« Reactie #8 Gepost op: 13 juli 2014, 20:59:17 »
ik heb hem gevonden dankzij jouw gegevens
dus heel erg bedankt  :D
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.
Pagina's: [1]   Omhoog
 


www.combell.com