Toon posts:

[Access/vba]Bron DAO recordset achterhalen

Pagina: 1
Acties:

Verwijderd

Topicstarter
ik heb in mijn project een DAO recordset gemaakt als volgt.

code:
1
2
3
4
5
Dim db As Database
Dim rs  As DAO.Recordset
    
Set db = DBEngine.Workspaces(0).Databases(0)
Set rs = db.OpenRecordset("Select * from tbl_Klant")


Nu wil de bron van deze recordset aan een formulier koppelen maar als volgt lukt dat niet.
code:
1
forms!frm_test.RecordSource = rs.clone


krijg ik de fout dat de typen niet overeen komen.

Ik weet dat je met ADODB de source kan achterhalen, maar is dit ook mogelijk met DAO?

Verwijderd

Probeer eens SET voor je toewijzing te zetten.

code:
1
set forms!frm_test.RecordSource = rs.clone


[edit]
Extra tip : Als je een verwijzing wilt hebben naar de huidige database, dan kun je ook de CurrentDB() functie gebruiken
code:
1
set db = currentdb

[ Voor 44% gewijzigd door Verwijderd op 29-11-2004 12:43 ]


Verwijderd

Topicstarter
Met Set ervoor krijg ik bij het compileren

Ongeldig gebruik van eigenschap

Verwijderd

probeer dan een de recordSET te zetten, i.p.v. de recordSOURCE.

Verwijderd

Topicstarter
Dan geven de textboxen in het formulier de waarde "#Naam?"

dus dat gaat ook niet goed :'(

  • Sensei_D
  • Registratie: Maart 2002
  • Laatst online: 19-05 08:27
Wat wil je eigenlijk precies. Ik ben toevallig voor mijn werk ook bezig met Acces en VBA nu, maar ik snap niet precies wat je nu wilt bereiken :?

sensei_d.fpv channel


Verwijderd

Topicstarter
Ik haal met een recordset gegevens op uit een database die op een andere plek staat. Deze gegevens wil ik in het formulier in een andere database laten zien.

Hiervoor wil ik de RecordSource van het formulier aanpassen zodat ik niet 50x hoeft te type:
code:
1
2
3
4
5
6
7
8
me!klantid = rs!klantid
me!klantnaam = rs!klantnaam
'en gegevens verwijderen door
frm.RecordSource = "Select * from tbl_Klant where 1 = 2"
'ipv
me!klantID = null
me!klantnaam = null
'etc


Dat laatste werkt wel (met die vaste string),
maar ik krijg niet de gegevens van de recordset in het formulier.

Verwijderd

en als je dan eens de tabel uit database 2 linkt in database 1 ? dan kun je die tabel gewoon gebruiken als iedere andere !

Verwijderd

Topicstarter
Ik wil er geen gekoppelde tabellen in.
Het is echt een puur opzoek scherm.

Is er geen manier op de bron van de recordset te achterhalen en die aan het formulier te plakken? :/

Verwijderd

dit kan enkel (vziw) door een sql statement aan de recordsource toe te wijzen mbv de in-clausule:
forms!frm_test.RecordSource="SELECT opzoekkolom FROM externetabel in ""c:\pad\naar\anderbestand.mdb"""
Pagina: 1