[浏览完整版]
标题：请老大帮忙看看关联外部数据的问题，谢谢！（已解决）
1楼
xiaoqiwei 发表于：2011/6/10 18:57:00我已经设置了与外置数据库关联，想实现点击查询按钮就弹出窗口显示相关关联的信息，但是总是只显示表第一行的数据，不会匹配，请问如何实现，
比如：
我查询窗口手机号码输入框中输入：13588135888 ，点击查询就打开“会员信息”窗口，其内容全部显示与1358813588匹配的内容。
问题2：我点击关闭窗口就弹出错误提示，请老大帮忙如何解决和实现！谢谢！
不好意思，密码已经修改为：888
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新建文件夹.rar |
[此贴子已经被作者于2011-6-12 13:12:37编辑过]
2楼
xiaoqiwei 发表于：2011/6/11 1:09:00老大，请帮忙看看，谢谢
3楼
blackzhu 发表于：2011/6/11 7:28:00密码都不给的?
4楼
xiaoqiwei 发表于：2011/6/11 13:11:00以下是引用blackzhu在2011-6-11 7:28:00的发言：
密码都不给的?
密码都不给的?
不好意思，密码已经修改为：888
5楼
blackzhu 发表于：2011/6/11 13:43:00Else
dr = DataTables("hyuser").Find("手机号码 = '" & shouji & "' ")
If dr Is Nothing Then
e.Form.Controls("提示1").Text = "该手机号码/卡号不存在"
Else
Forms("会员信息").Open()
Forms("会员信息").Controls("TextBox1").Value = dr("手机号码")
Tables("hyuser").Filter = "[手机号码]='" & shouji & "'"
加一行代码,你这个少一个筛选或者加载的代码.当然只会默认第一条数据
6楼
xiaoqiwei 发表于：2011/6/11 14:48:00以下是引用blackzhu在2011-6-11 13:43:00的发言：
Else
dr = DataTables("hyuser").Find("手机号码 = '" & shouji & "' ")
If dr Is Nothing Then
e.Form.Controls("提示1").Text = "该手机号码/卡号不存在"
Else
Forms("会员信息").Open()
Forms("会员信息").Controls("TextBox1").Value = dr("手机号码")
Tables("hyuser").Filter = "[手机号码]='" & shouji & "'"
加一行代码,你这个少一个筛选或者加载的代码.当然只会默认第一条数据
测试了不行啊！加上你说的那句代码后输入要查询的号码是“13588135888”，还是显示第一行的“13800138000”啊！还有第二个问题：我点击关闭窗口就弹出错误提示，请老大帮忙如何解决和实现！谢谢！
7楼
blackzhu 发表于：2011/6/11 15:39:00怎么可能呢?
此主题相关图片如下：tm截图未命名-3.jpg
此主题相关图片如下：tm截图未命名-4.jpg
此主题相关图片如下：tm截图未命名-3.jpg此主题相关图片如下：tm截图未命名-4.jpg8楼
blackzhu 发表于：2011/6/11 15:41:00第一个手机号码输入是测试会员,第二个手机号码输入会员名是ceshi2
9楼
blackzhu 发表于：2011/6/11 15:50:00
10楼
xiaoqiwei 发表于：2011/6/11 16:12:00我将“会员信息”窗口类型设为“独立”就可以了！不过关闭“会员信息”窗口后，再关闭“查询窗口”就弹出如下图的错误
此主题相关图片如下：未命名-1.jpg