如何通过ASP管理NT帐号
第一建数据库 :db.mdb
建数据表 user
添加如下字段:
字段 id 自动编号
username 用户名
password 用户密码
第二建立数据库链接页面 conn.asp
代码如下:
StrSQL="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mappath("db.mdb")
set conn=server.createobject("ADODB.Connection")
conn.open StrSQL
第三建立添加用户页面 user_add.asp代码如下:
<%
if request.Form("act")="add" then
name=request.form("name")
password=request.form("password")
if name="" and password="" then
Response.write(" alert('用户名和密码不能为空');location.href='admin_user_add.asp' ")
Response.End
end if
set rs=server.CreateObject("ADODB.RecordSet")
set rst=server.CreateObject("ADODB.RecordSet")
sql1="select * from user"
rst.open sql1,conn,1,1
if name=rst("username") then
Response.write(" alert('该用户已存在,请重新填写');location.href='user_add.asp' ")
response.End()
end if
rst.close
sql="user"
rs.open sql,conn,1,3
rs.addnew
rs("username")=name
rs("password")=password
rs.update
rs.close
set rs=nothing
set myerrors=conn.errors
if myerrors.count=0 then
Response.write(" alert('注册成功');location.href='user_add.asp' ")
else
msgboxu "注册失败!原因:"
Response.write(" alert('注册失败!原因:" &myerrors.item(0).description & "');location.href='user_add.asp' ")
end if
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
第四登录页面:login.asp
登陆名称:
登录密码:
<%
if request.querystring("act")="dengl" then
if (request("name")="" and request("password")="" ) then
response.write("请输入用户名和密码!")
else
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from user where name='" & request("name") & "' and password='"&request("password")&"'",conn,1
if rs.eof and rs.bof then
response.write"alert('用户名或密码不正确!');"
response.write"javascript:history.go(-1)"
response.end
else
session("name")=rs("name")
session("password")=rs("password")
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
所有页面 文件都放在同一个目录下面即可运行了。。。。
第一步:把'NT AUTHORITY\NETWORK SERVICE' 添加到Administrator组中
我的电脑-->右键-->管理-->本地用户和组
选择“组”-->双击Administrators-->单击“添加”-->单击“高级”-->单击“立即查找”-->在下面的列表中选择Network Service用户-->两次单击“确定”-->加入。
第二步 在企业管理器中加入NetWord Service用户
打开Sql Server企业管理器-->选择数据库实例-->打开“安全性”节点-->选择“登录”-->在右边的列表中单击右键-->选择“新建登录”-->在“常规”选项卡中单击“名称”旁边的按钮“...”-->选择“Administrators”组-->单击下面的“成员”按钮-->选择“Network Service”-->单击“添加”按钮-->单击“确定”,返回“新建登录”对话框-->保证身份验证类型为“windows验证”和“允许访问”-->单击“确定”-->关闭“企业管理器”
第三步
重新运行asp.net程序,数据库连接字符串选择windows验证即可。
'函数用法:AddUser(Computer,UserName,PassWord,FullName,Info)
'参数:计算机名,帐号名称,帐号密码,帐号全名,帐号说明
'例:AddUser "127.0.0.1","Test","Test","测试管理员帐号","本帐号通过ASP填加"
'修改指定用户基本信息
'函数用法:EditUser(Computer,UserName,OldPassWord,PassWord,FullName,Info)
'参数:计算机名,帐号名称,帐号密码,帐号全名,帐号说明
'例:EditUser "127.0.0.1","Test","Test2","测试管理员帐号修改","本帐号通过ASP修改过"
'删除指定用户
'函数用法:DelUser(Computer,UserName)
'参数:计算机名,用户名'
'例:DelUser "127.0.0.1","Test"
=============================================================
Function AddUser(Computer,UserName,PassWord,FullName,Info)
'执行创建帐号命令
Set ComputerObj = GetObject("WinNT://"&Computer)
Set NewUser = ComputerObj.Create( "User" , UserName )
NewUser.SetInfo
'进行帐号设置
NewUser.SetPassword ( PassWord ) '帐号密码
NewUser.FullName = FullName '帐号全名
NewUser.Description = Info '帐号说明
NewUser.UserFlags = &H10000 '&H20000(使用者下次登入时须变更密码) &H0040(使用者不得变更密码) &H10000(密码永久正确) &H0002(帐户暂时停用)
NewUser.SetInfo
response.write "帐号"&UserName&"创建成功!"
Set ComputerObj=nothing
End Function
Function EditUser(Computer,UserName,OldPassWord,PassWord,FullName,Info)
'读取用户信息
Set ChangeUserObj = GetObject("WinNT://"&Computer&"/"&UserName&",User")
'修改帐号密码
if PassWord<>"" then
ChangeUserObj.SetPassword PassWord
response.write "帐号密码修改成功!<br>"
end if
'修改帐号全名
if FullName<>"" then
UserFullName = ChangeUserObj.get("FullName")
ChangeUserObj.FullName = FullName
ChangeUserObj.SetInfo
response.write "帐号全名修改成功!<br>"
end if
'修改帐号说明
if Info<>"" then
UserFullName = ChangeUserObj.get("Description")
ChangeUserObj.Description = Info
ChangeUserObj.SetInfo
response.write "帐号说明修改成功!<br>"
end if
Set ChangeUserObj=nothing
End Function
Function DelUser(Computer,UserName)
Set DelUserObj = GetObject("WinNT://"&Computer&"/"&UserName)
If Err = &H800401E4 Then
Response.Write "用户"&UserName&"不存在"
Response.End
End If
Set DelObj = GetObject(DelUserObj.Parent)
DelObj.Delete "User", DelUserObj.Name
Set DelUserObj = Nothing
Set DelObj = Nothing
Response.Write "删除成功"
End Function
怎么用asp 做界面 连接 SQL server 实现 增删改
6. ObjectContext:用于控制ASP的交易(Transaction),交易由Microsoft Transaction Server(MTS)管理 ASP提供的5个重要组件 1. ADO:用于在Microsoft SQL Server,Microsoft Access数据库中读取或存储数据 2. File System:提供可用来访问计算机文件系统的方法和属性 3. Content Linking:根据不同浏览器的性能显示不同的HTML...
asp源码网站后台操作时间怎样修改
摘要:一、怎么样去除默认的管理员(joekoe) 先用joekoe这个管理员进入后台,找到一个配置管理asp源代码,点基本信息配置,可以修改超级管理员,就是现在的joekoe点用户管理里的某一用户asp.n...一、怎么样去除默认的管理员(joekoe)先用joekoe这个管理员进入后台,找到一个配置管理asp源代码,点基本信息...
ASP.NET 2.0:AdventureWorks系统分析
AdventureWorks贸易系统是一个使用N层架构和ASP NET 技术创建的Web站点 该站点实现了贸易系统的部分功能 在实现过程中重点使用了一些集成可重用组件 这应该是大家阅读的重点所在 本系列文章包括 篇 第一篇简单介绍一下系统概况和数据库设计 第二篇讲解数据访问层的实现 第三篇说明构建Web站点的方法 通过这些内容 读者...
asp登录页如何区别管理员和普通用户,登录后跳转到不同页面。
if rs("type")=超级管理员 thenresponse.redirect "admin\/index.asp"elseresponse.Redirect "user\/index.asp"end if
ASP 批量提交N条数据
手动增加表单行可用本地脚本生成,自动增加用服务器脚本判断生成,提交可以循环表单控件数组,给你个收取范例: <Input Type="text" name="T1" size="20" value="123"><BR> <Input Type="text" name="str1" size="20" value="aaa"><BR> <Input Type="text" name="str1" size="20" va...
如何用ASP连接SQLSERVER数据库
思路:1、ASP连接SQL数据库,连接字符串是关键 2、连接后一般是执行查询语句获得结果集,或者是执行SQL语句,不需要返回结果 3、关闭数据库连接对象 示例代码:dim Conn,strConn,rs,strSQLstrConn = "Provider=SQLOLEDB;Data Source=127.0.0.1;User ID=Test;Password=Test;Initial Catalog=Test_...
asp中一个字符串有N行,我要取他的第一行的函数是什么
str=rs("contact")str=split(str,chr(13))str1=str(0)
asp.net中几种常用的身份验证方法总结
session”或者“cookie”了,就能把未登录用户给弹出去(水平实现有限)。当然,在传统webform开发中,也可以写一个“BasePage的鸡肋”,在该类中去做判断,让每个页面对应的类都去实现这个"鸡肋",我看以前很多公司都是这么干的。在asp.net中,其实微软提供了一整套的完整的机制来实现“...
什么是ASP网站
按此处,通过request..querystring取得name,age Name:jack Age:15 Get范例 请看个例子。 范例:aspform.asp 这个例子的表格(form)使用Get方法,在用户端使用浏览器,浏览执行的结果如下,输入表格点击"写完了"按钮后,将显示处理的结果。 站点服务器aspform.asp文件的程序码如下,点击"submit"按钮后,执行站点服务器的...
ASP实现多用户登录
< if up=0 then Response.Redirect("page1.asp")else if up=1 then Response.Redirect("page2.asp")else if up=2 then Response.Redirect("page3.asp")end if end if end if > 这个是登陆的时候用 另外在包括一个power.asp 在每一个页面的最前面设置一句:userpowerneed=n 其中n表示最低...
王季立安: 从字面上说,ASP包含三方面含义: 1、Active:ASP使用了Microsoft的ActiveX技术.ActiveX(COM)技术是现在Microsoft软件的重要基础.它采用封装对象,程序调用对象的技术,简化编程,加强程序间合作.ASP本身封装了一些基本组件和常...
海城区18246688431: 怎么用ASP.NET写用户及管理员登录 - ?
王季立安: 楼主,你说的是权限管理吧?它包括用户、角色、权限,如过想让他们有联系,那就得在用户和角色中间建立一个用户角色表,想让用户拥有不同的权限时,你还 得在角色和用户之间创建一个角色权色表.最后还要有一个权限类别表,这样才会...
海城区18246688431: ASP.NET如何制作后台权限管理 - ?
王季立安: 你是想自己写后管理系统,还是就为有一个后台权限呀? 如果是后台管理系统,你就按照登录那样做就可以,在里面可以再加限制访问页面 如果登录成功,则可以进入后台系统如果不登录或登录失败,都让它跳转到一个指定的页面,进行错误的报告,然后让登录的人从新登录
海城区18246688431: 编写asp组件注册后运行,提示没有权限,网上查了,必须要相应的设置NT的匿名帐号有权限执行这个dll - ?
王季立安: 把你的组件的相应目录右键--属性--安全 然后给目录添加上一个EVERYONE用户,给这个用户所有权限.包括读取,写入等.这个是NTFS格式的常见问题.
海城区18246688431: 如何在 ASP 中实现 Windows 身份验证和授权.NET - ?
王季立安: 首先关闭UAC,在用-控制面板里面-户帐户里面-选择“打开或关闭用户帐户控制” 1、使用安装时创建的帐号登陆Vista 2、开始菜单,找到“所有程序 > 附件” 3、右击“命令提示符” ,选择“以管理员身份运行” 4、在UAC提示对...
海城区18246688431: 如何写asp.net权限管理和根据权限访问页面和功能 - ?
王季立安: 数据库中添加一列是否是管理员的列,然后在用户登陆时将这个值写入session中.在需要的页面就判断session中这个值是否为管理员,是就显示特定内容,否就隐藏指定内容,没有值就返回登陆页重新登陆.
海城区18246688431: 什么是ASP??
王季立安: 一种程序,我们日常所登陆的使用的网站程序,asp是在dw软件里编辑的,是微软的产品.
海城区18246688431: xp下ASP.NET帐户怎么登录 - ?
王季立安: 在登陆界面的时候按 + 按两次del 这时候就可以输入用户名和密码了 就算隐藏的那种也可以登陆了 在"出现登陆界面,选用户名填密码的那个"这里按才可以的 按住ctrl+alt不动 连续按del两次即可
海城区18246688431: 怎样用ASP.NET做记住用户名. - ?
王季立安: protected void Button1_Click(object sender, EventArgs e) { if (this.CheckBox1.Checked)//记住密码 { Session["username"] = ""; } } 还有一种下次不需要在登陆就要写在Cookie里
海城区18246688431: 用ASP程序修改管理员账号和密码(在线,急) - ?
王季立安: 以下是在线写的,没有调试,应该可以实现你要的功能,希望能给你帮助 system.asp flag = request("flag") if flag = 1 then admin = request("admin") adminpassword = request("adminpassword") sqlupdate = "update admin set admin='&...