「以下は、ASPにSQLSERVER2000ユーザー機能を追加し、データベースを作成するために、DBO '************************************************************************************************************************************************************************************テスト********************************************** '質問がある場合は、私と連絡してください。将来的には、SQLServer向けのいくつかの管理操作プログラムが開始されます。
'パラメーター：strloginName：ログイン名、STRPWDの追加：ログイン名パスワード、STRDBNAME：新しいデータベース名の作成'関数内のローカル変数の説明：STRSERVER：サーバー名（ローカル）STRUID：SQL管理者、 'STRSAPWD：SQL管理者パスワード。上記の3つの変数はあなたの状況に従って設定する必要があります
'この関数は主にシステムのストアドプロシージャを呼び出して実装します
'注：この関数には断層トレランスがありません。エラーが発生した場合、SQLServerのセットアップに問題があること、またはログインアカウントまたはデータベースがすでに存在することを確認できます。
subaddusertomssql（strloginname、strpwd、strdbname） 'サーバー変数とシステム管理者ログイン情報を定義し、特定の状況に従って変更します
dimstrserver、struid、strsapwdstrserver = "（local）" struid = "sa" strsapwd = "" dimconn 'データベース接続
dimstrdsn 'データベース接続文字列
dimstrcmd 'コマンド文字列
strdsn = "driver = {sqlserver}; server ="＆strserver＆ "; uid ="＆struid＆ "; pwd ="＆strsapwd＆ "; database = master" 'データベースマスターsetconn = server.createobject（ "adodb.connection"）conn.opentrdsn
'新しいデータベースSTRCMD = "CreatedAtaBase"＆Strdbnameconn.execute（strcmd）'新しいログインアカウントStrcmd = "sp_addlogin '"＆ "'、 '"＆strpwd＆ "' '' '' '＆strdbname＆" "" "" ""
'新しいデータベースへの接続を作成し、新しいログインアカウントを割り当てて、新しいデータベースstrdsn = "driver = {sqlserver}; server ="＆strserver＆ "; uid ="＆struid＆ ";
pwd = "＆sarpwd＆"; database = "＆strdbnamestcmd =" sp_grantdbaccess '"＆strloginname＆"' "conn.openstrdsnconn.execute（strcmd）
「新しいログインアカウントを新しいデータベースSTRCMD = "SP_ADDROLEMEMBER'DB_ONER '、'"＆strloginname＆ "'" conn.execute' conn.exeSetconn = Notes Response.write "user"＆strloginname＆ "stroginname＆" strloginname＆ "strloginname＆" strloginname＆ "彼は「Endingub