打印本文 打印本文  关闭窗口 关闭窗口
ADO如何取得资料表栏位资讯(BIG5)
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005/9/10 12:31:49
ADO如何取得?料表?位???

若要取得?料表?位??,由以下RecordSet物件的?性可得知:

ActualSize?性:此??料的?位??大小。
DefinedSize?性:此??料的所定?的?位大小。
Type?性:?位?型,使用以下?字代表之:
文字text:200
日期??date:135
整?int/???:3
?精?度:4
?精?度:5
??memo:201
是否yes/no:17
Name?性:?位名?。
NumericScale?性:?位小?部份的位?。
Precision?性:?位的整?和小?位?部份加起?的最多位?。
取得?料表?位??例子

?我?看一?於ASP程式??中使用ActualSize/DefinedSize/ Type/Name/NumericScale/Precision的例子。

譬如ASP程式?rs2.asp如下:

<%

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

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

Set rs1 = Server.CreateObject("ADODB.Recordset")

rs1.Open "?品",conn1,1,3

Response.Write "text<BR>"

Response.Write "ActualSize: " & rs1("名?").ActualSize & "<BR>"

Response.Write "DefinedSize: " &rs1("名?").DefinedSize & "<BR>"

Response.Write "Type: " & rs1("名?").Type & "<BR>"

Response.Write "Name: " & rs1("名?").Name & "<BR>"

Response.Write "NumericScale: " & rs1("名?").NumericScale & "<BR>"

Response.Write "Precision: " & rs1("名?").Precision & "<p>"

Response.Write "date<BR>"

Response.Write "ActualSize: " & rs1("日期").ActualSize & "<BR>"

Response.Write "DefinedSize: " & rs1("日期").DefinedSize & "<BR>"

Response.Write "Type: " & rs1("日期").Type & "<BR>"

Response.Write "Name: " & rs1("日期").Name & "<BR>"

Response.Write "NumericScale: " & rs1("日期").NumericScale & "<BR>"

Response.Write "Precision: " & rs1("日期").Precision & "<p>"

Response.Write "int/???<BR>"

Response.Write "ActualSize: " & rs1("?格").ActualSize & "<BR>"

Response.Write "DefinedSize: " & rs1("?格").DefinedSize & "<BR>"

Response.Write "Type: " & rs1("?格").Type & "<br>"

Response.Write "Name: " & rs1("?格").Name & "<BR>"

Response.Write "NumericScale: " & rs1("?格").NumericScale & "<BR>"

Response.Write "Precision: " & rs1("?格").Precision & "<p>"

Response.Write "memo<BR>"

Response.Write "ActualSize: " & rs1("??").ActualSize & "<BR>"

Response.Write "DefinedSize: " & rs1("??").DefinedSize & "<BR>"

Response.Write "Type: " & rs1("??").Type & "<BR>"

Response.Write "Name: " & rs1("??").Name & "<BR>"

Response.Write "NumericScale: " & rs1("??").NumericScale & "<BR>"

Response.Write "Precision: " & rs1("??").Precision & "<p>"

Response.Write "yes<BR>"

Response.Write "ActualSize: " & rs1("?除").ActualSize & "<BR>"

Response.Write "DefinedSize: " & rs1("?除").DefinedSize & "<BR>"

Response.Write "Type: " & rs1("?除").Type & "<p>"

%>

以上的 ASP程式?rs2.asp,於用?端使用??器,???行的?果,?示各?位的?位??,包括?位??大小(ActualSize)、定?的?位大小(DefinedSize)、?位?型(Type)、?位名?(Name)、?位小?部份的位?(NumericScale)、整?和小?位?最多位?(Precision)等。

Attributes/State?性

若要取得更??的?料表?位??,譬如此?位是否包括固定?度的?料、可接受Null的?料值、是否?自???的???等,由以下RecordSet物件的?性可得知:

Field物件的Attributes?性:代表?位的??,由以下值相加:
&H00000002:此?位?memo?型。
&H00000004:此?位可?入?料。
&H00000008:不?定此?位是否可?入?料。
&H00000010:此?位包括固定?度的?料。
&H00000020:此?位可接受Null的?料值。
&H00000040:可能?取到此?位?Null的?料值。
&H00000080:此?位??位元(long binary)?位,可使用AppendChunk和GetChunk方法。
&H00000100:此?位包括自???的???。
&H00000200:此?位包括日期??。
&H00001000:此?位使用cache。
Attributes?性也可以使用於Connection 物件,以取得?料???的??。State?性?示物件的??:

Connection 物件的Attributes?性:代表?料???的??,由以下值相加,??值?0:
&H00020000:正在呼叫CommitTrans。
&H00020000:正在呼叫RollbackTrans。
State?性:?示物件的??:
0:物件已???。
1:物件已???。
?我?看一?於ASP程式??中使用Attributes/State?性的例子。

譬如ASP程式?rs17.asp如下:

<%

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

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

Response.Write "<BR>conn1.Attributes: " & conn1.Attributes

Response.Write "<BR>conn1.State: " & conn1.Attributes

Set rs2 = Server.CreateObject("ADODB.Recordset")

rs2.Open "?品",conn1,1,1

For Each fld In rs2.Fields

Response.Write "<BR>" & fld.Name & "=" & hex(fld.Attributes)

Next

%>

以上的 ASP程式?rs17.asp,於用?端使用??器,???行的?果,For Each fld In rs2.Fields取得所有?位的?息。?示:

?位?型?文字text?位、日期??date ?位、整?int?位、??memo?位,?可?入?料(&H00000004)、可接受Null的?料值(&H00000020)、可能?取到此?位?Null的?料值(&H00000040)。
?位?型?日期??date ?位、整?int?位,?固定?度的?料(&H00000010)。
?位?型???memo?位,??位元(long binary)?位(&H00000040)。



打印本文 打印本文  关闭窗口 关闭窗口