[讨论]Weui的BUG - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

实现了文件类型的选择，上传不了文件！

Case "uploader.htm"

wb.InsertHTML("<div class='weui_cell weui_cell_warn'><div class='weui_cell'><div class='weui_cell_bd weui_cell_primary'>")

wb.InsertHTML("<div class='weui_uploader'><div class='weui_uploader_hd weui_cell'><div class='weui_cell_bd weui_cell_primary'>文件上传</div></div>")

wb.InsertHTML("<div class='weui_uploader_bd'><div class='weui_uploader_input_wrp'>")

wb.InsertHTML("<input class='weui_uploader_input' Type='file' accept='")

wb.InsertHTML("video/mp4") ‘在这儿修改你希望上传的文件类型’

wb.InsertHTML("' multiple=''></div></div></div></div></div></div>")

wb.AddForm("","form1","accept.htm")

With wb.AddButtonGroup("form1","btg1",False)

.Add("btn1", "提交", "submit")

.Add("btn1", "取消", "button","index.htm")

End With

e.WriteString(wb.Build)

Case "accept.htm"

For Each key As String In e.Files.Keys

sb.AppendLine(key & " 上传" & e.Files(key).Count & "个文件,分别是:</br>")

For Each fl2 As String In e.Files(key)

sb.AppendLine(fl2 & "<br>")

e.SaveFile(key,fl2,"d:\web\uploadfiles\" & fl2) '保存接收到的文件

sb.AppendLine("</br>")

sb.AppendLine("以上文件服务器已正确接收并保存!")

e.WriteString(sb.ToString)

报错如下：

weui.me.js:61 Uncaught TypeError: Cannot set property 'innerHTML' of null

at HTMLInputElement.previewFile (weui.me.js:61)

previewFile @ weui.me.js:61

主题：[讨论]Weui的BUG