'다음은 SQLServer2000 사용자 기능을 ASP에 추가하고 데이터베이스를 만들려면 DBO에 대한 권한을 부여하는 것입니다. 테스트 *********************************************** 질문이 있으시면 저와 의사 소통하십시오. 앞으로 SQLServer를위한 일부 관리 운영 프로그램이 출시 될 예정입니다.
'매개 변수 : strloginName : 로그인 이름, strpwd 추가 : 로그인 이름 암호, strdbname : 새 데이터베이스 이름 만들기'기능의 로컬 변수 설명 : strserver : 서버가 위치한 기계 이름 (로컬) struid : sql Administrator Password. 위의 세 가지 변수는 상황에 따라 설정해야합니다.
'이 기능은 주로 시스템 저장 절차를 구현하기위한 절차를 호출합니다.
'참고 :이 기능에는 결함 공차가 없습니다. 오류가 발생하면 SQLServer 설정에 문제가 있거나 로그인 계정 또는 데이터베이스가 이미 존재하는지 확인할 수 있습니다.
Subaddusertomsssql (strloginname, strpwd, strdbname) ''서버 변수 및 시스템 관리자 로그인 정보 정의, 특정 상황에 따라 수정하십시오.
DimstrServer, struid, strsapwdstrserver = "(로컬)"struid = "sa"strsapwd = ""Dimconn '데이터베이스 연결
Dimstrdsn 'Database Connection String
dimstrcmd '명령 문자열
strdsn = "driver = {sqlserver}; server ="& strserver & "; uid ="& struid & "; pwd ="& strsapwd & "; database = mas
'새 데이터베이스 만들기 strcmd = "createatabase"& strdbnameconn.execute (strcmd)'새 로그인 계정 만들기 strcmd = "sp_addlogin" "& strloginname &" ',' ""& strdbname & "" ""conn.execute (conn.execute) conn.close.
'새 데이터베이스에 대한 연결을 만들고 새 로그인 계정을 할당하여 새 데이터베이스 strdsn = "driver = {sqlserver}; server ="& strserver & "; uid ="& struid & ";
pwd = "& sarpwd &"; database = "& strdbnamestrcmd ="sp_grantdbaccess ' "& strloginname &" ""conn.openstrdsnconn.execute (strcmd)
'새 로그인 계정을 새 데이터베이스 strcmd = "SP_ADDROLEMEMBER'DB_OWNER', '& strloginName &" ""Conn.Execute (strcmd)'닫기 릴리스 Connect Conn.CloseSetConn = nothingresponse.write "user"& strloginname & "& strdBname &"home hames in home hames for hames hames for hames for hames for hames hames for hames averresponse.write! 그는 "Endsub