2.8w+
社区成员
- 主页
如何修改Serv-U密码？
想用asp一个能修改serv-u密码的程序，但不知如何下手。
请高手指教，最好能给个sample code。
（要技即改即生效的）
请高手指教，最好能给个sample code。
（要技即改即生效的）
...全文
请发表友善的回复…
发表回复
daehappy 2002-07-21
up!gz!
Axing21cn 2002-07-20
看看Serv-U的帮助文件吧，里面应该有你要得
反正我是没搞懂
反正我是没搞懂
zhenhao 2002-07-20
那是个什么东西？服务器？不能通过程序改吧，不安全。
global_boy 2002-07-20
to meizz(梅花雨)
错误 '80005000' 第8行
错误 '80005000' 第8行
skyarrow 2002-07-20
meizz(梅花雨)changepwd.asp程序得给权限了吧？
meizz 2002-07-20
HTML 部分
当一个使用者登入你网站的安全区域, 你就可以利用 ServerVariables 集合中的 LOGIN_USER 来了解登入的使用者帐号, 当然记得要把允许匿名登入选项关闭, 现在就先来看 HTML 部分
<form action="changepwd.asp" method="post">
<!-- 为了不让使用者自己输入帐号所以使用隐藏 -->
<input type="hidden" name="UserName"
value="<%=Request.ServerVariables("LOGIN_USER")%>">
<br>输入旧密码 : <input name="OldPwd">
<br>输入新密码 : <input name="NewPwd1">
<br>确认新密码 : <input name="NewPwd2">
<input type="submit" value=" 变更密码 ">
</form>
程序代码
接下来是 ASP 的部分, 看看如何透过 ADSI 来修改 WIndows 2000 使用者帐号, 将下底的程序代码存成 changepwd.asp 檔名
<%
OldPwd = Request.Form("OldPwd")
NewPwd1 = Request.Form("NewPwd1")
NewPwd2 = Request.Form("NewPwd2")
UserName = Request.Form("UserName")
If NewPwd1 = NewPwd2 Then
Set oUser = GetObject("WinNT://ComputerName/" & UserName)
oUser.ChangePassword OldPwd, NewPwd1
oUser.SetInfo
Set oUser = Nothing
Else
Response.Write "请再确认你的密码"
End If
%>
当一个使用者登入你网站的安全区域, 你就可以利用 ServerVariables 集合中的 LOGIN_USER 来了解登入的使用者帐号, 当然记得要把允许匿名登入选项关闭, 现在就先来看 HTML 部分
<form action="changepwd.asp" method="post">
<!-- 为了不让使用者自己输入帐号所以使用隐藏 -->
<input type="hidden" name="UserName"
value="<%=Request.ServerVariables("LOGIN_USER")%>">
<br>输入旧密码 : <input name="OldPwd">
<br>输入新密码 : <input name="NewPwd1">
<br>确认新密码 : <input name="NewPwd2">
<input type="submit" value=" 变更密码 ">
</form>
程序代码
接下来是 ASP 的部分, 看看如何透过 ADSI 来修改 WIndows 2000 使用者帐号, 将下底的程序代码存成 changepwd.asp 檔名
<%
OldPwd = Request.Form("OldPwd")
NewPwd1 = Request.Form("NewPwd1")
NewPwd2 = Request.Form("NewPwd2")
UserName = Request.Form("UserName")
If NewPwd1 = NewPwd2 Then
Set oUser = GetObject("WinNT://ComputerName/" & UserName)
oUser.ChangePassword OldPwd, NewPwd1
oUser.SetInfo
Set oUser = Nothing
Else
Response.Write "请再确认你的密码"
End If
%>
global_boy 2002-07-20
serv-u的帮助中说可以调用serv-u的dll来实现密码修改，但不会用。
apple749769 2002-07-20
你说的serv-u是ftp服务器吧？
我也想达到这样的效果，我不懂。
我也问一下：怎么样通过程序来达到对访问的ip地址的限制！比如说动态的控制。
谁知道了，也给我一下，我会立即另外给分的！
我也想达到这样的效果，我不懂。
我也问一下：怎么样通过程序来达到对访问的ip地址的限制！比如说动态的控制。
谁知道了，也给我一下，我会立即另外给分的！