🚀 go-pugleaf

StriKe wrote:
> Hallo,
> 
> Ik heb een VB.NET applicatie waarin ik gegevens uit een database haal 
> (Access), deze in een datatable stop en via die datatable in een 
> datagrid laat tonen op het scherm.
> 
> Via een formulier kunnen de gegevens in die datatable worden gewijzigd.
> 
> Vanaf het moment dat de geselecteerde cel verandert in de datagrid voer 
> ik een functie uit die automatisch alle inhoud van het formulier 
> (waarmee dus de datatable te bewerken is) terugschrijft naar de datatable.
> 
> Probleem is echter dat ik voor sommige kolommen in mijn datatable 
> null-waarden toelaat.
> 
> Wanneer ik deze dan wens op te vullen met een 'echte waarde', 
> bijvoorbeeld een string of integer lukt dat niet, ik krijg dan dit:
> 
> De conversie van de tekenreeks Er is een fout opgetreden naar het type 
> Integer is niet geldig.
> 
> Het 'bijwerken' van de datatable met de velden uit het formulier gebeurt 
> als volgt:
> 
> dr(0)(5) = CInt(TtxtDuur.Text)
> 
> Een oplossing zou natuurlijk kunnen zijn om mijn database verder aan te 
> vullen en geen null-waarden meer toe te laten, maar kan het ook anders?
> 
> 


Als ik het goed begrijp, wil je bij een lege string ("") een null-waarde 
  wegschrijven naar de database.

Een check zou moeten volstaan?

If txtDuur.text = "" then
	dr(0)(5) = dbnull.value
else
	dr(0)(5) = CInt(TtxtDuur.Text)
end if

of misschien een try... catch?

try
	dr(0)(5) = CInt(TtxtDuur.Text)
catch
	dr(0)(5) = dbnull.value
end try

(ongetest overigens.. Ik ga er vanuit dat dbnull bestaat aangezien er 
een IsDbNull functie is)

mvg,
Peter