Acces / Gebruik VBA in access ??

[Verwijderd]

Hallo,

ik ben bezig met een database in access, nu heb ik van een collega deze code gekrege
om een MAC adres te laten controleren;

Public Function pfCheckMacAddress(strMAC As String) As Boolean
On Error GoTo Err_pfCheckMacAddress
Dim strInput As String
Dim strResult As String
Dim blnResult As Boolean
blnResult = True
strInput = strMAC
'eerst checken op de lengte van het address
If Len(Trim(strInput)) <> 12 Then
MsgBox "De lengte van het MacAddress klopt niet"
blnResult = False
GoTo Exit_pfCheckMacAddress
End If
'nu gaan we kijken of het is samengesteld uit geldige karakters
For i = 1 To Len(Trim(strInput))
If Asc(Mid$(Trim(UCase(strInput)), i, 1)) > 47 And Asc(Mid$(Trim(UCase(strInput)), i, 1)) < 58 Or _
Asc(Mid$(Trim(UCase(strInput)), i, 1)) > 64 And Asc(Mid$(Trim(UCase(strInput)), i, 1)) < 71 Then
Else
blnResult = False
GoTo Exit_pfCheckMacAddress
End If
Next i
Exit_pfCheckMacAddress:
pfCheckMacAddress = blnResult
Exit Function
Err_pfCheckMacAddress:
MsgBox "Error: " & Err.Description, vbCritical + vbOKOnly, "Error: " & Err.Number
blnResult = False
Resume Exit_pfCheckMacAddress
End Function

nu is alleen nog het probleem.. ik heb geen flauw id hoe ik dat in access krijg zodat bij
het invoeren van informatie het MAC adres wordt gecheckt...

[F_J_K]

Welke Access versie? Dat is namelijk nogal relevant voor het beantwoorden. Je hebt in Acc2k3 "gewoon" een Modules knop. Verder lijkt F1 -> 'vba' en/of [google=vba access tutorial] al antwoord te geven?

Zo niet: dit topic past veel beter in Officesuites en -software maar ik verplaats nog niet omdat ik de vraag zo "over de muur gooien" niet echt vind passen in OFF. Check eerst zelf even middels een tutorial hoe VBA in Access werkt en open dan evt. een nieuw topic in OFF als je er niet uit komt. Succes

[ Voor 7% gewijzigd door F_J_K op 13-06-2005 16:02 . Reden: wat woorden omgedraaid ik heb. Als Yoda praten meevalt zo ]