Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub Form_Load() Function CheckDate() Dim DataMax As Date DataMax = "12/31/2007" If Now() > DataMax Then MsgBox "Your time has expired! Please Register" DoCmd.Quit End If End Function End Sub
Join the community of 500,000 technology professionals and ask your questions.