关闭

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

1671人阅读 评论(0) 收藏 举报

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

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

             

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:5648次
    • 积分:81
    • 等级:
    • 排名:千里之外
    • 原创:2篇
    • 转载:0篇
    • 译文:0篇
    • 评论:0条
    文章分类
    文章存档