中科新闻网日本七星电子烟:七行代码实现文件上传!!!(经典代码)不满意不加分!
来源：百度文库 编辑：中科新闻网 时间：2024/05/02 07:36:30
具体实现如下:
set Stream_from=CreateObject("Adodb.Stream")
Stream_from.mode=3
Stream_from.type=1
Stream_from.open
Stream_from.write Request.BinaryRead(Request.TotalBytes)
Stream_from.SaveToFile fullpath,2
Stream_from.Close
set Stream_from=CreateObject("Adodb.Stream")
Stream_from.mode=3
Stream_from.type=1
Stream_from.open
Stream_from.write Request.BinaryRead(Request.TotalBytes)
Stream_from.SaveToFile fullpath,2
Stream_from.Close
你是想让我给你分吗？～～