标题: 如何取得表中字段的数据类型名称？ [打印本页] 作者: mrd_wxqs 时间: 2010-4-22 17:28 标题: 如何取得表中字段的数据类型名称？ 如何取得表中字段的数据类型名称,
如string,integer,long等,这些名称对应的代码又是什么.
比如,字段.type=1,这个1对应的名称是什么.
用vartype常数返回的值与字段.type是一致吗？
谢谢!作者: todaynew 时间: 2010-4-22 19:58
Public Function GetfilType(Tbname as string,Filname as string) as string
'功能:获得字段类型
Dim rs As New ADODB.Recordset
rs.Open Tbname, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
GetfilType=rs(Filname).Type
End Function
Public Function GetfilType(Tbname as string) as string
'功能:获得字段类型列表，可用做组合框或列表框数据源
Dim rs As New ADODB.Recordset
Dim i as long
rs.Open Tbname, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
for i=0 to rs.fields.count-1
GetfilType=GetfilType & rs(i).name & ";" & rs(i).Type
next
End Function作者: mrd_wxqs 时间: 2010-4-22 21:58
谢谢todaynew的解答.
用这个函数返回的type值与vartype常数值不一致,这两者之间是没有对应关系吗?
还有用type返回的是字段类型的数值,如何才能返回字段类型的名称呢?
谢谢!