' 以下为在asp中增加一个sql server2000用户函数,并为建立一个数据库,给他dbo的权限 ' ****************注意:sql server的验证方式不要选仅为windows方式, ' **************** 允许远程sql server连接 ' ****************该函数已通过测试**************************** ' 有什么问题欢迎和我交流,以后会推出对sql server的一些管理操作程序 
' 参数:StrLoginName:新增登录名,StrPwd:登录名的密码,StrDBName:新建数据库名 ' 函数内局部变量说明:StrServer:服务器所在机器名(本机为local),StrUid:sql管理员, ' StrSaPwd:sql管理员密码。以上三个变量应根据你的情况设置 
' 该函数主要调用系统存储过程来实现的 
' 注意:本函数没有容错处理,如出现错误,可以确定是你的sql server设置有问题,或已存在该login帐号或该数据库 ' call AddUserToMSSQL("testlogin","iamhere","db_test") 
Sub AddUserToMSSQL(StrLoginName,StrPwd,StrDBName) '定义服务器变量和系统管理员登录信息,根据具体情况修改

 Dim StrServer,StrUid,StrSaPwd StrServer="(local)" StrUid="sa" StrSaPwd="" Dim Conn '数据库连接
 Dim StrDSN '数据库连接字符串
Dim StrCmd '命令字符串
 StrDSN="driver={SQL server};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database=master" '建立和数据库master的连接 set Conn = Server.CreateObject("ADODB.Connection") Conn.Open StrDSN
 '新建一数据库 StrCmd="CREATE DATABASE "&StrDBName Conn.execute(StrCmd) '新建一登录帐号 StrCmd="sp_addlogin '"&StrLoginName&"','"&StrPwd&"','"&StrDBName&"'" Conn.execute(StrCmd) Conn.Close 
'建立与新建数据库的连接,并赋给新登录帐号访问新建数据库的权利 StrDSN="driver={SQL server}; server="&StrServer&";uid="&StrUid&";
pwd="&StSarPwd&";database="&StrDBName StrCmd="sp_grantdbaccess '"&StrLoginName&"'" Conn.Open StrDSN Conn.execute(StrCmd)
 '使新登录帐号成为新建数据库的拥有者 StrCmd="sp_addrolemember 'db_owner','"&StrLoginName&"'" Conn.execute(StrCmd) '关闭释放连接 Conn.Close Set Conn=Nothing Response.Write "用户 "&StrLoginName&" 成功建立!,并且已为他建立了一个数据库 "&StrDBName&"!" End Sub

标签:
ASP在SQL,Server,2000中新建帐号和权限

免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
岱庙资源网 Copyright www.zgmyg.com

评论“ASP在SQL Server 2000中新建帐号和权限”

暂无“ASP在SQL Server 2000中新建帐号和权限”评论...

《魔兽世界》大逃杀!60人新游玩模式《强袭风暴》3月21日上线

暴雪近日发布了《魔兽世界》10.2.6 更新内容,新游玩模式《强袭风暴》即将于3月21 日在亚服上线,届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。

艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕,并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时,他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中,玩家将会进入一个全新的海盗主题大逃杀式限时活动,其中包含极高的风险和史诗级的奖励。

《强袭风暴》不是普通的战场,作为一个独立于主游戏之外的活动,玩家可以用大逃杀的风格来体验《魔兽世界》,不分职业、不分装备(除了你在赛局中捡到的),光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式,玩家在加入海盗主题的预赛大厅区域前,可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹,《巨龙崛起》和《魔兽世界:巫妖王之怒 经典版》的玩家都可以获得奖励。