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 "D

评论 (0) All

登陆 还没注册？