Memoveld of tekstveld?

[Bart]

In mijn tabel heb ik 2 velden, namelijk fldKleuren en
fldPostcode.
In fldkleuren staat een kleurcode en fldPostcode staan de
postcodes. Bij een paar kleurcodes is het veld met
postcodes te kort als ik 'm als tekst gebruik.
Kan ik het veld waar de postcodes in komen te staan ook
als memo gerbuiken. (krijg ik hetzelfde resultaat)
Zo ja, kan ik daar ook een bepaalde grootte instellen want
ik heb het al geprobeert maar ik krijg soms nog een
foutcode.

Wat in het veld fldPostcode komt te staan zijn de volgende
2 dingen : (postcode >= '1000' And Postcode < '1200') en
(Postcode like '1202*')
Van deze reeksen heb ik er een paar achter elkaar maar
voor een tekstveld dus soms te groot.

Wie kan me helpen

Bart

[Bart]

Is het misschien een idee om de postcode in 2 tekstvelden
te plaatsen? Dus fldpostcode en fldpostcode2
De code die in de velden kijkt moet dan de 2e ook
meepakken. Die code is als volgt:
strPostCode = CStr(DLookup
("fldPostCode", "tblKleuren", "fldKleuren=" & CStr
(lColor)))

Is dit een idee?

>-----Oorspronkelijk bericht-----

>.
>

[Naamloos]

Bart,

Een tekstveld heeft een maximum grootte van 255 karakters.
Een memeoveld heeft niet echt een limiet in de praktijk
omdat bij echt te grote memovelden (meerdere Mb's) tegen
de maximum grootte van een Access database aanloopt.
Memovelden hebben wel een paar nadelen, zo kun je ze niet
indexeren, je kunt niet sorteren op een memoveld, je kunt
geen ingebouwde validatie gebruiken op een memoveld,enz.

Ano Niem

>-----Oorspronkelijk bericht-----

>.
>

[Bart]

Hmm.. dan lijkt me dat mijn code het wel zou moeten doen
met memo. Maar wat vind je van het idee om het veld in
tweeen te splitsen.
dit is de code die ik gebruik om met de kleurcode te
filteren.
Weet jij misschien hoe ik bij fldPostCode nog een veld kan
plaatsen zodat de postcodes in 2 velden komen te staan.

Dim tPOS As POINTAPI
Dim lColor As Long
Dim lDC As Long
Dim strPostCode As String

lDC = GetWindowDC(0)
Call GetCursorPos(tPOS)
lColor = GetPixel(lDC, tPOS.X, tPOS.Y)

strPostCode = CStr(DLookup
("fldPostCode", "tblKleuren", "fldKleuren=" & CStr
(lColor)))

Forms!frmBedrijf!frmBedrijfSub.Form.Filter = strPostCode
Forms!frmBedrijf!frmBedrijfSub.Form.FilterOn = True
Forms!frmBedrijf!frmBedrijfSub.Requery

>-----Oorspronkelijk bericht-----

>.
>

[Naamloos]

Bart,

Als ik het goed begrijp kan je voor 1 kleurcode meerdere
postcodes hebben. Het is misschien een goed idee om de
postcodes in een aparte tabel te zetten met een 1-op-veel
relatie met de tabel die je nu hebt.

Je kunt dan de tweede tabel "makkelijk" doorzoeken naar
postoceds die overeenkomen met je kleurcode.

Ano Niem
>-----Oorspronkelijk bericht-----

>.
>

[Bart]

Het klopt inderdaad dat een kleurcodes meerdere postcodes
kan bevatten.
Dit is een voorbeeldje van het postcode bereik achter een
kleurcode:
(Postcode >= '8700' AND Postcode < '8703') OR (Postcode
>= '8490' AND Postcode < '8492') OR (Postcode >= '8493'
AND Postcode < '8496') OR (Postcode >= '9000' AND Postcode
< '9002') OR (Postcode >= '9003' AND Postcode < '9014')
OR (Postcode Like &#8216;8644*&#8217;) OR (Postcode Like &#8216;8647*&#8217;)

Maar als ik een 2e tabel maak dan hou ik volgens mij het
probleem dat het veld waar het postcodebereik in komt,
soms te klein is. Dus ik zal dan nog per kleurcode
meerdere velden moeten gebruiken
Of zie ik dit helemaal verkeert

Bart
>-----Oorspronkelijk bericht-----

>.
>

[Naamloos]

Antwoord via mail verstuurd

Ano Niem
>-----Oorspronkelijk bericht-----

>>>>>ik heb het al geprobeert maar ik krijÍ
{ wÀ f "DãO væOÜN' ì g soms nog een

>>>>>foutcode.
>>>>>
>>>>>Wat in het veld fldPostcode komt te staan zijn de
>>>>volgende
>>>>>2 dingen : (postcode >= '1000' And Postcode < '1200')
>en
>>>>>(Postcode like '1202*')
>>>>>Van deze reeksen heb ik er een paar achter elkaar
maar
>>>>>voor een tekstveld dus soms te groot.
>>>>>
>>>>>Wie kan me helpen
>>>>>
>>>>>Bart
>>>>>.
>>>>>
>>>>.
>>>>
>>>.
>>>
>>.
>>

>.
>