云服务器如何接收用户上传的文件？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 云服务器如何接收用户上传的文件？

共有4415人关注过本帖树形打印复制链接主题：云服务器如何接收用户上传的文件？

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/1/4 14:35:00 [显示全部帖子]

就是1楼的用法，有什么问题？http://www.foxtable.com/mobilehelp/topics/0060.htm

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/1/4 20:11:00 [显示全部帖子]

保存为二进制数据库数据？先保存到硬盘

Dim cmd As new SQLCommand

cmd.C

cmd.CommandText = "Insert Into test (图片) Values(?)"

Dim ImageByte() As Byte = System.IO.File.ReadAllBytes("D:\test.JPG") '读取文件流,并将读到的二进制数据放入数组ImageByte中,

cmd.Parameters.Add("@图片", ImageByte)

cmd.ExecuteNonQuery

如果只是保存文件名

cmd.Parameters.Add("@照片", string.join(vbcrlf,xsphoto.toarray))

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/16 9:03:00 [显示全部帖子]

建议使用日期命名

e.SaveFile(key, fln, ProjectPath & "Attachments\照片\" & format(date.now，"yyyyMMddHHmmssfffff") & fln)

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/16 11:30:00 [显示全部帖子]

比如

Dim xsphoto As List(of String)

For Each key As String In e.Files.Keys

If key = "up1" Then

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

dim filename as string = format(date.now，"yyyyMMddHHmmssfffff") & fln

e.SaveFile(key, fln, ProjectPath & "Attachments\照片\" & filename )

xsphoto = 照片\" & filename

End If

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/16 13:41:00 [显示全部帖子]

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

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/16 16:04:00 [显示全部帖子]

我们知道，图片列的一个单元格可能包括多个图片，上述的引用格式打印的是第一个图片。
我们可以指定打印第几个图片，方法是在列名后面加上“&X”，X是一个整数，表示要打印的图片的位置，从0开始编号。

例如：

[&照片&1,3,3,150,159]

表示打印第二个图片。

再例如打印第三个图片：

[&照片&2,3,3,150,159]

有点蓝

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/25 8:47:00 [显示全部帖子]

Dim xsphoto As List(of String)

For Each key As String In e.Files.Keys

If key = "up1" Then

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

dim frr() as string = fln.split(".")

dim filename as string = format(date.now，"yyyyMMddHHmmssfffff") & "." & frr(1)

e.SaveFile(key, fln, ProjectPath & "Attachments\照片\" & filename )

xsphoto = 照片\" & filename

End If

有点蓝

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/27 17:21:00 [显示全部帖子]

动态提取指的什么？

有点蓝

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/27 17:39:00 [显示全部帖子]

本来就应该这样的呀。根据编号获取对应的图片，然后给uploader就可以了：http://www.foxtable.com/mobilehelp/topics/0091.htm

下一主题 >> << 上一主题

主题：云服务器如何接收用户上传的文件？