here's what you could do:
If IsNull(Me.StoreIDCode) Then
ElseIf IsNull(Me.WorkDate) Then
ElseIf IsNull(Me.WorkDate) Then
Else
'Assuming all these are there, create a matchkey
MatchKey = StoreIDCode & WorkDate & LineNumber
End If
'once matchkey has been created, see if any other match keys of...
Why don't you start from the Left$ instead of the Right$.
Like this: Left(Variable, Len(Variable))
This should give you your variable... and only your variable.
I did not test this so... this is only theory.
Do it in VBA!
Here's how:
On the Open event of the subform, add this code
private sub ... On_Open()
DoCmd.GoToRecord , , acNewRec
end sub
Hope I'm of any help.
I don't think there's a built in function but you're doing to many test. Since DateDiff() will be < 0 if DOB < Date I guess you could just do this:
Public Function DateToAge(DOB As Date) As Integer
if (DateDiff("d", DOB, Date)) < 0 then
‘Error handling code
else...
Here's how I deal with this!!!
'first separate the query from the recordset
Dim sql as string
sql = "SELECT PRIN_EMP, PRIN_OT FROM PRINC WHERE (PRIN_ID = '" & List0 & "')"
Set rst = CurrentDb.OpenRecordset(sql, dbOpenSnapshot)...
I don't know if this is what you need but it'll do the trick if you wanna a change one form for another in Access.
In the onclick code of your goto button just put this code
'go from "form1" to "form2"
Private Sub GotoButton_Click()
Dim strForm1 as String
Dim...
Hi,
it's has simple as this... I have a form with a table "tbl" for source and I don't wan't that form to save the data as it close. I've tried doing this:
Sub ..._onLiberation(...)
Me.Dirty = False
End Sub
I tought it would work but it did not and since it's the only thing I...
Hi,
it's has simple as this... I have a form with a table "tbl" for source and I don't wan't that form to save the data as it close. I've tried doing this:
Sub ..._onLiberation(...)
Me.Dirty = False
End Sub
I tought it would work but it did not and since it's the only thing I...
The next lines of code open ms photo editor but not the picture I want to be opened.
stAppName = "C:\Program Files\Fichiers communs\Microsoft Shared\PhotoEd\Photoed.exe" & "PathPicture"
Call Shell(stAppName, 1)
What am I doing wrong???
I need to open(preview) an image... I have the full path (path\image.jpg). Don't mind if it open in a msgbox... as long as it open.
I'm working with "docmd" but I haven't been able to do anything right... for now. Anyone have an idea!!!
Thank
I have a report... in it ther's a "sub-report" name boby using the source "report.reportBoby"
Let's say I want to use the value returned by boby, how could I do.
I've tried me![boby] but it will not work.
I've done a lot of test but none will work... HELP!
Tx for your help...
I've come up with this part of code to import from a dbase table and it will not work I don't think it's the code but... could you check if the following is ok.
here's the error Access97 give me:
**********************************
Error 3170
Couldn't find installable ISAM...
Access97 is giving me this error:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error '3170'
couldn't find installable ISAM
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Is it because something is not installed?
What does it mean?
Access97 is giving me this error:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error '3170'
couldn't find installable ISAM
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Is it because something is not installed?
What does it mean?
Hi,
I've got a "user level" security system on a database and when I delete or create a new user, the system send back this error:
Unable to update; now locked by user « UserName » on « ComputerName »
Why and how to fix it?
Thx
"I may be slow but I'm deadly accurate!!!"
Hi,
I've got a "user level" security system on a database and when I delete or create a new user, the system send back this error:
Unable to update; now locked by user « UserName » on « ComputerName »
Why and how to fix it?
Thx
"I may be slow but I'm deadly accurate!!!"
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.