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）。