如何判断数据表中的某个字段是否存在?

ygs202 2004-12-26 10:13:56
如何判断数据表中的某个字段是否存在?比如,要判断表tabel1中是否存在字段f1,如果不存在,再添加该字段,这个功能怎么实现呢?请指教!
...全文
485 9 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
johnny_zdy 2004-12-27
  • 打赏
  • 举报
回复
如果你是在ms-sql中作業,用 hdhai9451(Water Space--海洋空間) 提出的方法是比較理想的
蒋晟 2004-12-27
  • 打赏
  • 举报
回复
和数据库引擎和你使用的数据访问方式有关,
cuoguonili 2004-12-27
  • 打赏
  • 举报
回复
用filter函数来查找。
Public mrc As ADODB.Recordset
mrc.open "select from....."
If mrc.RecordCount > 0 Then
mrc.filter ="字段1="&text1.text
if mrc.recoracount>0 then
msgbox "输入重复"
else
**输入结果**
end if
end if
射天狼 2004-12-27
  • 打赏
  • 举报
回复
用错误处理的方法比较好,如果从系统表里查,要看什么数据库,不同的数据库,系统表名也不一样!!
aohan 2004-12-27
  • 打赏
  • 举报
回复
可以用错误来判断


On Error GoTo Err:


exit sub
err:
If Err.Number = 3265 Then MsgBox "字段不存在"
下面建造字段
resume next '回到原错误的下面继续执行
haohaohappy 2004-12-27
  • 打赏
  • 举报
回复
笨方法,将字段名都提出,然后比较
Andy__Huang 2004-12-27
  • 打赏
  • 举报
回复
sql server 2000,判斷某個表是否存在某個字段

select * from syscolumns where name='字段名' and id=object_id('表名')
zftow110 2004-12-27
  • 打赏
  • 举报
回复
学习
johnny_zdy 2004-12-27
  • 打赏
  • 举报
回复
看這個行不行:

Dim Rs as new adodb.recordset
dim strSQL as string
Dim Table As TableDef
Dim Field As Field
strsql="select * from syscolumns where name='字段名' and id=object_id('表名')"
With Rs
.open strsql,connection,adOpenStatic ,adLockReadOnly
if .eof=true then
Set Table = Database.CreateTableDef("表名")
Set Field = Table.CreateField("字段名", 字段類型, 長度)
Table.Fields.Append Field '添加到表中
End if
End With
Rs.Close
Set Rs=Nothing


1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧