可以看一下BOOK ONLINE里的帮助信息，具体的不多说了，：）
请看代码：
<%
'建立连接
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=blah"
Dim strSQL
strSQL = "CREATE TABLE test (name varchar(50), age int)"
conn.Execute strSQL
%>
希望能对你有所帮助
