Currently this code is being used on a form that sends each user their password. However, I would like to force a new line in the e-mail at certain spots (just as if I was typing this in e-mail an pressed the "Enter" key to start a new line)
In the code I have placed $NEW LINE$ where a new line needs to start and $INSERT BLANK LINE$ where we would like to see a space.
If Me.Plant <> "EXEC" Then
DoCmd.SendObject , , , [UserID], , , "Capital Budget Password", "Your Password is: " & [ReviewPassword] & " $NEW LINE$This password will allow you to enter the Review area of the Budget. From this area you are able to add new, modify or delete items and view multiple reports. $NEW LINE$Also, if you execute any of the enginering combination reports, the password is: " & [SmyrnaEngineering] & ".", False
Emailsent.SetFocus
[Emailsent] = True
DoCmd.Close
Else
DoCmd.SendObject , , , [UserID], , , "Capital Budget Password", "Your Password is: " & [ReviewPassword] & " $NEW LINE$With the exception of locking the budget for review, this password will grant you access to every secured portion of the database. $INSERT BLANK LINE$To lock or unlock the database for review, use the password: " & [LockDBPassword] & " . To lock, click on the Nissan Logo on the entrance screen. To unlock, click on the Unlock button located on the Review screen", False
Emailsent.SetFocus
[Emailsent] = True
DoCmd.Close
End If
Any suggestions?
Thank you for any and all help,
PBrown
In the code I have placed $NEW LINE$ where a new line needs to start and $INSERT BLANK LINE$ where we would like to see a space.
If Me.Plant <> "EXEC" Then
DoCmd.SendObject , , , [UserID], , , "Capital Budget Password", "Your Password is: " & [ReviewPassword] & " $NEW LINE$This password will allow you to enter the Review area of the Budget. From this area you are able to add new, modify or delete items and view multiple reports. $NEW LINE$Also, if you execute any of the enginering combination reports, the password is: " & [SmyrnaEngineering] & ".", False
Emailsent.SetFocus
[Emailsent] = True
DoCmd.Close
Else
DoCmd.SendObject , , , [UserID], , , "Capital Budget Password", "Your Password is: " & [ReviewPassword] & " $NEW LINE$With the exception of locking the budget for review, this password will grant you access to every secured portion of the database. $INSERT BLANK LINE$To lock or unlock the database for review, use the password: " & [LockDBPassword] & " . To lock, click on the Nissan Logo on the entrance screen. To unlock, click on the Unlock button located on the Review screen", False
Emailsent.SetFocus
[Emailsent] = True
DoCmd.Close
End If
Any suggestions?
Thank you for any and all help,
PBrown