asp 创建表

<%



Set conn1 = Server.CreateObject("ADODB.Connection")



conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"



sql = "CREATE TABLE 表明 (字段1 TEXT(10),字段2 INT)"



Set a = conn1.Execute(sql)



Response.Write "CREATE TABLE OK<p>"



conn1.Close



%>