专家坐堂-uploader上传图片后，如何验证图片数量Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  uploader上传图片后，如何验证图片数量  (http://foxtable.net/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)
id Toptips的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