anoniem Geplaatst: 22 mei 2003 Delen Geplaatst: 22 mei 2003 Ik heb in mijn access database een veldnaam prijs. Maar niet van elk artikel is de prijs bekend. Als ik de diverse records uitlees geeft hij de foutmelding invalid use of null. Is dit met een stukkie code op te lossen of maak ik een fout in mijn database. Ik d8 natuurlijk weer heel simpel door het op deze manier uit te lezen: With rsRaadplegen .MoveFirst txtRaadplegen(0) = rsRaadplegen.Fields(0) txtRaadplegen(1) = rsRaadplegen.Fields(1) txtRaadplegen(2) = rsRaadplegen.Fields(2) txtRaadplegen(3) = rsRaadplegen.Fields(3) txtRaadplegen(4) = rsRaadplegen.Fields(4) End With :-? Als jullie meer info moeten hebben zeggen jullie het maar. Quote Link naar reactie
anoniem Geplaatst: 23 mei 2003 Auteur Delen Geplaatst: 23 mei 2003 In VBA kun je eerst testen met de functie [i:eddb681204]IsNull[/i:eddb681204]. Zal ook wel in VB kunnen lijkt me. Quote Link naar reactie
anoniem Geplaatst: 23 mei 2003 Auteur Delen Geplaatst: 23 mei 2003 Na langzoeken en proberen kom ik op deze regel: txtRaadplegen(2) = rsRaadplegen(2).Value & "" Ik heb nog een bang voor gevoel dat het alleen met strings werkt en niet met nummers, maar daar kom ik nog wel achter. Quote Link naar reactie
anoniem Geplaatst: 23 mei 2003 Auteur Delen Geplaatst: 23 mei 2003 [quote:afda185f90="diniz"]Ik heb in mijn access database een veldnaam prijs. Maar niet van elk artikel is de prijs bekend. Als ik de diverse records uitlees geeft hij de foutmelding invalid use of null. Is dit met een stukkie code op te lossen of maak ik een fout in mijn database. Ik d8 natuurlijk weer heel simpel door het op deze manier uit te lezen: With rsRaadplegen .MoveFirst txtRaadplegen(0) = rsRaadplegen.Fields(0) txtRaadplegen(1) = rsRaadplegen.Fields(1) txtRaadplegen(2) = rsRaadplegen.Fields(2) txtRaadplegen(3) = rsRaadplegen.Fields(3) txtRaadplegen(4) = rsRaadplegen.Fields(4) End With Als jullie meer info moeten hebben zeggen jullie het maar.[/quote:afda185f90] http://forum.computertotaal.nl/phpBB2/viewtopic.php?t=90435 Bovendien, Hoe weet je zo zeker dat de 0e, 1e, 2e, 3e, etc. index overeenkomen met de veldnamen in de resultset? Gebruik dan het volgende ofzo:[code:1:afda185f90] if isnull(rsRaadPlegen.Fields("Veld1").value) then txtRaadPlegen(0).Text = "" else txtRaadPlegen(0).Text = rsRaadPlegen("Veld1").value endif[/code:1:afda185f90] Quote Link naar reactie
anoniem Geplaatst: 3 juni 2003 Auteur Delen Geplaatst: 3 juni 2003 of in 1 regel : rst.fields=iif(isnull(txtBla),txtBla,"" & txtBla) of zoiets. Probeer iig eens te zoeken en te spelen met iif() en isnull() Quote Link naar reactie
anoniem Geplaatst: 3 juni 2003 Auteur Delen Geplaatst: 3 juni 2003 [quote:ae802ed841="diniz"]Ik heb in mijn access database een veldnaam prijs. Maar niet van elk artikel is de prijs bekend. Als ik de diverse records uitlees geeft hij de foutmelding invalid use of null. Is dit met een stukkie code op te lossen of maak ik een fout in mijn database. Ik d8 natuurlijk weer heel simpel door het op deze manier uit te lezen: With rsRaadplegen .MoveFirst txtRaadplegen(0) = rsRaadplegen.Fields(0) txtRaadplegen(1) = rsRaadplegen.Fields(1) txtRaadplegen(2) = rsRaadplegen.Fields(2) txtRaadplegen(3) = rsRaadplegen.Fields(3) txtRaadplegen(4) = rsRaadplegen.Fields(4) End With :-? .[/quote:ae802ed841] If IsNull(txtRaadplegen(0).Value) Then rsRaadplegen.Fields(0).Value = "<Prijs Onbekend>" End If Enz... Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen