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

8楼是直接把Dim e As RequestEventArgs = args(0)

Dim wb As New StringBuilder

If e.PostValues.Count = 0 Then

wb.AppendLine("<!DOCTYPE html>")

wb.AppendLine("<html><head>")

wb.AppendLine("<title>图片上上传</title>")

wb.AppendLine("<meta charset='utf-8'>")

wb.AppendLine("<meta name='viewport' c>")

wb.AppendLine("<link rel='stylesheet' href='./web/style.css'>")

wb.AppendLine("<meta http-equiv='Content-Type' c></head><body>")

'''

wb.AppendLine("<form action='tpsc.htm' enctype='multipart/form-data' method='post' id='form1' name='form1'>")

wb.AppendLine("<div class='crd-img'><div class='crd-title'><i class='fl'></i>")

wb.AppendLine("<span class='fl'>照片</span>")

wb.AppendLine("<span class='crd-notice fr'>上传须知</span></div>")

wb.AppendLine("<div class='crd-image'><div><div class='front'>")

wb.AppendLine("<input Type='file' id='front' name='front' accept='image/jpeg,image/png,image/gif' capture='camera'>")

wb.AppendLine("<img src='./web/upload.png' alt='' class='img_upload'>")

wb.AppendLine("<img src='./web/crd_front.jpg' alt='' id='front_img' ></div>")

wb.AppendLine("<div class='contrary'>")

wb.AppendLine("<input Type='file' id='contrary' name='contrary' accept='image/jpeg,image/png,image/gif' capture='camera'>")

wb.AppendLine("<img src='./web/upload.png' alt='' class='img_upload'>")

wb.AppendLine("<img src='./web/crd_contrary.jpg' alt='' id='contrary_img' accept='image/jpg,image/png,image/gif' capture='camera'>")

wb.AppendLine("</div></div></div>")

wb.AppendLine("<div class='crd-tip'><div><span>图片1</span></div>")

wb.AppendLine("<div><span>图片2</span></div>")

wb.AppendLine("</div></div></div>")

wb.AppendLine("<input Type='button' class='btn' name='Sumbit' id='Sumbit' value='确认上传' >")

wb.AppendLine("</form>")

wb.AppendLine("<script src='./web/jquery.min.js' type='text/javascript'></script>")

wb.AppendLine("<script src='./web/upimg.js' type='text/javascript'></script>")

wb.AppendLine("</body></html>")

e.WriteString(wb.ToString)

'''

Else

For Each key As String In e.Files.Keys

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

e.SaveFile(key,fl,ProjectPath & fl) '保存接收到的文件

e.WriteString("图片上传成功!")

End If 放进foxtable就行了吗？

和这个代码半毛钱的关系都没有

看懂js是怎么使用ajax提交文件，和服务端怎么接收的。

For Each key As String In e.Files.Keys

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

e.SaveFile(key,fl,ProjectPath & fl) '保存接收到的文件

e.WriteString("图片上传成功!")

function upload(){

var formData = new FormData();

//接口接收参数键值形式添加到formData中

formData.append("front",$("#front")[0].files[0]);

formData.append("contrary",$("#contrary")[0].files[0]);

$.ajax({

url:'http://127.0.0.1/tpsc.htm',//url地址

type:'post',

data: formData,

contentType: false,

processData: false,

success:function(res){

console.log(res);

}

})

}

这两个吗

请上传实例说明问题

BASE64转图片 - 站长工具 - 极速数据 (jisuapi.com) 老师我用这个是可以转为图片的，但是我用代码Dim str1 As String = e.postvalues("image")

Dim bs As Byte() = Convert.FromBase64String(str1)

Dim stream As System.IO.Stream = New System.IO.MemoryStream(bs)

Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(stream)

bmp.save("c:\123.jpg")

他报错,报错值为：.NET Framework 版本：4.0.30319.42000

Foxtable 版本：2021.10.16.1

错误所在事件：项目,HttpRequest

详细错误信息：

输入的不是有效的 Base-64 字符串，因为它包含非 Base-64 字符、两个以上的填充字符，或者填充字符间包含非法字符。

把字符串里的类型说明字符去掉，类似这种：【data:image/jpeg;base64,】

怎么用代码把data:image/jpeg;base64,/9j/4RIyRXhpZgAAT...............把那个去掉呢

http://www.foxtable.com/webhelp/topics/1338.htm

某字符串.replace("data:image/jpeg;base64,","")

老师下载例如新增一个上传图片到foxtable里面应该怎么放到进去当个新增目标的pictureview里面呢

而且我是pictureview是远程服务器上传的

主题：web