关于ADODB.Stream问题

Question

我照网上写了几句简单的，结果报错，我看网上都这样的，为什么要报错啊，谢谢
<%
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谢谢各位，在线等