Foxtable(狐表) → 用户栏目 → 专家坐堂 → 小声的问下内部数据源如何变为access的外部数据源呢


  共有3346人关注过本帖树形打印复制链接

主题：小声的问下内部数据源如何变为access的外部数据源呢
帅哥哟，离线，有人找我吗？
yangjing
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		小声的问下内部数据源如何变为access的外部数据源呢  发帖心情 Post By：2017/7/16 23:42:00 [显示全部帖子]

小声的问下内部数据源如何变为access的外部数据源呢
内部表里已经有有数据了，请问怎么办呢？
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/7/18 10:18:00 [显示全部帖子]

谢谢您，已经弄好了，但是发布后需要安装到别的机器上总是要重新定位数据库，请问这怎么解决，谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/7/30 13:02:00 [显示全部帖子]

老师您好，我已经购买了阿里云服务器，也安装好sql2008了，请问如何连接到阿里云上呢？
谢谢
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/3 20:31:00 [显示全部帖子]

搞定了
[此贴子已经被作者于2017/8/3 21:16:14编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/3 22:31:00 [显示全部帖子]

请问下版主，我现在有个登录窗口，如何根据下表中的姓名和手机号验证通过后进入系统呢？
图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170803222837.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170803222855.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/4 18:33:00 [显示全部帖子]

谢谢您，我现在在代码里添加了个全局变量来传递用户名，在通过登录窗口后在下一个窗口加载的时候筛选符合登录的用户的数据，请教下问题在哪里


图片点击可在新窗口打开查看此主题相关图片如下：222.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：333.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：111.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2017/8/4 18:34:29编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/4 22:47:00 [显示全部帖子]

小声的问下为何出现这错误呢？

Dim UserName As String = e.Form.Controls("textbox1").Value
vars("yhm") = e.Form.Controls("textbox1").Value
Dim dr As DataRow
If UserName = "" Then
    Messagebox.show("请选择用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If
dr = DataTables("基本信息").SQLFind("[编号] = '" & UserName & "'") 
If dr Is Nothing Then
    Messagebox.show("此用户不存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If
If e.Form.Controls("textbox2").Value = dr("手机号") Then
    UserName = UserName
    e.Form.Close
    forms("数据窗口").open    
    

Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If


图片点击可在新窗口打开查看此主题相关图片如下：qq截.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/4 23:03:00 [显示全部帖子]

另外想请教下您，是这样筛选吗？

Tables("测试数据").Filter = "[编号] ='" & vars("yhm")
 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/4 23:23:00 [显示全部帖子]

谢谢您，请问13楼的错误是怎么来的，百思不得其解，原来好像是正常的 ，后来没怎么动就报错了。。

 回到顶部
帅哥哟，离线，有人找我吗？
yangjing
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：285 积分：2254 威望：0 精华：0 注册：2011/8/16 10:11:00 		  发帖心情 Post By：2017/8/4 23:27:00 [显示全部帖子]

代码我放在窗体加载前运行好像不起作用，就是登陆完成后，调出下一个窗体的时候执行


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170804232524.jpg
图片点击可在新窗口打开查看
 回到顶部
总数 15 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 5 次数据查询