Too large, it wont let me.
Too large, it wont let me.
Is this right?
This is what the code looks like on the form:
Again, the red means it was highlighted. This time in yellow with an arrow...
Option Compare Database
Option Explicit
Private Sub cmdContact_Click()
Call AddContact( _
Me.Client, Me.LastName, Me.Address, _
Me.City, Me.State, Me.PostalCode, Me.Email)
End Sub
Private Sub cmdEmail_Click()
Call SendEmail(Me.Email)
End Sub
Private Sub Email_Change()
Call HandleEnabling(Me.Email.Text, Me.Client)
End Sub
Private Sub Client_Change()
Call HandleEnabling(Me.Email, Me.Client.Text)
End Sub
Private Sub Form_Current()
Call HandleEnabling(Me.Email, Me.Client)
End Sub
Private Sub HandleEnabling( _
varEmail As Variant, varClient As Variant)
cmdEmail.Enabled = Len(varEmail & "") > 0
' cmdContact.Enabled = Len(varClient & "") > 0
End Sub
So I figured out how to get into the the references.
So it opens outlook, but it emails it to the prospect, not the client.
How do I change which field I want it to send to?
so i figured out how to get into prefenences.
It now opens outlook, but it is sending it to the prospect email not client email.
How do I change which field it send the email to?
You're specifying the email here:
Call SendEmail(Me.Email)
Perhaps you want to use a different field/control.
Nice! Thank you! I just changed that to ClientEmail & it worked.
Last thing I need to do is have it send the form as an attachment when I click the button.
This has the code required to send an attachment:
http://support.microsoft.com/?kbid=161088
You'd have to have made a PDF or something to attach. You can try SendObject to send the form, though generally you wouldn't send a form. You have a lot more control over the look of a report.