以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  小声的问下内部数据源如何变为access的外部数据源呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103774)

--  作者:yangjing
--  发布时间:2017/7/16 23:42:00
--  小声的问下内部数据源如何变为access的外部数据源呢
小声的问下内部数据源如何变为access的外部数据源呢
内部表里已经有有数据了,请问怎么办呢?

--  作者:新福星
--  发布时间:2017/7/17 5:32:00
--  


http://www.foxtable.com/webhelp/scr/2297.htm
[此贴子已经被作者于2017/7/17 5:33:39编辑过]

--  作者:有点甜
--  发布时间:2017/7/17 9:09:00
--  
以下是引用yangjing在2017/7/16 23:42:00的发言:
小声的问下内部数据源如何变为access的外部数据源呢
内部表里已经有有数据了,请问怎么办呢?

 

先备份好数据。

 

再重定向。

 

最后合并数据。

 

http://www.foxtable.com/webhelp/scr/2297.htm

 


--  作者:yangjing
--  发布时间:2017/7/18 10:18:00
--  
谢谢您,已经弄好了,但是发布后需要安装到别的机器上总是要重新定位数据库,请问这怎么解决,谢谢
--  作者:有点甜
--  发布时间:2017/7/18 10:20:00
--  
以下是引用yangjing在2017/7/18 10:18:00的发言:
谢谢您,已经弄好了,但是发布后需要安装到别的机器上总是要重新定位数据库,请问这怎么解决,谢谢

 

用相对路径

 

http://www.foxtable.com/webhelp/scr/0682.htm

 


--  作者:yangjing
--  发布时间:2017/7/30 13:02:00
--  
老师您好,我已经购买了阿里云服务器,也安装好sql2008了,请问如何连接到阿里云上呢?
谢谢


--  作者:有点甜
--  发布时间:2017/7/30 15:57:00
--  
以下是引用yangjing在2017/7/30 13:02:00的发言:
老师您好,我已经购买了阿里云服务器,也安装好sql2008了,请问如何连接到阿里云上呢?
谢谢

 

参考 http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=104284&skin=0

 

 


--  作者:yangjing
--  发布时间:2017/8/3 20:31:00
--  
搞定了
[此贴子已经被作者于2017/8/3 21:16:14编辑过]

--  作者:yangjing
--  发布时间:2017/8/3 22:31:00
--  
请问下版主,我现在有个登录窗口,如何根据下表中的姓名和手机号验证通过后进入系统呢?
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170803222837.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170803222855.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2017/8/3 23:18:00
--  

参考代码

 

Dim UserName As String = 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("手机号").Value = dr("手机号") Then
    _UserName = UserName
    e.Form.Close
Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If