我是个有数据库的新手,但我为经营保险公司的朋友设计了一个数据库。我几乎完成了,但我只需要能够输入一个搜索字段。
基本上,我有一个包含所有客户联系详细信息的客户表单,然后显示不同类型的保险单(汽车、家庭、医疗等)客户表单链接到客户表,子表单链接到表(马达、家庭、医疗等,每个子表一个表)所有的表都通过字段CustID链接。
我需要做的是搜索每个子表单中唯一的策略号,然后返回与该策略号相关的客户表单。或者换句话来说,在所有表(马达、家庭、医疗等)中搜索策略号,找到CustID,然后拿出与该CustID相关的客户表单。
任何帮助将不胜感激,因为我已经花了数天搜索网页,尝试查询和联合查询,但没有找到任何回应,将提出的表格。很明显我漏掉了什么
发布于 2015-12-11 09:38:14
谢谢韦恩的帮助,最后我一直努力解决这个问题。
我想汇报一下我所做的事。我已经展示了我的所有步骤,您永远不会知道这可能会帮助其他用户:
我创建了一个Union查询,该查询从不同的策略表中调用所有策略编号:
选择Customer_Details.CustID,Motor.Policy_Quote_No从Customer_Details右连接电机上Customer_Details.CustID = Motor.CustID联合选择Customer_Details.CustID,Home.Policy_Quote_No从Customer_Details右连接主页上Customer_Details.CustID = Home.CustID联合选择Customer_Details.CustID,Liability.Policy_Quote_No从Customer_Details右联合责任Customer_Details.CustID = Liability.CustID UNION选择Customer_Details.CustID,Marine.Policy_Quote_No从Customer_Details右边加入Customer_Details.CustID = Marine.CustID UNION选择Customer_Details.CustID,Medical.Policy_Quote_No从Customer_Details右加入Customer_Details.CustID = Medical.CustID UNION SelectCustomer_Details.CustID,Pet.Policy_Quote_No从Customer_Details右加入Customer_Details.CustID = Pet.CustID;
我制作了一个组合框(Combo41),源是made (UnionQueryPolicyNo),通过0cm调整列数和列宽度,以隐藏Customer列
然后创建了一个“选择策略号”。按钮,具有以下“单击”事件代码:
Command43_Click() On GoTo Err_Command43_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "CustomerBase“stLinkCriteria = "CustID=”& Me DoCmd.OpenForm stDocName,,stLinkCriteria Exit_Command43_Click: Exit Sub Err_Command43_Click: MsgBox Err.Description Resume Exit_Command43_Click End Sub
现在,我可以在组合框中输入策略编号,然后单击按钮,它将显示与该策略编号相关的客户表单。是啊!!
这样您就可以看到我附加的剪裁截图的代码布局。
UnionQueryPolicyNo
选择政策号。按钮事件代码
发布于 2015-12-10 07:44:55
我有一个菜单表单(交换机),我想在这里运行搜索,它有一个按字母顺序排序的表,显示所有客户,我还添加了一个按钮,允许我选择任何一个客户并显示客户记录表单。
客户记录表单显示所有客户详细信息,包括显示他购买的任何保单的选项卡子表单。
我附上了这两种形式的屏幕截图。除保险单编号外,表格上的所有内容都运行得很好。查找菜单表单:当我输入有效的策略号时,它返回一个新的(空白)客户记录表单,而不是拥有该策略号的客户记录。
我编写了以下查询,这些查询返回正确的结果:
查询1:选择Customer_Details.CustID,Motor.Policy_Quote_No从Customer_Details右连接电机上选择Customer_Details.CustID = Motor.CustID UNION SelectCustomer_Details.CustID,Home.Policy_Quote_No从Customer_Details右连接主页ON Customer_Details.CustID = Home.CustID UNION SelectCustomer_Details.CustID,Liability.Policy_Quote_No从Customer_Details RIGHT RIGHT ON Customer_Details.CustID = Liability.CustID UNION SelectCustomer_Details.CustID,Marine.Policy_Quote_No从Customer_Details右边加入Customer_Details.CustID = Marine.CustID UNION选择Customer_Details.CustID,Medical.Policy_Quote_No从Customer_Details右加入Customer_Details.CustID = Medical.CustID UNION SelectCustomer_Details.CustID,Pet.Policy_Quote_No从Customer_Details右加入Customer_Details.CustID = Pet.CustID;
和
UnionQueryPolicyNo.CustID=Customer_Details.CustID查询2:(((UnionQueryPolicyNo.Policy_Quote_No)=Forms));上的从UnionQueryPolicyNo内部连接Customer_Details中选择Customer_Details.CustID、UnionQueryPolicyNo.Policy_Quote_No
所以,我认为这只是按钮的代码,目前我有一个宏:
操作:打开表单名称: CustomerBase视图:表单所在: PolicyLookuponUnionQuery=Customer_Details
CustomerBase形式
菜单表格(总机)
我希望我能更好地解释这一点,并感谢你的帮助。
https://stackoverflow.com/questions/34190016
复制相似问题