有没有谁用“化镜”的无组件上传的程序的？请进！！！

我在他的upfile.asp里面加如如下代码：

set rs=server.createobject("adodb.recordset")
sql="select * from ptable "
rs.open sql,conn,1,3
rs.addnew
rs("name")="测试啊"
rs("shuoming")="什么东西啊"
rs("time")=date()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing

需要提示的是以上代码作为单独文件如save.asp测试可以将数据保留到表里面，但加在他的upfile.asp文件里总出错，这是为什么？？？？？
---------------------------------------------------------------

1OPTION EXPLICIT

强制定义，而set rs=server.createobject("adodb.recordset")之前没有定义rs，所以出错了，只要定义一下dim rs,sql就不会出错了