Hello,
I have the following code and it works great. I was wondering if it's possible to tweek it a little further to add [R_FOUND], which is a date/time field where it is null.
Private Sub LOCATION_BeforeUpdate(Cancel As Integer)
Dim varADDRESS As Variant
If Me.NewRecord Then...
Something just dawned on me, so before I go any further I should ask a couple questions.
What should be stored in the table in that field?
This is what I have right now.
-the table and the form field looks like 000001-Bronx, NY (Text to display from the Insert Hyperlink Menus)
-the actual...
PHV,
Background information:
-database was created in Access 2003, I am running Access 2007
-the users have Read-Only access to the folder where the .pdf files are stored
-it is a hyperlink datatype
-in the form where it says "Is Hyperlink" I have YES, where it says "Display As Hyperling" I...
Can someone please tell me what I'm doing or not doing wrong?
I have the following module:
Option Compare Database
Option Explicit
Declare Function ShellExecute& Lib "shell32.dll" Alias "ShellExecuteA" (ByVal _
hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal _...
Hello,
I have a form with a combo box and two text boxes. Depending on the selection the user makes I want the cursor to move to one of the text box.
Action (combo box) Current_CHL (text box) New_CHL (text box)
Add - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > > >...
PHV,
THANK YOU, THANK YOU, THANK YOU!!!
That worked great. Thank you so much for your patience and help. I have one question though, for future reference, why did you change "LEN" to "TRIM" in the code?
Thank Again.
How do I combine them into one code?
I had the second code in a control before update event and it wouldn't fire properly. I changed it to the forms before update event and its working fine. I moved the first code to the L_READING before update even and its not working.
Is it possible to...
PHV,
This is the code I had
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.Tag = "Required" Then
If Len(ctl & vbNullString) = 0 Then
Cancel = True
MsgBox ctl.Name & " is a Required Entry.", vbCritical, "REQUIRED ENTRY"
ctl.SetFocus...
PHV,
Thanks for your help with the code, its still not working.
Roy,
I'm using the controls before update event because I have another function in the forms before update event. Like I said before, I'm fairly new to VB, and from what I've seen, there is only one function per event, I'm not...
Hello,
I'm fairly new to VB. I have the following code. It's stopping the user from going forward (adding new files) and thats it. The error is not popping up of the cursor is not going to the field. All I'm getting is a Microsoft Office Access Error "You can't go the the specified record."...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.