Foxtable(狐表) → 用户栏目 → 专家坐堂 → IP是不是可以不录入？


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

主题：IP是不是可以不录入？
帅哥哟，离线，有人找我吗？
lin98
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1360 积分：9034 威望：0 精华：0 注册：2020/11/4 22:15:00 		IP是不是可以不录入？  发帖心情 Post By：2024/7/23 9:29:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：ip问题.png
图片点击可在新窗口打开查看
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/23 9:31:00 [只看该作者]

2个完全不同的功能，没有任何冲突。

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


加好友 发短信
等级：六尾狐 帖子：1360 积分：9034 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/7/23 10:39:00 [只看该作者]


Forms("启动服务器窗口").Open()

Forms("用户登录窗口").Open()
If _UserName = "" Then
    Syscmd.Project.Exit()
    Return '
End If

执行后，有闪一下，这是什么？速度好象有点慢
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/23 10:58:00 [只看该作者]

您自己才知道闪了什么东西。速度可能加载了太多的数据把。另外其它逻辑应该在登录成功之后处理，而不是登录之前

Forms("用户登录窗口").Open()
If _UserName = "" Then
    Syscmd.Project.Exit()
    Return '
End If
Forms("启动服务器窗口").Open()

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


加好友 发短信
等级：六尾狐 帖子：1360 积分：9034 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/7/23 15:38:00 [只看该作者]

UserLogging有用户申请登录时触发-ACCESS
Dim pts() As String = e.UserName.Split(".")
Dim dr1 As DataRow
dr1 = DataTables("用户").Find("部门 = '" & pts(0) & "' And 姓名 = '" & pts(1) & "'")
If dr1 Is Nothing Then '
    e.Message = "用户名错误!" '
    Return
End If
If dr1("密码") <> e.Password Then 
    e.Message = "登录密码错误!" '
    Return
End If
e.Success = True '

For Each dr2 As DataRow In DataTables("用户").DataRows
    Dim nm As String = dr2("部门") & "." & dr2("姓名")
    If nm <> e.UserName Then '
        e.Buddies.Add(nm)
    End If
Next

问题一：上面是ACCESS的狐表的ET模式，如何改为ADO模式？

我们之前介绍的编号方法，在多用户环境下会出现重复，用OpenQQ实现网络环境下的编号，可以解决编号，

问题二：在多用户环境避免出现重复下，其他的字段是也要用OpenQQ，比采购，采购主表和采购明细的所有字段，也要用用OpenQQ？还是只编号？


[此贴子已经被作者于2024/7/23 16:01:38编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/23 16:09:00 [只看该作者]

1、所有需要数据的地方都改为查询后台数据库获取

2、这个功能只是用来生成编号，和其它里列没有半毛钱的关系
 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1360 积分：9034 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/7/24 8:52:00 [只看该作者]


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


[此贴子已经被作者于2024/7/24 14:30:55编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/24 9:33:00 [只看该作者]

感觉连人家项目里的代码是干嘛的都基本没看懂，都是一些很基础的东西呀。连foxtable自己的东西都没理解，这样盲目的使用第三方的数据库，个人觉得，还不如去学习使用vs，或者java这些原生的编程模式。

1、项目里的实例都是以这个用户表（http://www.foxtable.com/webhelp/topics/2968.htm）为基础的，你的用户表结构如果和这个不一致，那么所有判断用户的地方都要改

2、您的项目只是加载了一个自己的用户表。但是加载后没有任何地方用到。前面都说了所有需要数据的地方都要改，那么类似【DataTables("用户").Find】这种用法就应该使用自己加载的用户表，比如【dt.Find】
 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1360 积分：9034 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/7/24 10:22:00 [只看该作者]

1.个人觉得，还不如去学习使用vs，或者java这些原生的编程模式。
没那个基础，有当然要学习，用vs，或者java涉及知识非常多。----希望老师，多理解
2.第三方的数据库,比狐表灵活，简单，狐表的ET,表修改，关联不友好，之前都提，没有比较好方法解决，当看ADO，觉得好一点点，业务逻辑相对简单些。
3.改了报错

此主题相关图片如下：qq11.png
按此在新窗口浏览图片
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/24 10:40:00 [只看该作者]

全部改为使用sql查询，比如：select * from 用户 where 部门='xxx' and 姓名='xxx'

第三方组件返回的都是.net的datatable，这个怎么用，得自己去看微软的帮助，这个其实和使用vs也差不多了:https://learn.microsoft.com/zh-cn/dotnet/api/system.data.datatable?view=netframework-4.0
 回到顶部
总数 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 秒, 4 次数据查询