Foxtable(狐表) → 用户栏目 → 专家坐堂 → 再问Web数据源的问题


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

主题：再问Web数据源的问题
帅哥哟，离线，有人找我吗？
有点蓝
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

出现什么错误提示？

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


加好友 发短信
等级：二尾狐 帖子：551 积分：4027 威望：0 精华：0 注册：2018/1/3 16:03:00 		  发帖心情 Post By：2023/9/10 21:32:00 [只看该作者]

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


加好友 发短信
等级：二尾狐 帖子：551 积分：4027 威望：0 精华：0 注册：2018/1/3 16:03:00 		  发帖心情 Post By：2023/9/10 21:36:00 [只看该作者]

如将

sb.AppendLine("http://b.Value/DataServer.htm")代码中b.Value改为实际的外网IP地址，就提示：数据源可以正常连通
 回到顶部
帅哥哟，离线，有人找我吗？
13315253800
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：551 积分：4027 威望：0 精华：0 注册：2018/1/3 16:03:00 		  发帖心情 Post By：2023/9/10 21:42:00 [只看该作者]

改成  sb.AppendLine("http://b/DataServer.htm")   错误提示一样

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


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

这种情况是服务不存在或者无法访问，建议在服务端添加一个验证服务比如

Select Case e.Path
    Case "DataServer.htm"
        e.AsDataServer("Orders")
    Case "valid.htm"
        e.WriteString("OK")
End Select

然后客户端这样判断
Dim hc As New HttpClient("http://b.Value/valid.htm")
hc.SkipError = True
hc.TimeOut = 2
Dim s As String = hc.GetData()
If s = "OK" Then
    MessageBox.show("服务正常")

Dim b As WinForm.TextBox

b = e.Form.Controls("TextBox1")

Dim sb As New StringBuilder

Dim Err As String

sb.AppendLine("http://b.Value/DataServer.htm")

sb.AppendLine("-FormData-")

sb.AppendLine("UserName:张三")

sb.AppendLine("Password:888")

If Connections.TryConnect(sb.Tostring, Err) = False Then

    MessageBox.Show(err, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error)

Else

    MessageBox.Show("数据源可以正常连通!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

Else
    MessageBox.show("服务不正常") 
End If
[此贴子已经被作者于2023/9/10 21:49:46编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
13315253800
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：551 积分：4027 威望：0 精华：0 注册：2018/1/3 16:03:00 		  发帖心情 Post By：2023/9/11 10:23:00 [只看该作者]

蓝老师，按您的指导修改了服务端代码，也修改了客户端检测窗口按钮代码，点击后提示“服务不正常”，但我在客户端通过服务端能预览到SQL数据库的连接的表，且能增加数据表到客户端，说明已经正常连接了服务端，就是检测提示“服务不正常”，代码还可以修改吗，请指导

 回到顶部
总数 16 上一页 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.04297 秒, 4 次数据查询