FileSystemObject出错

<FORM METHOD=POST ACTION="data_input.asp" >

<div align="center"> <br/>

<br/>

<br/>

<br/>

文件名<input type="file" name="path" size="40">

<INPUT TYPE="submit" name="add" value="导入文件">

</div>

</FORM>

dim FSO,ATextStream,AllText,strLine1,strLine2,strLine3

dim strpath,fileurl

fileurl="

strpath=Trim(Request.form("path"))

fileurl=strpath

SET FSO=CreateObject("Scripting.FileSystemObject")

SET ATextStream=FSO.OpenTextFile(fileurl,1,false,TristateFalse)'这句出错

'''''''''提取数据''''''''''''''''''''''''''''

response.write "<br/>"+"导入库成功！<a href=dolist.html>[继续导入]</a><br/>"

set Conn=nothing

set FSO=nothing

set ATextStream=nothing

[832 byte] By [msdn] at [2007-8-15 10:04:05]