首页 | 邮件资讯 | 技术教程 | 解决方案 | 产品评测 | 邮件人才 | 邮件博客 | 邮件系统论坛 | 软件下载 | 邮件周刊 | 热点专题 | 工具
网络技术 | 操作系统 | 邮件系统 | 客户端 | 电子邮箱 | 反垃圾邮件 | 邮件安全 | 邮件营销 | 移动电邮 | 邮件软件下载 | 电子书下载

邮件服务器

技术前沿 | Qmail | IMail | MDaemon | Exchange | Domino | 其它 | Foxmail | James | Kerio | JavaMail | WinMail | Sendmail | Postfix | Winwebmail | Merak | CMailServer | 邮件与开发 | 金笛 |
首页 > 邮件服务器 > MDaemon Server > 用ASP创建MDaemon用户 > 正文

用ASP创建MDaemon用户

出处:贾俊 (Jaron) 作者:贾俊 (Jaron) 时间:2004-10-5 10:41:00
////////////////////////////////////////////////////////////////////////////// 
// [MDaemon] 用ASP创建MDaemon用户
// 原创作者: 贾俊 (Jaron) 
// 网址: http://www.jiangdu.net ;
// 邮件: jaron@jdinfo.net 
// 首次发表于江都资讯网,2003-01-12
//////////////////////////////////////////////////////////////////////////////

<%@ Language=VBScript %>
<!-- METADATA TYPE="TypeLib" UUID="{01E88D14-F479-4CA5-9CA8-EBD2EED74C83}" -->
<HTML>
<BODY>
<H1 align=center>在线注册演示</H1>
<%
Dim sMessage
If Request.Form("cmdAddUser") <> "" Then 

 Dim oMDUser
 Dim oMDUserInfo
 Dim nResult
 Dim sFullName
 Dim sUserName
 Dim sPassword
 
 sFullName = Request.Form("txtFullName")
 sUserName = Request.Form("txtUserName")
 sPassword = Request.Form("txtPassword")
 sDomain=Request.Form("txtDomain")
 
    Set oMDUser = Server.CreateObject("MDUserCOM.MDUser")
    Set oMDUserInfo = Server.CreateObject("MDUserCOM.MDUserInfo")
    If  oMDUser.LoadUserDll() = True Then
  
  oMDUser.InitUserInfo(oMDUserInfo)
  oMDUserInfo.FullName = sFullName
  oMDUserInfo.MailBox  = sUserName
  oMDUserInfo.Password = sPassword
  oMDUserInfo.Domain = sDomain
  oMDUser.FilterUserInfo (oMDUserInfo)
  nResult = oMDUser.AddUser (oMDUserInfo)

  Select Case nResult
  Case MDDLLERR_NOERROR
   sMessage = "用户注册成功!"
  Case MDDLLERR_USEREXISTS 
   sMessage = "用户名: '" & sUserName & "' 已存在!注册失败!"
  case Else
   sMessage = "注册用户失败 ! 错误代码:" & nResult
  End Select
  
  oMDUser.FreeUserDll
 Else
  sMessage = "错误: 不能加载DLL文件"
 End If
 Set oMDUser = Nothing
 Set oMDUserInfo = Nothing
End If
%>

<P>新用户注册</P>
<FORM ACTION="adduser.asp" METHOD=post ID="Form1">
<TABLE ID="Table1">
<TR><TD>域名:</TD><TD><INPUT SIZE=50 NAME="txtDomain" ID="Text1" value="system.mail" readonly></TD></TR>
<TR><TD>全名:</TD><TD><INPUT SIZE=50 NAME="txtFullName" ID="Text2"></TD></TR>
<TR><TD>登录名:</TD><TD><INPUT SIZE=25 NAME="txtUserName" ID="Text3"></TD></TR>
<TR><TD>口令:</TD><TD><INPUT TYPE="password" SIZE=25 NAME="txtPassword" ID="Password1"></TD></TR>
<TR><TD></TD><TD><INPUT TYPE="submit" value="注册新用户" NAME="cmdAddUser" ID="Submit1"></TD></TR>
</TABLE>
</FORM>
<%
 Response.Write(sMessage & "<BR>")
%>
</BODY>
</HTML>

,
相关文章 热门文章
  • MDaemon邮件列表订阅目录遍历漏洞
  • MDaemon Mail Server 常见设置问题
  • MDaemonServer中策略的中文解释
  • MDaemon Server操作指南
  • MDaemon解决方案之ADSL动态IP搭建邮件服务器解决方案
  • MDaemon邮件服务器解决方案之Comagent应用方案
  • MDaemon邮件服务器解决方案之超大用户负载均衡解决方案
  • MDaemon邮件服务器解决方案之内外网识别收发解决方案
  • MDaemon邮件服务器解决方案之全球发送保障解决方案
  • MDaemon邮件服务器解决方案之应急恢复解决方案
  • MDaemon邮件服务器解决方案之MDaemon解决方案之邮件网关解决方案
  • MDaemon邮件服务器解决方案之全球域共享解决方案
  • MDaemon郵件伺服器架設教學(1)
  • MDaemon Server的安全设置
  • 使用MDaemon搭建企业邮局
  • MDaemon Mail Server 设置问题10则
  • MDaemon的入门篇-安装
  • 如何让WorldClient运行于IIS 环境
  • 用MDaemon搭建邮件服务器
  • MDaemon的入门篇-使用
  • 使用MDeamon构架Mail服务器
  • MDaemon 用户修改密码
  • 绝对疯狂!1G容量的邮件服务器自己打造
  • MDaemon与外部系统整合全攻略
  • 自由广告区
     
    最新软件下载
  • SharePoint Server 2010 部署文档
  • Exchange 2010 RTM升级至SP1 教程
  • Exchange 2010 OWA下RBAC实现的组功能...
  • Lync Server 2010 Standard Edition 标..
  • Lync Server 2010 Enterprise Edition...
  • Forefront Endpoint Protection 2010 ...
  • Lync Server 2010 Edge 服务器部署文档
  • 《Exchange 2003专家指南》
  • Mastering Hyper-V Deployment
  • Windows Server 2008 R2 Hyper-V
  • Microsoft Lync Server 2010 Unleashed
  • Windows Server 2008 R2 Unleashed
  • 今日邮件技术文章
  • 腾讯,在创新中演绎互联网“进化论”
  • 华科人 张小龙 (中国第二代程序员 QQ...
  • 微软推出新功能 提高Hotmail密码安全性
  • 快压技巧分享:秒传邮件超大附件
  • 不容忽视的邮件营销数据分析过程中的算..
  • 国内手机邮箱的现状与未来发展——访尚..
  • 易观数据:2011Q2中国手机邮箱市场收入..
  • 穿越时空的爱恋 QQ邮箱音视频及贺卡邮件
  • Hotmail新功能:“我的朋友可能被黑了”
  • 入侵邻居网络发骚扰邮件 美国男子被重..
  • 网易邮箱莫子睿:《非你莫属》招聘多过..
  • 中国电信推广189邮箱绿色账单
  • 最新专题
  • 鸟哥的Linux私房菜之Mail服务器
  • Exchange Server 2010技术专题
  • Windows 7 技术专题
  • Sendmail 邮件系统配置
  • 组建Exchange 2003邮件系统
  • Windows Server 2008 专题
  • ORF 反垃圾邮件系统
  • Exchange Server 2007 专题
  • ISA Server 2006 教程专题
  • Windows Vista 技术专题
  • “黑莓”(BlackBerry)专题
  • Apache James 专题
  • 分类导航
    邮件新闻资讯:
    IT业界 | 邮件服务器 | 邮件趣闻 | 移动电邮
    电子邮箱 | 反垃圾邮件|邮件客户端|网络安全
    行业数据 | 邮件人物 | 网站公告 | 行业法规
    网络技术:
    邮件原理 | 网络协议 | 网络管理 | 传输介质
    线路接入 | 路由接口 | 邮件存储 | 华为3Com
    CISCO技术 | 网络与服务器硬件
    操作系统:
    Windows 9X | Linux&Uinx | Windows NT
    Windows Vista | FreeBSD | 其它操作系统
    邮件服务器:
    程序与开发 | Exchange | Qmail | Postfix
    Sendmail | MDaemon | Domino | Foxmail
    KerioMail | JavaMail | Winwebmail |James
    Merak&VisNetic | CMailServer | WinMail
    金笛邮件系统 | 其它 |
    反垃圾邮件:
    综述| 客户端反垃圾邮件|服务器端反垃圾邮件
    邮件客户端软件:
    Outlook | Foxmail | DreamMail| KooMail
    The bat | 雷鸟 | Eudora |Becky! |Pegasus
    IncrediMail |其它
    电子邮箱: 个人邮箱 | 企业邮箱 |Gmail
    移动电子邮件:服务器 | 客户端 | 技术前沿
    邮件网络安全:
    软件漏洞 | 安全知识 | 病毒公告 |防火墙
    攻防技术 | 病毒查杀| ISA | 数字签名
    邮件营销:
    Email营销 | 网络营销 | 营销技巧 |营销案例
    邮件人才:招聘 | 职场 | 培训 | 指南 | 职场
    解决方案:
    邮件系统|反垃圾邮件 |安全 |移动电邮 |招标
    产品评测:
    邮件系统 |反垃圾邮件 |邮箱 |安全 |客户端
    广告联系 | 合作联系 | 关于我们 | 联系我们 | 繁體中文
    版权所有:邮件技术资讯网©2003-2010 www.5dmail.net, All Rights Reserved
    www.5Dmail.net Web Team   粤ICP备05009143号