谁帮我看看这段代码，关于上传数据库~~~谢谢~~~~~~

[yinxun]

我从网上下了个ASP的源程序，有如下功能：
某一页列出所有值，比如：
1、XXXX XXXX XXXX 修改
2、XXXX XXXX XXXX 修改
……

然后点“修改”，可以“修改”，进入修改界面，可以修改“XXX”，比如修改成YYY，然后提交数据库

该功能代码如下：

=====================================================================
<meta http-equiv="25175-?????-?????-????-????-????-SP"; charset=gb2312>

<%
dim conn,rs
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("gc.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
%>
<%
if request("text1")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('???!');" & "history.back()" & "</script>"
Response.End
end if

sm=request("text1")
dq=request("text2")
yb=request("text3")
qh=request("text4")
id1=request("id")
sql="update 25175code set test1='"&sm&"',test2='"&dq&"',test3='"&yb&"',test4='"&qh&"' where id="+id1
response.write "<script language=JavaScript>" & chr(13) & "alert('????????!');"&"window.location.href = 'modify.asp'"&" </script>"
set rs=nothing
%>

==========================================================================

我一点“提交”，他就弹出一个alert('????????!')，而并没有提交数据，不知道原作者此举动为何意

请问大家如何修改代码可以实现提交数据库的目的，并且提交完成后自动跳转至 index.asp?
谢谢大家

[sy_binbin]

SQL语句没执行

sql="update 25175code set test1='"&sm&"',test2='"&dq&"',test3='"&yb&"',test4='"&qh&"' where id="+id1
conn.execute(sql)
response.write " <script language=JavaScript>" & chr(13) & "alert('????????!');"&"window.location.href = 'modify.asp'"&" </script>"
set rs=nothing

[egg_server]

sql="update 25175code set test1='"&sm&"',test2='"&dq&"',test3='"&yb&"',test4='"&qh&"' where id="+id1
conn.execute(sql) 执行

[yinxun]

按楼上2位说法，改了后，提示

页面提示
“错误类型：
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值”


什么原因啊？

[egg_server]

sm=request("text1")
dq=request("text2")
yb=request("text3")
qh=request("text4")
id1=request("id")
检查你这些参数是否获取到值

[sy_binbin]

是不是你表名或者字段名好数据库里的吧一样啊