首页上一页 1 下一页尾页 2 条记录 1/1页
帮帮忙啊。。。。。。。。。。。。
发表在VB答疑区
2009-05-25
是否精华
是
否
版块置顶:
是
否
你好 请问
我用的数据库是2000 其中的部门信息表和员工信息表有关系,但是在数据库中没有设定这两个表的主键和外键,也没有设定关系。
其中在员工信息窗口中选择部门的代码是
rs1.Open "select 部门名称 from 部门信息表 group by 部门名称", cnn, adOpenKeyset, adLockOptimistic
If rs1.BOF = False Then rs1.MoveFirst
For i = 0 To rs1.RecordCount - 1
Combo3.AddItem (Trim(rs1.Fields("部门名称")))
rs1.MoveNext
Next i
If Combo3.ListCount > 0 Then Combo3.ListIndex = 0
rs1.Close
部门信息表的属性有:部门编号,部门名称,负责人……
员工信息表的属性有:员工编号,姓名,性别,所属部门名称……
请问 我觉得他们两个表是通过部门名称相连的,可是我不知道这两个表的主键、外键是什么?它们在数据库中没有设关联啊,那么在代码中我也没有找出它们的关联?它们是怎么相连的?
谢谢您的回复!
VB项目开发实录中的餐饮管理系统。。。。。。。
在线等。。。。。
我用的数据库是2000 其中的部门信息表和员工信息表有关系,但是在数据库中没有设定这两个表的主键和外键,也没有设定关系。
其中在员工信息窗口中选择部门的代码是
rs1.Open "select 部门名称 from 部门信息表 group by 部门名称", cnn, adOpenKeyset, adLockOptimistic
If rs1.BOF = False Then rs1.MoveFirst
For i = 0 To rs1.RecordCount - 1
Combo3.AddItem (Trim(rs1.Fields("部门名称")))
rs1.MoveNext
Next i
If Combo3.ListCount > 0 Then Combo3.ListIndex = 0
rs1.Close
部门信息表的属性有:部门编号,部门名称,负责人……
员工信息表的属性有:员工编号,姓名,性别,所属部门名称……
请问 我觉得他们两个表是通过部门名称相连的,可是我不知道这两个表的主键、外键是什么?它们在数据库中没有设关联啊,那么在代码中我也没有找出它们的关联?它们是怎么相连的?
谢谢您的回复!
VB项目开发实录中的餐饮管理系统。。。。。。。
在线等。。。。。