vb5 og db access

Hej,
På din form indsætter du en datakontrol.
Denne datakontrol linkes til din Access database.
Derefter indsættes tekstbox for cpr nummer, denne linkes til datakontrollen og til det rigtige felt.
Derefter indsættes tekstbox for navn og denne linkes også til datakontrollen.
For hver kontrol skal du sætte lidt op under egenskaber/data.
Hvis det ikke virker så send en mail
Hilsen
Tue

Er der mulighed for at du kan give mig noget lidt mere specifikt omkring dette?

Hej Tue
Jeg kan desværre ikke få det til at virke.
Var det muligt du kunne lave nogle rigtige koder ?

Hej jeg har "kun" lige nu adgang til VB6 og Access 2000 så du må lige vente med et eksempel.

ok!!!!!

På formen har du nu et textfelt til at skrive cpr-nummer i som hedder txtINPUT og et textfelt til at programmet kan skrive navnet i som hedder txtOUTPUT. Derudover en knap der aktiverer processen....
Din database skal være i access 97 og skal ligge i samme bibliotek som resten af programfilerne.

Din kode skal ligne noget i retningen af det her:

' Et navn til databasen og CPR-nummeret
Private dbCPR As Database
Private CPR As Integer

' Vis data
Private Sub ShowData()
Dim rsInfo As Recordset
Dim query As String
Dim i As Integer

query = "select * from NAVN_PÅ_DIN_TABEL order by NAVN_PÅ_SORTERINGS_KOLONNEN"

Set rsInfo = dbCPR.OpenRecordset(query, dbOpenSnapshot)

With rsInfo
If .EOF And .BOF Then Exit Sub
.MoveLast
.MoveFirst
Do While Not .EOF
  If txtINPUT.text = !NAVN_PÅ_CPR_KOLONNEN Then
    txtOUTPUT.text = !NAVNET_PÅ_NAVNE_KOLONNEN
  End If
  .MoveNext
Loop
End With
End Sub

Private Sub Command1_Click()
ShowData
End Sub

Private Sub Form_Load()

Set dbOpgaver = OpenDatabase(App.Path & "\CPR_DATABASENS_NAVN.mdb")

End Sub

Private Sub Form_Unload(Cancel As Integer)
                          dbOpgaver.Close

End Sub

Hvis du får problemer så skriv din kode her.....

Jeg har meget svært ved at få disse koder til at virke, jeg kan faktisk ikke få dem til at virke.
VB kan ikke finde ud af commandoerne:
Private dbCPR As Database og
Set dbOpgaver = OpenDatabase(App.Path & "\CPR_DATABASENS_NAVN.mdb")

Gå ind i VB og vælg "Project"-"References" derinde skal du sætte kryds i "Microsoft DAO". Prøv så igen..

Du skal naturligvis også have en database...

jep, nu virker det.

Tak for hjælpen