I created a map of a casino floor - in a form using only labels. (The form works great)
Reason: the data displayed in the label doesn't change, the label shows the unique location designation of the machine (ex. AA0101) in the exact position it is located on the casino floor. The values of...
One way to do it:
Create a combo box on your form - have the bound column be your Customer ID (called CustID). Lets call the combo box: cboPLCustID (PL = picklist)
Create a text box on your form for Customer ID = txtCustID
Add code to the cboPLCustID after_update event:
On Error GoTo...
Hi
For each day housekeeping works (TimeSheetID), they fill out a slip that tells start time and end time spent in each room. For each Room type (Queen, King, Suite, etc) we have a target time that they are supposed to shoot for. Queens and Kings may be different room types, but they have...
oops - forgot something - that last bit of code
in the txtEmpid - afterupdate event should be:
Dim strInOut as string
If Not IsNull(Me!txtEmpid) Then
strInOut = Forms!frmClock.OpenArgs
If Len(strInOut) > 0 Then
If strInOut = "In" Then
Me!txtIn = Now()...
Just to answer your question, without going into the implications of doing it one way or another:
Have your two buttons (in & out) on your start form open a modal form (let's call it frmClock) in ADD mode and pass it an arguement (in or out) depending on which button they click.
so for your...
what i've done in the past is when the user logs into the db, their front end checks the version date in the master on the server and if their version is not the latest, their front-end updates itself.
if you just remove the reference and add it back - does it work? or do you have to point it to exact path?
here is code to just remove all refs (except Access and VBA) and add it back:
Private Sub FixUpRefs()
Dim r As Reference, r1 As Reference
Dim s As String...
& ""&strAddress&""
should be: "'" & strAddress & "'"
(it is NOT just two quotes like this: ""
...it is a single quote enclosed by a quote on each side: "'") on both sides of & strAddress &
once you fix that...
and if it fails,
Can you step thru it and see what line it is failing on...
GEESH!
make that: Me!Controlname.value
and replace the controlname with the name of your control.
SO:
Dim strAddress as string
strAddress= Me!ControlName.value
application.followhyperlink "mailto:" & "'" & strAddress & "'"
So are you creating a string of addresses to mail to? or....
Create a query where you return just the ADDRESS Field (i'll call it AddName) for those addresses you want to use.
Copy the sql and :
Dim db as database
Dim rs as recordset
Dim qdf as querydef
dim strSql as string
Dim strName as...
ugh. this is like coming into the middle of a conversation and having no idea what is going on.
afraid i've never used the "hyperlink mailto" functionality. (i would just create an instance of outlook and have it mail that way)
but either way: create a recordset with the addresses and have...
it remembers how you last closed it.
click the restore button (top right) of form, and then close it. When you next open it should remember not to maximize.
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.