Colorful Life²⁰¹⁰

<%'---------------读access库中的表名-------------------------
SET  Conn=Server.CreateObject("ADODB.Connection")
Conn.Open  "Driver={Microsoft　Access　Driver  (*.mdb)};DBQ="&　Server.MapPath("库名称")
Set  rstSchema = Conn.OpenSchema(20)
　　
Do　Until  rstSchema.EOF
 Response.Write　"Table　name:"&  rstSchema(2)&　"<　br>　"&  "Table　type:"&　rstSchema(3)&　"<  br>　<　br>　"
 rstSchema.MoveNext
Loop
%>
　　<%'---------------读sql  server库中的表名-------------------------
SET  Conn=Server.CreateObject("ADODB.Connection")
Conn.Open  "Server=IP地址;Provider=sqloledb;Database=库名称;UID=用户名;PWD=密码;"
Set  rstSchema=Conn.OpenSchema(20)
　　
Do　Until  rstSchema.EOF
 Response.Write　"Table　name:"&  rstSchema(2)&　"<　br>　"&  "Table　type:"&　rstSchema(3)&　"<  br>　<　br>　"
 rstSchema.MoveNext
Loop
%>　

　　<%'---------------读oracle库中的表名-------------------------
SET  Conn=Server.CreateObject("ADODB.Connection")
Conn.Open  "Provider=MSDAORA.1;Password=密码;User　ID=用户名;Data  Source=数据源名称"
Set  rstSchema=Conn.OpenSchema(20)
　　
Do　Until  rstSchema.EOF
 Response.Write　"Table　name:"&  rstSchema(2)&　"<　br>　"&  "Table　type:"&　rstSchema(3)&　"<  br>　<　br>　"
 rstSchema.MoveNext
Loop

'Response.Write("所在数据库名:" & rs(0) & "
")
'Response.Write("所有者:" & rs(1) & "
")
'Response.Write("表 名:" & rs(2) & "
")
'Response.Write("表的类型:" & rs(3) & "
")
%>

Sybase数据库的资料真的非常少，不管是百度还是GOOGLE，太难找到有用的信息了。Sybase自带的帮助也乱得要命，怪不得要被M$买下来赚钱，并且看人家SqlServer发展得多好呀。不说这个了，俺在网上找得辛苦，但找着了就要造福大众。

俺以前用的连接字符串是：

 Provider=ASAProv;Data source=DBName;Uid=dba;pwd。。。

一．用SqlConnection连接SQL Server
1..加入命名空间

using System.Data.SqlClient;

2.连接数据库...