asp读取word 文档内容转换为二进制数据流

来源:互联网 发布:杰克奥特曼玩具淘宝 编辑:程序博客网 时间:2024/06/05 03:02

Dim FilePath,FileName

Set ObjFileStream = Server.CreateObject("ADODB.Stream")
ObjFileStream.Type = 1
ObjFileStream.Mode = 3
ObjFileStream.open
ObjFileStream.LoadFromFile FilePath&"/"&FileName&".doc"
ObjFileStream.Position = 0

response.binarywrite  ObjFileStream.Read

原创粉丝点击