请帮帮我啊
我想用一个页面调用一个数据库文件（jiang.mdb)，并在数据库里建立一个表（Mytable)，在表里面建立两个字段nianling和xingming，以下的代码运行后会建立一个数据库文件jiang.mdb，但是不能在数据库里面建立表，这是错在哪里？我是菜鸟，请大虾帮帮忙。
<%
Const adEmpty = 0
Const adTinyInt = 16
Const adSmallInt = 2
Const adInteger = 3
Const adBigInt = 20
Const adUnsignedTinyInt = 17
Const adUnsignedSmallInt = 18
Const adUnsignedInt = 19
Const adUnsignedBigInt = 21
Const adSingle = 4
Const adDouble = 5
Const adCurrency = 6
Const adDecimal = 14
Const adNumeric = 131
Const adBoolean = 11
Const adError = 10
Const adUserDefined = 132
Const adVariant = 12
Const adIDispatch = 9
Const adIUnknown = 13
Const adGUID = 72
Const adDate = 7
Const adDBDate = 133
Const adDBTime = 134
Const adDBTimeStamp = 135
Const adBSTR = 8
Const adChar = 129
Const adVarChar = 200
Const adLongVarChar = 201
Const adWChar = 130
Const adVarWChar = 202
Const adLongVarWChar = 203
Const adBinary = 128
Const adVarBinary = 204
Const adLongVarBinary = 205
Const adChapter = 136
Const adFileTime = 64
Const adPropVariant = 138
Const adVarNumeric = 139
Const adArray = &H2000
Dim cat
Set cat = Server.CreateObject("ADOX.Catalog")
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\jieshao.mdb"
Dim tbl
Set tbl = Server.CreateObject("ADOX.Table")
Set cat = Server.CreateObject("ADOX.Catalog")
cat.ActiveConnection ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\jieshao.mdb"
tbl.Name = "MyTable"
tbl.Columns.Append "nianling", adInteger
tbl.Columns.Append "xingming", adVarWChar, 50
cat.Tables.Append tbl
%>
问题点数：0、回复次数：1Top
1 楼flashsj（）回复于 2003-06-02 23:12:16 得分 0
为什么不可视话建立呢Top
