Hi all,
I have a form which is set to continuous forms. The problem i having is i only want the user to be able to delete the last record on the form.
Any ideas?
Thanks
Ant
Hi All,
I have the an error coming up "Data Type Mismatch in Criteria Expression".
The cause of this is code i have (Thanks to Mile-o-Phile for the code) behind my command button. It has worked fine up until recently and i'm not sure what the problem is.
The code is below:-
Private Sub...
Hi All,
I have a form with a listbox on it. I also have a command button which when clicked opens a new form.
What i am trying to achieve is when my command button is clicked if column(7) in any of my rows is null, a message box to appear saying "Please complete field".
Any ideas?
Thanks...
Hi all,
I have a form which has a command button on it and a listbox. The problem I am having is I only want a user to be able to add a new record if:-
There are no rows in the listbox
If there are any rows in the listbox - Column(7) must not be null.
Any help is appreciated.
Thanks in...
Try this,
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
strMsg = "Data has changed."
strMsg = strMsg & " Do you wish to save the changes?"
If MsgBox(strMsg, vbQuestion + vbYesNo, "Save Record?") = vbYes Then
'do nothing
Else...
Thanks Mile-O-Phile,
i'm still trying to remove all the dates from the Award Dataset.[Export_date] where it is equal to a field on my form.
The field is called Export_Date.
Something like:-
DoCmd.RunSQL "UPDATE [Award Dataset] SET [Award Dataset].[Export_Date] = null where [Award...
I have a form with a command button that exports a text file. On the OnClick Event of the command button i have the following:-
DoCmd.RunSQL "UPDATE [Award Dataset] SET [Award Dataset].[Export_Date] = Format(Now(),"dd/mm/yyyy")"
I have another table called [ExportstoElwa] which has a field...
Hi Mile-O-Phile,
Unfortunately not everyone knows their National Insurance Number and because the database tracks students from the Age of 14, they will not have one. Therefore the field is filled with Nine's thus making it not unique.
Tried Compacting and Repairing and it seems to continue...
Hi Mile-O-Phile,
Made some adjustments as you pointed out.
The error i was having is:-
MSACCESS caused an invalid page fault in
module MSACCESS.EXE at 0167:3030df85.
Registers:
EAX=00000204 CS=0167 EIP=3030df85 EFLGS=00010246
EBX=0062f1c4 SS=016f ESP=0062efb4 EBP=0062f17c
ECX=00000000 DS=016f...
Hi All,
I have a form with a text box and a list box on.
When i type in text to the list box it refines my search. I have the following on the OnChange Event on my text box.
Private Sub txtsurname_Change()
Dim txtSearchString As Variant
Dim strSQL As String
txtSearchString =...