主题：在WeUI实例中，怎么打开并查看已经上传的图片

如下所示：

If e.PostValues.count = 0 Then

    Dim dr As DataRow = DataTables("item99").SQLFind("[_Identify]=" & PrimaryKey)

    If dr IsNot Nothing Then

        wb.AddForm("","form1","vimg1.htm?od01=1")

        With wb.AddInputGroup("form1","ipg1","刀具图片查阅")

            .AddHidenValue("ibh00","000")  '一个隐臧列, 主要用于触发是否有输入动作的判断语句

            With  .Addinput("ibh01","类别","text")

                .value=dr("ibh01")

                .readonly=True

            End With

            With   .Addinput("imc01","名称","text")

                .Value=dr("imc01")

                .readonly=True

            End With

            With .Addinput("igg01","规格","text")

                .Value=dr("igg01")

                .Readonly=True

            End With

            With .AddUploader("img01","照片",True)

                .AllowDelete = True '允许删除

                .AllowAdd=False '关闭上传功能

                .Incremental = True '允许 重复选择文件或连续拍照

        End With

            .add("btn1","返回","",PageURL).kind=1

        End With

    End If

    e.WriteString(wb.Build) '生成网页

End If