如何用ASP实现修改邮箱密码?(邮件服务器为:MDaemon),分不够再加!

如题,谢谢!
---------------------------------------------------------------

你好,你的问题解决了么?
如果解决了请将答案发给我。谢谢。
[email protected]
关注!!!!
---------------------------------------------------------------

:-)

可以用 MDaemon 提供的API来实现

请访问我的CSDN专栏:
http://www.csdn.net/develop/MY_article.asp?author=Jaron
http://www.csdn.net/develop/read_article.asp?id=19648
http://www.csdn.net/develop/read_article.asp?id=19650
http://www.csdn.net/develop/read_article.asp?id=19651

---------------------------------------------------------------

下面的这个是重获口令的程序,供参考。

1@ Language=VBScript 
1 Option Explicit 
1<html>
2<head>
3<meta content="Microsoft Visual Studio 6.0" name="GENERATOR"/>
4</head>
5<body>   
6  

If Request.Form("cmdAddUser") = "check" Then

Dim oMDUser
Dim oMDUserInfo
Dim hUserHandle
Dim sEmail
sEmail = Request.Form("txtEmail")
Set oMDUser = Server.CreateObject("MDUserCom.MDUser")
Set oMDUserInfo = Server.CreateObject("MDUserCom.MDUserInfo")
If oMDUser.LoadUserDll() = True Then
hUserHandle = oMDUser.GetByEmail (sEmail)
If hUserHandle &lt;&gt; MD_BADHANDLE Then
oMDUser.GetUserInfo hUserHandle, oMDUserInfo
Response.Write (oMDUserInfo.MailBox)
response.Write oMDUserInfo.Password
Else
Response.Write (hUserHandle)
End If
End If
' Free the instances
Set oMDUser = Nothing
Set oMDUserInfo = Nothing

End If

 1  
 2  
 3  
 4<form id="form1" method="post" name="form1">
 5<table id="Table1">
 6<tr><td>Email:</td><td><input id="Text1" name="txtEmail" size="25"/></td></tr>
 7<tr><td></td><td><input id="Submit1" name="cmdAddUser" type="submit" value="check"/></td></tr>
 8</table>
 9<p> </p>
10</form></body>
11</html>
Published At
Categories with Web编程
comments powered by Disqus