以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  使用Uploader浏览图片时引用网络URL地址的图片而不是本地图片  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127848)
--  作者：cnhh
--  发布时间：2018/11/23 14:30:00
--  使用Uploader浏览图片时引用网络URL地址的图片而不是本地图片
 如题：
能否使用以下方式浏览图片?
Dim Url as string="http://www.aaa.com/001.jpg"
.AddImage(Url)
--  作者：有点甜
--  发布时间：2018/11/23 14:43:00
--  

可以，比如

 

Select Case e.Path
    Case "test.htm", ""
                Dim wb As New weui
        wb.AddForm("","form1","test.htm")
        With wb.AddInputGroup("form1","ipg1","客户资料")
            .AddInput("姓名","姓名","text").value = "舒淇"
            .AddInput("地点","地点","text").Value = "蒙古草原"
            .AddInput("日期","日期","date").value = #10/12/2012#
            With .AddUploader("up1","",True)
                .AllowAdd = False \'关闭文件上传功能
                .AddImage("./images/001.jpg")
                .AddImage("http://www.foxtable.com/mobilehelp/scr/0120.png")
            End With
        End With
        e.WriteString(wb.Build) \'生成网页
End Select