我是一个初学者，想写一个的winform上传软件，不知道怎么写。
想达到的基本功能：
用这个软件只能上传小于 5MB的word文件，并将文件保存到指定的文件夹，SQL数据库记录保存路径、上传人名字、日期。
就像实现这么一个功能，在网上找了很多资 料 找不到合适的 不知道该怎么写，谁能帮帮我啊？


[ 本帖最后由 weichch123 于 2010-4-19 00:00 编辑 ]

没人肯帮我吗？

~~~~~~

能直接把文件存放到SQL SERVER服务器上吗？？？
我想要实现此功能是不是应该有服务器端平台的支持，客户端传给服务器端，服务器端再创建本地文件？？
不如换一种思路
建一个FTP站点，文件直接上传到该FTP站点，这个也许实现更容易，只需找一下 FTP上传方面的资料
实现后分享一下
我是从VB刚转过来的，还很生，只能谈谈想法，希望有帮助

[ 本帖最后由 shenhaoli 于 2010-4-19 20:57 编辑 ]

嗯 也对 可能要创建两个程序 一个服务器端 一个客户端

如果是用FTP的话 就不需要写程序了 到处都能下载到 哎

1、由客户端提交请求，在服务器端创建存储过程，用于文件的存储(需要用到master.xp_cmdshell方法）
2、由客户端提交请求，在服务器中创建临时数据库，将上传的文件用二进制存入临时数据库
3、由客户端提交请求，调用临时创建的存储过程，将临时存入的二进制文件由服务器端执行TextCopy.exe文件实现存储文件
4、删除创建的临时数据库

周末有时间来写一个例子

嗯 谢谢 不说也罢 希望能有个例子 因为我实在不会写 想有个例子学习一下

研究了半天，仿照网上写了这样的代码，但是不能上传WORD文件，这个要怎么修改才能上传word文件？

Imports System
Imports System.Drawing
Imports System.Collections
Imports
Imports System.Windows.Forms
Imports System.Data
Imports System.Drawing.Imaging
Imports
Imports System.Data.SqlClient

Public Class Form1
  Private fs As FileStream
  Private ds As DataSet
  Private conn As New SqlConnection("server=localhost;database=ceshi;integrated security=true;")
  Private currentpos As Integer = 9

  Private Sub btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpen.Click
  Dim Opendlg As New OpenFileDialog
  Opendlg.Title = "Select a picture file"
  Opendlg.Filter = "(*.doc)|*doc|(*.jpg)|*.jpg"
  Opendlg.ShowDialog()
  lblPath.Text = Opendlg.FileName.ToString()
  fs = New FileStream(Opendlg.FileName.ToString(), FileMode.Open, FileAccess.Read)
  'PictureBox1.Image = Image.FromFile(Opendlg.FileName.ToString())
  End Sub

  Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
  Dim sqlcomm As New SqlCommand
   = "INSERT INTO employees (lastname,firstname,photo) VALUES (@lastname,@firstname,@photo)"
  sqlcomm.Connection = conn
  Dim Data(fs.Length) As Byte
  fs.Read(Data, 0, Int(fs.Length))
  Dim prm1 As New SqlParameter("@lastname", txtLN.Text)
  Dim prm2 As New SqlParameter("@firstname", txtFN.Text)
  Dim prm3 As New SqlParameter("@photo", SqlDbType.VarBinary, Int(fs.Length), ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Current, Data)
  sqlcomm.Parameters.Add(prm1)
  sqlcomm.Parameters.Add(prm2)
  sqlcomm.Parameters.Add(prm3)
  Try
  conn.Open()
  sqlcomm.ExecuteNonQuery() '执行插入语句
  conn.Close()
  fs.Close()
  Catch ex As Exception
  MsgBox(ex.Message)
  End Try
  End Sub
End Class

Opendlg.Title = "Select a picture file"
  Opendlg.Filter = "(*.doc)|*doc|(*.jpg)|*.jpg"
这一句改为
Opendlg.Title = "Select a picture file"
  Opendlg.Filter = "(*.doc)|*.doc|(*.jpg)|*.jpg"
看行不行