主题：关于移动版从服务器下载文件的请教

如题

 

我在表单上有一个 TEXT 为：abc 的按钮，想实现 按这个按钮时，就能从服务器的批定目录下载文件 abc.pdf ,下载完成后，就打开这个文件。

 

这个要如何实现？

有点甜老师

 

认真看了你的例子，还是没懂。

 

Dim hc As New HttpClient("http://127.0.0.1/download.htm")
If hc.GetFile("c:\data\123.jpg") Then
    MessageBox.show("文件下载成功","提示")
Else
    MessageBox.show("文件下载失败","提示")
End If

 

用这个方法可以成功，但这个方法只能用在电脑端，手机端怎么弄？

有点蓝老师

今天看了一天，都搞的不太懂。太菜了。

abc.pdf 文件不用写目录的吗？

wb.InsertHTML("<div ><button onclick=javascrtpt:window.location.href='abc.pdf'>abc</button></div>")

 

 

我下载的都是PDF文件，有方法可以下载并用WPS打开吗？

老师

 

我用这个方法：

 

Dim hc As New HttpClient("http://mt.gzhito.com.cn/download.htm")
 If hc.GetFile("D:\1234.pdf") Then
     MessageBox.show("文件下载成功","提示")
Else
     MessageBox.show("文件下载失败","提示")
End  If

 

可以成功下下载 到我想要的 PDF,但这个是在电脑端里实际的，如果在要微信企业号中的一个按纽中单击实现要怎么写代码？

求代码! 多谢！

有点甜老师

 

多谢！终于试出来了，也明白了好多开发指南上的东西。多谢！

 

 

还有个问题：

 

用 代码：wb.InsertHTML("<div ><button onclick=javascrtpt:window.location.href='/COA/705166.pdf'>abc</button></div>") 生成的按钮没有问题，可以下载文件。

 

但是非常不好看。我想把它改成 weui中的按钮，然后把按钮的 .Attribute 设好。代码 如下：

 

 wb.AddForm("","form1","test.htm")
         With wb.AddButtonGroup("form1","btg1",True)  '垂直排列
            .Add("btn1", "按钮").Attribute = "onclick= javascrtpt:window.location.href='/COA/705166.pdf'"
        
        End With

不会报错，但是按了没反应。是哪里写错了吗？这个思路可以做到吗？求代码？多谢！

搞定了，把type 设成button 就可以了。再次感谢！

老师

 

为什么一样的代码，把代码改为：  .Add("btn1", "按钮").Attribute = "onclick= javascrtpt:window.location.href='/COA/705166.jpg'"

 

就会没有反应，服务器上明明也有这个文件的？

老师，

 

用这个代码，还是没反应，也不报错。怎么回事？