|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% userflag=trim(request("userflag")) oldPwd=trim(request("oldPwd")) newPwd=trim(request("newPwd")) \\\'修改内部网和邮箱的密码 adsPath = "LDAP://file/cn=" & userflag & ",cn=users,dc=yulong,dc=com" Set oo = GetObject("LDAP:") on error resume next Set obj = oo.OpenDSObject(adsPath,userflag,oldPwd,0) if err.Number <> o then err.clear %> <script language="javascript"> alert("用户名或密码错,请重新输入!"); history.go(-1); </script> <% else \\\'Response.Write "newPwd=" & newPwd obj.SetPassword newPwd \\\'Response.Write "<hr>" Response.Write("<div class=aa>你已经成功修改了网络密码!</div>") end if %> //基本上只需改dc=yulong,dc=com这地方,改成自己的域 返回类别: 教程 上一教程: DELPHI编写组件封装ASP代码的基本步骤 下一教程: IIS5 + ADO 2.5新先睹为快技术(二) 您可以阅读与"WINDOWS2000服务器账号登陆身份验证"相关的教程: · 利用SQL SERVER存储过程实现ASP用户身份验证 · 利用SQLSERVER存储过程实现ASP用户身份验证 · 无刷新随时取得当前服务器时间用户登陆时间,在线时间,空闲时间并自动退出的例子 · 用WSE在WEB服务中验证用户身份 · 如何在服务器上保存一定时间的信息 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |