代码如下:<%@LANGUAGE=”VBSCRIPT” CODEPAGE=”936′′%> <% if Trim(Request.Form(“TableName”)) ‘—-设置 打开数据库连接 dbs=”Data Source=”+server.mappath(“database.mdb”)+”;Provider=Microsoft.Jet.OLEDB.4.0;” set conn=server.createobject(“ADODB.connection”) conn.open dbs ‘定义ADOX,指定连接 set ADOX =server.createobj