|
<%
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
%>
| |