如何使用webservice上传文件(vb.net版本 )

winform 端代码(引用WEB服务名称为upload;webservice文件名为uploadfile)

               ' fname 为文件路径(包括文件名)

                Dim FileReader As System.IO.FileStream = System.IO.File.Open(fname, IO.FileMode.Open)

                Dim FileByte(FileReader.Length) As Byte

                FileReader.Read(FileByte, 0, FileReader.Length)

                FileReader.Close()

                Dim uploadpic As New upload.uploadfile

                 if  uploadpic.uploadpic(FileByte)=true then

                 msgbox("上传成功!")

                 end if

 

webservice端代码(名称为uploadfile):

    <WebMethod(Enablesession:=True)> _
    Public Function uploadfile(ByVal uploadstr As Byte()) As Boolean

                'uploadpath为保存文件的路径(包括文件名)

                Dim FileToWrite As New System.IO.MemoryStream(uploadstr)

                Dim FileReader As System.IO.FileStream = System.IO.File.Open(uploadpath, IO.FileMode.Create)

                FileToWrite.WriteTo(FileReader)

                FileToWrite.Close()

                FileReader.Close()

                 Return True

    End Function

写的不是很清楚;运行环境为VS2003+WIN2000 SERVRE

有什么疑问;可以给我发邮件或留言