怎么读取access数据库中某个字段的类型
2015-11-07 · 知道合伙人软件行家
officecn交流
知道合伙人软件行家
向TA提问 私信TA
知道合伙人软件行家
采纳数:494
获赞数:980
中山大学毕业,从事IT行业16年.主要从事ERP CRM HRM等软件的开发,熟悉access sql server office vb vba c#
向TA提问 私信TA
关注
展开全部
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
参考Office中国 论坛
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询