关于ADODB.Stream有关问题

关于ADODB.Stream问题
我照网上写了几句简单的，结果报错，我看网上都这样的，为什么要报错啊，谢谢
<%
Set   objStream   =   Server.CreateObject( "ADODB.Stream ")
　　objStream.TYPE   =   1
　　objStream.Open
　　objStream.LoadFromFile   Request( "upfilename ")
　　objStream.SaveToFile   Server.MapPath( "test.gif "),2
%>

出错内容
错误类型：
Microsoft   VBScript   编译器错误   (0x800A0408)
无效字符
/test/upload.asp,   line   4
　　objStream.TYPE   =   1

谢谢各位，在线等

[解决办法]
up
[解决办法]
类型咋会是1