<%

	Set cn = Server.CreateObject("ADODB.Connection")
	strConnection = "Provider=SQLOLEDB;" & _
			"Data Source=sv;" & _
			"Initial Catalog=master;" & _
			"User Id=sa;" & _
			"Password=password;"

	cn.Open strConnection

	SqlCommand = "create database [LIGHTSSERVER]"
	cn.Execute SqlCommand, , adCmdText

	cn.Close
%>

1> create database [LBOX]
2> go
CREATE DATABASE: ディスク 'LBOX' に 1.00 MB 割り当てています。
CREATE DATABASE: ディスク 'LBOX_log' に 0.49 MB 割り当てています。