Question

VB+Access 如何实现文件上传

最近在用vb6.0和access结合设计一个信息管理系统，现在碰到一个问题：学生要向老师提交作业，作业可能是不同类型的文件（.doc,.txt,.exe等）而且大小不一，怎样可以把作业上传，以供老师下载批改？
ps:是不是可以在数据库里保存文件的路径，老师再把路径调出来？具体我不是很懂，希望各位高手给个源代码，谢谢~~~
Private Sub Command2_Click()
On Error GoTo errhandler
CommonDialog1.Filter = "Word Files (*.doc)|*.doc|PowerPoint (*.ppt)|*.ppt|Text Files (*.txt)|*.txt|All Files (*.*)|*.*" '文件类型
CommonDialog1.InitDir = App.Path '"c:\vbdemos\fileio"打开系统默认的路径中
CommonDialog1.Action = 1 '用于读
FileNameText.Text = CommonDialog1.FileName

Exit Sub
errhandler:
MsgBox "打开文件错误"
Exit Sub
End Sub
以上我只实现找到文件路径，但是不能实现上传，希望有高手提供上传的源代码，谢谢

Answer 1

至少你们应该有个服务器吧