主题：下载XX.apk并自动运行安装

请问老师，我用hbulider打了个app测试，但用户首次只能给他网址，我的想用户在首次用网页打开首页时有一个下载app按键，下载服务器上XX.apk并在下载完后自动运行安装，请问这个该怎么做，看了下网上的下载方法，要么没反应，要么说是非法文件等。请老师指导个办法

浏览器那里下载后，一般会自动帮你打开的，需要用户自己点一下同意然后安装。（但如果是微信里面的浏览器，屏蔽了这个功能，右上角点击在浏览器打开）

下载app很简单啊。只需要把文件放在你网站里面，点击跳转过去就行啊。

怎么写这个，我找了几个测试都没行呢

方法一：比如你apk文件放在web文件夹下。

 

1、头文件那里，把apk后缀加上

 

Dim fl As String = "d:\web\" & e.path
If filesys.FileExists(fl)
    Dim idx As Integer = fl.LastIndexOf(".")
    Dim ext As String  = fl.SubString(idx)
    Select Case ext
        Case ".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".html",".htm",".zip",".rar",".apk"
            e.WriteFile(fl)
            Return '这里必须返回
    End Select
End If

 

2、直接访问地址 http://127.0.0.1/xxx.apk 即可下载文件

 

方法二：比如你apk文件放在web文件夹下，用js下载。

 

1、头文件那里，把apk后缀加上

 

Dim fl As String = "d:\web\" & e.path
If filesys.FileExists(fl)
    Dim idx As Integer = fl.LastIndexOf(".")
    Dim ext As String  = fl.SubString(idx)
    Select Case ext
        Case ".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".html",".htm",".zip",".rar",".apk"
            e.WriteFile(fl)
            Return '这里必须返回
    End Select
End If

 

2、嵌入一个ifarme，然后写代码

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=122742&replyID=826147&skin=1

 

可能主要是没有加“.apk”测试了几种都没反应，我试一下看，谢谢，另外ft是否可以改进不要头文件里的扩展名指定。

 

参考 http://www.foxtable.com/mobilehelp/scr/0276.htm

 

1、直接在浏览器那里访问 http://47.92.95.136:8080/1.apk

 

2、你httprequest那里加入msgbox，看是否执行到了e.writefile那里

1、在浏器中试了就直接跳到我的登录页