Ik volg het zo maar wordt er geen snars wijzer van (afhankele keuzelijst)

Status
Niet open voor verdere reacties.

cyblix

Gebruiker
Lid geworden
15 apr 2004
Berichten
42
Hoi,

ik probeer ook een afhankele kolom te maken. ik heb een bestand waar ik continu nieuwe tekstwaardes invoer, dit zijn ip adressen. Met die ip adressen krijg ik ook gegevens van de locatie binnen, bijvoorbeeld 190.456.345.345 = thuis
nu wil ik, als ik in mijn formulier een ip adres in het invoervak invoer automatisch in het 2e veld de juiste locatie zien als ik hem ooit al eens heb opgegeven. Dus als ik het bovenstaande ip adres nogmaals invoer in het formulier krijg ik in het 2e veld als locatie: thuis. Mocht het een nieuw ip adres zijn, moet ik de nieuwe locatie opgeven... ik heb het bestand aardig ver af... maar kunnen jullie mij helpen? ik heb het bestand bijgevoegd in een bijlage...

ik zou het erg opprijs stellen...
 

Bijlagen

Laatst bewerkt:
Met de volgende code bereik je het resultaat dat je wilt. Je moet nog wel even een check inbouwen om te controleren of je recordset een waarde bevat.

Code:
    Dim cnn As ADODB.Connection
    Dim rst As New ADODB.Recordset
    Dim strSQL As String
    
    Set cnn = CurrentProject.Connection
    strSQL = "SELECT max(locatie) FROM [tabel - bezoeken personeels-site] WHERE [ip adres] = '" & Me.Keuzelijst_met_invoervak21 & "';"
    rst.Open strSQL, cnn, adOpenDynamic
    
    rst.MoveFirst
    Me.Keuzelijst_met_invoervak27 = rst.Fields(0).Value
    rst.close
    set cnn = nothing
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan