以下是引用刘林在2017/8/10 14:39:00的发言：
.Incremental = False
老师我找了，将这句设为TRUE就压缩了，但这句是是否允许重复选择文件或连续拍照,因为我想只传一张，改了就不能压缩，这是什么原因，怎么办？
方法一，你可以用js限制不能添加多个图片
//var v1 = document.getElementById("up128").files.length;
var v1 = document.getElementById("up128_thumbnails").getElementsByTagName("li").length;
alert(v1);
If(v1 > 1){
return false;
}
return true;
方法二，你可以不使用压缩上传，文件上传后，在保存的时候，重新修改图片尺寸，参考代码
Dim file As String = "g:\test.jpg"
Dim img As image = getImage(file)
Dim bmp As bitmap
bmp = new bitmap(img, 100, 100 * (img.height / img.width))
bmp.save("g:\test123456789.jpg")
bmp.Dispose
加好友 
发短信
Post By：2017/7/28 18:32:00 [显示全部帖子]
