filesystemobject对象opentextfile的有关问题

求救filesystemobject对象opentextfile的问题
set   objFSO=server.CreateObject   ( "Scripting.FileSystemObject ")
  set   objts=objFSO.OpenTextFile   (server.MapPath( "tel3.txt "),3,true)
      objts.writeline( "12323234342347 ")

   
      objts.close
      set   objts=nothing
      set   objFSO=nothing
提示:
Microsoft   VBScript   运行时错误   错误   '800a0005 '  

无效的过程调用或参数  

/bbs/link/shi1.asp，行5  
  set   objts=objFSO.OpenTextFile   (server.MapPath( "tel3.txt "),3,true)
这行是第5行，
如果
set   objts=objFSO.OpenTextFile   (server.MapPath( "tel3.txt "),2,true)
这样就没有问题，可是这不是我要的结果，我是想在当前文本里再加一行数据



[解决办法]
set objts=objFSO.OpenTextFile (server.MapPath( "tel3.txt "),8,true)