主题：使用Uploader浏览图片时引用网络URL地址的图片而不是本地图片

可以，比如

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