谁能发现错误的？？？？

<textarea name="tomobile" id="tomobile" cols='100' rows='12'  class="lefttextarea" onkeydown="countMobSum();" onkeyup="countMobSum();" onmousedown="countMobSum();" onmouseup="countMobSum();" onfocus="countMobSum();" onblur="countMobSum();" style="width:610px; "></textarea>


<form name="upload" method="post" action="smssend.asp?action=upload"  style="margin:0px;padding:0px;">电话上传：<input size="31" type ="file" name ="file1" id="file1" /> <input type ="submit" value="上传"/>
</form>



<%
if request("action")="upload" then
call upload()
end if
sub upload()
dim map,myarry
map=Trim(request.Form("file1"))
set fso=server.CreateObject("scripting.FileSystemObject")
set txtfile=fso.opentextfile(map,1,create,-2)
while not txtfile.atendofstream
myarry=txtfile.readline
response.Write "<script language=""javascript"">document.getElementById(""tomobile"").value=document.getElementById(""tomobile"").value+"""&myarry&""";</script>"
wend
txtfile.close
end sub
%>


这段代码能实现功能，但是IE左下角老是显示出错误，说语法错误，在火狐添加TXT的时候就说文件不存在，用不了 ？？急