Search results

Additionally, I would change your variable name from intServid to lngServid just to keep it consistent with what the type is. Some people don't use the prefixes. I find they help me quickly identify something but it is important to pick a method and then be consistent with it.

In your code: Private Sub ServID_DblClick(Cancel As Integer) Dim intServid As Long If Not IsNull(ServID) Then intServid = Val(ServID) DoCmd.OpenForm "frmServiceOrder", OpenArgs:=intServid End If End Sub

Change the declaration to be a LONG INTEGER.

Check your values by setting a break point and hit F8 to step through. Let me know if you don't know how to do that.

Boy, I was paying attention, wasn't I? :banghead:

In the click event of the button, after it opens the form, use Forms!PopUpFormNameHere.FieldNameHere = Me.FieldNameFromFirstForm And I suggest NOT using special characters (nor spaces) in your field and object names. Use ClaimNo or ClaimNum instead of #. Special characters and spaces in...

So Access doesn't think you have a variable there, it might be wise to use the ME keyword and instead of the Not IsNull you can just use the NZ function. intServid = CInt(Nz(Me.ServID,0))

Do they accept NULL values? If not, you may need to wrap the NZ function around the parameters you are passing.

You will likely need to use the same functions that those text boxes use in that other text box instead of referring to the text boxes.

When you do a Compact and Repair, what is happening behind the scenes is that the database file is copied (but not in the normal way) and then the old datbase file is deleted and the new one renamed. So, if it is open, it can't do the process. What you will need to so is probably use a...

Are those controls bound to any fields? If so, try using the name of the field instead of the control. (also rename your controls to something useful so someone coming in, after you are gone (or you coming back 6 months later), looking at text42 won't wonder what that means.

Did you remove the reference to Excel in the VBA References? You need to do so if you go with the code I gave. Post the code you are using which ends up causing the error. And note on which line it fails.

defaults only work for new records. Existing records would need to have an update query run to set the field to 0 if null. If you aren't using a web database, I suggest NOT using calculated fields but do it in a query. That is a "best practice" as an FYI.

You should move to LATE BINDING. Don't set a reference and use code like Dim objXL As Object Set objXL = CreateObject("Excel.Application") There is more to it but I have an export example on my website which shows it in use without setting a reference. If you don't set a reference...

Two things 1. Take the quotes off of strCriteria when opening the form DoCmd.OpenForm "frmContacten",,, strCritera 2. It looks like you have a Plaats line in your criteria twice.

1. Make sure the Border of the Subform Control (control on the main form which houses/displays the subform) is set to Transparent. 2. Make sure that same control has its Special Effect property set to FLAT.

You don't put it in the criteria. I think you mean parameters but what is the function MinofList anyway? That doesn't sound like a built in function of Access. If you have the code for it, post it.

Questions: 1. the development machine AND production both have SQL Server 2012 on it? 2. What version of Windows are you using? 3. The copy of the database is the same and the install options for SQL Server 2012 were all the same in both environments? 4. You have a separate File DSN for...

You can't do it in the Open event of the Report. You need to use it in the ON FORMAT event of the section where those controls are located. Also, use the ME keyword before the control names like in this code below. Also, you can shorten your code and get rid of the If just by doing it like...

Are you using the latest ODBC Driver? That would be SQL Native Client 11 but I believe that you would need that driver on each machine in order to use it. Not sure if it gets pushed out by Windows Updates.