怎样把数据库结构显示出来的源代码.doc

　　怎样把数据库结构显示出来的源代码教育资源库 通过以上的代码即可显示表的结构，字段类型，长度，自动编号，主健。如果你仔细研究后就可以发现如何远程改变数据库的结构了，祝你好运！ 要查看此演示，需要你建立一个数据源，request(table)改为你的表的名字。 lt;htmlgt; lt;headgt; lt;titlegt;mainlt;/titlegt; lt;meta http-equiv=Content-Type content=text/html; charset=gb2312gt; lt;/headgt; lt;body bgcolor=#CCCCCC text=#000000gt; lt;h2 align=centergt;lt;font face=华文新魏gt;欢迎查看chenyangasp演示程序lt;/fontgt;lt;/h2gt; lt;pgt; lt;% on error resume next table=request(table) //获得表名 if tablelt;gt; then response.p;table Set primary = con.OpenSchema(adSchemaPrimaryKeys, _ Array(empty, empty, table)) if primary(COLUMN_NAME)lt;gt; then primarykey=primary(COLUMN_NAME) end if primary.close set primary=nothing %gt; lt;/pgt; lt;centergt; lt;table [table] set rs=con.execute(sql) for i=0 to rs.fields.count-1 %gt; lt;tr bgcolor=#CCCCCCgt; lt;td class=sundog height=2 e%gt;lt;/divgt; //字段名 lt;/tdgt; lt;td class=sundog height=2 pty typ = Empty case adTinyInt typ = TinyInt case adSmallInt typ = SmallInt case adInteger typ = Integer case adBigInt typ = BigInt case adUnsigne 123下一页 这篇文章来自..，。dTinyInt typ = UnsignedTinyInt case adUnsignedSmallInt typ = UnsignedSmallInt case adUnsignedInt typ = UnsignedInt case adUnsignedBigInt typ = UnsignedBigInt case adSingle typ = Single case adDouble typ = Double case adCurrency typ = Currency case adDecimal typ = Decimal case adNumeric typ = Numeric case adBoolean typ = Boolean case adError typ = Error case adUserDefined typ = UserDefined case adVariant typ = Variant case adIDispatch typ = IDispatch case adIUnknoe typ = DBTime case adDBTimeStamp typ = DBTimeStamp case adBSTR typ = BSTR case adChar typ = Char case adVarChar typ = VarChar case adLongVarChar typ = LongVarChar case adWChar typ = WChar case adVarWChar typ = VarWChar case adLongVarWChar typ = LongVarWChar case adBinary typ = Binary case adVarBinary typ = VarBinary case adLongVarBinary typ = LongVarBinary case adChapter typ = Ch