[求助]如何访问带端口的网址和下载文件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何访问带端口的网址和下载文件

共有4798人关注过本帖树形打印复制链接主题：[求助]如何访问带端口的网址和下载文件

chnfo

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

[求助]如何访问带端口的网址和下载文件 发帖心情

Post By：2020/10/15 9:37:00 [显示全部帖子]

If TryConnectHost(“网址”） 1、网址不能加http://吧？ 2、如果是x.com:7080，加了端口号，似乎也不可以。如果要访问带端口号的怎么办？ Dim thx as new HttpClient（“http://x.com:7080/y/CSU.txt”)，虽然不报错，但没有信息读出来另外，没有设置httpserver，httpclient能直接读取网站文件吗？，比加thx.getinfomation

[此贴子已经被作者于2020/10/15 9:40:25编辑过]

chnfo

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 10:59:00 [显示全部帖子]

试了一下，为什么down下来的都是空白啊。文本文件是空的，压缩包大小1K，打开提示损坏。示例中的network.downloadfile(“http://www.table.com/download/release.rar”,”指定目录/release.rar”)，运行结果是空的

chnfo

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 11:08:00 [显示全部帖子]

我运行帮助“DownloadFile”里的示例，下载的文件也是空的。

截图中的浏览器在手机上都能正常打开，里面是有内容的

try

Dim s As String = "http://114.55.92.178:7029/wbs/profile/helloworld.txt"

Dim request = System.Net.WebRequest.Create(s)

request.Method = "Head"

Dim response = request.GetResponse()

response.Close()

output.Show("文件存在:" & response.StatusCode)

Dim htc As new HttpClient(s)

htc.GetInformation()

htc.Close() '必须执行Close方法关闭连接

OutPut.Show("更新日期:" & htc.LastModified)

OutPut.Show("状态码:" & htc.StatusCode)

OutPut.Show("状态描述:" & htc.StatusDescription)

OutPut.Show("内容类型:" & htc.ResponseContentType)

OutPut.Show("内容长度:" & htc.ResponseContentLength)

Network.DownloadFile(s, "D:\CSDown\helloworld.txt")

Output.Show("下载文件成功")

catch ex As exception

output.show("文件不存在:" & ex.message)

End try

此主题相关图片如下：远程下载文件出错.png

[此贴子已经被作者于2020/10/15 11:08:58编辑过]

chnfo

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 11:52:00 [显示全部帖子]

大小没问题的。一个文本文件而已，都没30个字节。版主下载文件里面有内容？里面是三行helloworld123。我用手机可以看到，代码下载就是空文件

[此贴子已经被作者于2020/10/15 11:54:32编辑过]

chnfo

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 12:04:00 [显示全部帖子]

，我运行帮助“DownloadFile”里的示例，下载的文件也是空的

chnfo

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 13:49:00 [显示全部帖子]

我测试http://www.foxtable.com/download/release.rar也是这样，运行显示有这个文件，但下载下来是空的

chnfo

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 14:52:00 [显示全部帖子]

服务端貌似也没设什么啊。一般来说是什么原因？

chnfo

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/15 19:31:00 [显示全部帖子]

高级开发指南的单纯获取内容信息，里面从狐表官方服务器获取http://www.foxtable.com/bbs/images/foxtable.gif的信息

OutPut.Show("更新日期:" & htc.LastModified) 显示的结果是：更新日期:2008-07-16 11:44:23

这里应当是服务器里的文件的最后一次更新日期

Dim htc As New HttpClient("http://120.79.133.198:8090/ymj/app/downloadAppFile?appKey=wbs&platform=android&version=1.0.0")

htc.GetInformation()

htc.Close() '必须执行Close方法关闭连接

OutPut.Show("更新日期:" & htc.LastModified) ‘－－－－－为什么这里运行的显示更新日期是电脑当前的时间呢？，是方法不对还是怎么的？我要获取服务器上的这个文件的最后一次的修改日期要怎么做？

OutPut.Show("状态码:" & htc.StatusCode)

OutPut.Show("状态描述:" & htc.StatusDescription)

OutPut.Show("内容类型:" & htc.ResponseContentType)

OutPut.Show("内容长度:" & htc.ResponseContentLength)

For Each key As String In htc.ResponseHeaders.Keys '显示服务器返回的头部信息

OutPut.Show(Key & ":" & htc.ResponseHeaders(key))

[此贴子已经被作者于2020/10/15 19:31:37编辑过]

chnfo

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/17 8:58:00 [显示全部帖子]

再问一下：不解压zip压缩包，能获取压缩包里的文件信息吗？比如文件的大小、最后修改时间

chnfo

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2290 积分：18812 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2020/10/17 10:36:00 [显示全部帖子]

GetInformation获取时间，官方咋说啊。如果是ftp，是不是也同样有这个问题？

下一主题 >> << 上一主题

总数 12 1 2 下一页

主题：[求助]如何访问带端口的网址和下载文件