繁体   English   中英

从带有凭据的ASP经典页面发送电子邮件

[英]to Sending Email from an ASP classic Page with credentials

我需要通过电子邮件将用户凭据发送给我的应用程序用户,该应用程序内置于ASP中
经典,这是我的问题,是从电子邮件帐户向用户发送信息,但没有发送用户名并从该用户传递密码,我的代码是这个,如何管理用户/密码? 最好的方法是什么? 提前致谢。

t1 = time()
estado=""
email="soporte.web@ipsos.com"       
mail_from = "Soporte <soporte.web@myenterprise.com>"
mail_destino = "Soporte Web Ipsos" & " <" & email &">"
mail_asunto = "Acceso BCI Satisfaccion " & user
ruta=request.ServerVariables("APPL_PHYSICAL_PATH")
on error resume next
mail_cc=""
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.MailFormat = 0   '0 (Mime format), 1 (default Plain Text format)'
myMail.BodyFormat = 0   '0 html, 1 texto'
myMail.Importance = 1   '0 Low, 1 Normal, 2 High '
myMail.From = mail_from
myMail.To = mail_destino
myMail.Cc = mail_cc
'myMail.Cco = mail_cco'
myMail.Subject = mail_asunto
myMail.Body = texto_email
'myMail.AttachFile ruta&"Carta2006.pdf"'
myMail.Send
Set myMail = Nothing
If err.num <> 0 Then   
Response.Write nombre & " / " & email & " / " & "CDONTS Error: " & err.num & " - " & 
err.description
estado="no"
End If

结束子

在经典的ASP中,除了使用登录页面进行身份验证和使用会话变量维护状态外,没有标准的方法(我记得)来处理用户名/密码。

如果转到应用程序中登录页面的代码,并遵循逻辑,则应该会看到登录发生(检查了用户名和密码)。 然后,您可以将这些值弹出到会话变量中(如果尚未完成),然后将其拉出以发送电子邮件。

顺便说一句,通常不建议通过纯文本电子邮件向用户发送用户名和密码,因为可以在传输过程中阅读该电子邮件,这是黑客的机会。 但这取决于你...

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM