AddUploader组件有无图片宽高属性,上传时判断文件宽度?
With wb.AddInputGroup("form1","ipg1","文件上传")
With .AddUploader("up128","文件",True)
.AllowDelete = True '允许删除
.Incremental = True '允许重复选择文件或连续拍照
.ScaleWidth = 600 '自动压缩图片宽度为600个像素,高度等比例压缩
End With
End With
如以上代码中,仅能赋值固定宽度,有无有相应属性对大于600像素的图片进行比例压缩,小于或等于的,则直接上传原文件?
如
if .宽度属性 > 600 then
.ScaleWidth = 600 '自动压缩图片宽度为600个像素,高度等比例压缩
end if
使用.ScaleWidth赋值会导致小于等于的图片,反而变大了,文件体积也变大了。
还是要通过其它方法,如改JS文件?
[此贴子已经被作者于2020/10/26 12:44:50编辑过]