可以看一下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 %> 希望能对你有所帮助