Foxtable(狐表)用户栏目专家坐堂 → [求助]通过客户端登录,改为客户端和移动端都可登录


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

主题:[求助]通过客户端登录,改为客户端和移动端都可登录

帅哥哟,离线,有人找我吗?
bzqlyj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
[求助]通过客户端登录,改为客户端和移动端都可登录  发帖心情 Post By:2023/5/4 12:37:00 [显示全部帖子]

1、在服务端项目的HttpRequest事件中设置代码:

Dim Verified As Boolean
If
e.Cookies.ContainsKey("username") AndAlso e.Cookies.ContainsKey("password") Then
   
'实际开发的时候,请改为根据用户表验证身份
   
Dim username As String  = e.Cookies("username")
    Dim password As String  = e.Cookies("password")
    If username =
"
张三" AndAlso password = "888" Then
        Verified  = True
    End
If

End
If
If
Verified = False Then
    e.AppendCookie("error",
"
用户身份验证失败!") '通过Cookie返回错误信息.
    Return
End
If
Select
Case e.Path
    Case "gettime.htm"
        e.WriteString(Date.now)

End
Select

2、在客户端项目的命令窗口运行以下代码,可以获取服务器时间:

Dim hc As New HttpClient("http://127.0.0.1/gettime.htm")
hc
.sCookies.Add("username","张三")
hc
.sCookies.Add("password","888")


 回到顶部
帅哥哟,离线,有人找我吗?
bzqlyj
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
回复:(有点蓝)在网页里使用要设计一个登录页面:ht...  发帖心情 Post By:2023/5/4 15:07:00 [显示全部帖子]

这样做了,移动端找不到服务器

 回到顶部
帅哥哟,离线,有人找我吗?
bzqlyj
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
回复:(有点蓝)服务端要通过内网IP启动服务,手机端...  发帖心情 Post By:2023/5/4 15:27:00 [显示全部帖子]

都是通过外网IP,同一个网页

 回到顶部
帅哥哟,离线,有人找我吗?
bzqlyj
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
回复:(有点蓝)服务器是云服还是自己的服务器?  发帖心情 Post By:2023/5/4 16:58:00 [显示全部帖子]

自己的

 回到顶部
帅哥哟,离线,有人找我吗?
bzqlyj
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
回复:(有点蓝)有做路由映射?外网有访问服务器?  发帖心情 Post By:2023/5/4 17:28:00 [显示全部帖子]

服务端在服务器上运行,客户端通过外网可以访问,移动端不能访问,路由映射是什么

 回到顶部
帅哥哟,离线,有人找我吗?
bzqlyj
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:271 积分:2246 威望:0 精华:0 注册:2020/9/28 14:53:00
回复:(有点蓝)客户端通过外网可以访问,移动端在浏...  发帖心情 Post By:2023/5/5 9:11:00 [显示全部帖子]

msgbox(1)能弹出
登录页面不能生成
提示
foxtable web server has started(error 404).

 回到顶部