以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  uploader上传图片后,如何验证图片数量  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=97806)

--  作者:zhangjian222200
--  发布时间:2017/3/18 18:02:00
--  uploader上传图片后,如何验证图片数量
uploader上传图片
1.如何验证图片已经上传
2.如何验证图片数量<10


例如:移动开发指南:使用AJAX-------再谈表单验证,其中的例子,如何验证图片上传数量
[此贴子已经被作者于2017/3/18 19:45:24编辑过]

--  作者:狐狸爸爸
--  发布时间:2017/3/20 7:42:00
--  
uploader组件有个files属性,其length属性返回选择文件的个数,默认使用
uploader组件也有个Files属性,其length属性返回选择文件的个数,在Incremental属性为True的时候使用。

注意严格区分大小写。

--  作者:zhangjian222200
--  发布时间:2017/3/20 11:20:00
--  
回楼上,这2个属性可以配合TopTips使用吗?

例如:当服务器照片数量小于1,提示上传
[此贴子已经被作者于2017/3/20 11:24:44编辑过]

--  作者:狐狸爸爸
--  发布时间:2017/3/20 12:08:00
--  
可以,用函数:


showTopTips

前面的例子,我们用show方法显示TopTips,如果显示内容是变化的,可以改用showTopTips方法。
showTopTips是是我们在文件"weui.me.js"定义的一个函数,专门用于显示Toptips,而且可以动态指定显示内容,语法:

showTopTips(id,text,msec)

idToptips的ID
text指定要显示的内容
msec指定显示时长,整数型,范围为毫秒

--  作者:zhangjian222200
--  发布时间:2017/3/20 14:02:00
--  
1.当照片数量小于4,提示上传,代码保存提示:files不是wUploader成员
2.showtoptips,缺少应用实例,不知道怎么使用
Dim e As RequestEventArgs = args(0)                            \'注册第7页,上传照片
Select Case e.Path
    Case "images.htm"
        Dim wb As New weui
        wb.AddForm("","form1","images.htm")
        With wb.AddInputGroup("form1","ipg22","生活照(选择2张以上靓照)") \'带图片浏览的文件上传
            With .AddUploader("up2","",True) \'True表示允许一次上传多个文件
                If .files.length < 4 Then
                    showTopTips("shenghuozhao","请上传生活照",2500)
                End If
            End With
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "提交", "","/success.htm")
        End With
        e.WriteString(wb.Build) \'生成网页
End Select
[此贴子已经被作者于2017/3/20 14:05:26编辑过]

--  作者:有点蓝
--  发布时间:2017/3/20 15:13:00
--  
这种验证应该在客户端验证,就是在js中调用。2楼的2个属性是在js中使用的
--  作者:zhangjian222200
--  发布时间:2017/3/20 15:39:00
--  
如下操作,还请指导
内部函数这样写:
Dim e As RequestEventArgs = args(0)                            \'注册第7页,上传照片
Select Case e.Path
    Case "images.htm"
        Dim wb As New weui
      wb.showTopTips("toptip1","请上传1张照片",2500)
      wb.showTopTips("toptip2","请最少上传4张照片",2500)
        wb.AddForm("","form1","images.htm").Attribute = "" \'调用函数
        With wb.AddInputGroup("form1","ipg1","文件上传"\'文件上传(1个)
            .AddUploader("up1","")
        End With
        With wb.AddInputGroup("form1","ipg22",
"
文件上传"\'带图片浏览的文件上传(最少4个)
            .AddUploader("up4",
"
图片",True\'True表示允许一次上传多个文件
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "提交", "","/success.htm")
        End With
      wb.AppendHTML("<script src=\'./lib/valid.js\'></script>"\'引入脚本文件
        e.WriteString(wb.Build) \'生成网页
End Select

js这样写:

1、在"d:\\web\\lib"新建一个文本文件,文件名为"valid.js",文件内容为:

function valid(){
   var v1 = document.getElementById("up1").
files.length;
   var v2 = document.getElementById("up4").
files.length;
   if v1 < 1{return true}
   show("","toptip1",2000);
   return false;

   elseif v4 < 4{return true}

   show("","toptip4",2000);
   return false;

}

[此贴子已经被作者于2017/3/20 15:44:10编辑过]

--  作者:有点色
--  发布时间:2017/3/20 15:56:00
--  

var v1 = document.getElementById("up1").files.length;
var v2 = document.getElementById("up4").files.length;
alert(v1);
alert(v2);
If(v1 < 1){
    show("","toptip1",2000);
    Return false;
}
If(v4 < 4){
    show("","toptip4",2000);
    Return false;
}
return true

 


--  作者:zhangjian222200
--  发布时间:2017/3/21 9:30:00
--  
网页内部函数images,保存提示错误:showtoptips不是wui成员

代码见记事本
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:31928611.txt




[此贴子已经被作者于2017/3/21 9:37:43编辑过]

--  作者:有点色
--  发布时间:2017/3/21 11:31:00
--  

1、这个showtoptips是js的代码

 

2、http://www.foxtable.com/mobilehelp/scr/0104.htm