• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 299
  • Last Modified:

Sending email in a VB Script

Ok I am totally new to this! I am using VB 6.3.

I am trying to get an email sent after a user clicks yes to a popup box. It works except I get a dialog box after clicking yes that says "You are sending email on someones behalf..ect. Click Yes to send. I click yes and all is well. How do I bypass this message? It seems not the code is just using whatever email profile that is curently in use on the server. I would like it to send email via our exchange server directly if possible. If not, can I somehow still send with the current outlook profile and still bypass this message? Any ideas? Here is a snippet of the code where the email info is specified:

--------

 Response = MsgBox("The nickel average thickness is below the Lower Reaction Limit.  Press YES to continue running at these parameters.  Press NO to run another rack at a higher ampmin setting.  If you press NO you must re-enter the new thickness readings from the adjusted rack.", vbYesNo, "WARNING")
            If Response = vbYes Then
                Response1 = MsgBox("Are you sure the product is In-Control and that you are not going to raise the ampmins and retest?", vbYesNo, "PLEASE CONFIRM SELECTION")
                If Response1 = vbYes Then
                Me.[Ni_Au_Comments] = "Running with nickel avg. thickness below the Lower Reaction Limit.  Operator okay to run."
                DoCmd.SendObject , "", "", "user@domain.com", "", "", "Nickel Thickness below LRL", "Nickel thickness is being run below the lower reaction tolerance.  Operator has okay'd to run rest of DJ at these settings.  If there is repeat e-mails with this subject we must investigate that the operators adjust their ampmin's to get the proper thickness", False, ""
                End If
                If Response1 = vbNo Then
                Response = MsgBox("The nickel average thickness is below the Lower Reaction Limit.  Press YES to continue running at these parameters.  Press NO to run another rack at a higher ampmin setting.  If you press NO you must re-enter the new thickness readings from the adjusted rack.", vbYesNo, "WARNING")
                End If---

Thanks

Justin
0
Justin Durrant
Asked:
Justin Durrant
2 Solutions
 
Dudge669Commented:
0
 
Éric MoreauSenior .Net ConsultantCommented:
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now