<%
str =request.form("xh")
yuwen=request.form("yuwen")
shuxue=request.form("shuxue")
yingyu=request.form("yingyu")
set conn=server.CreateObject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="& server.MapPath("person.mdb")
set cmd=server.CreateObject(")
cmd.activeconnection = conn
sql="update grade set 数学="&shuxue&",语文="&yuwen&",英语="&yingyu&" where 学号=" & str
response.write(sql)
= sql
cmd.execute
response.Redirect("test.asp")
%>

我用盟城ASPweb服务器测试，而不是用IIS。 运行如下代码的时候出错：
<%
Set MyBrow=Server.CreateObject("MSWC.BrowserType")
%>
浏览器类型:<% = MyBrow.Browser%>

错误类型也是500（内部服务器错误）

所以，楼主，可能是因为你用的服务器的原因吧？  具体原因我也不太清楚，等待高人来解答！