ASP中Microsoft VBScript runtime 错误 '800a01f4'
我用函数获取url中id后面的数字，然后根据ID获取数据库相应ID的其他信息。但是访问a.asp?id=1的时候出现以下错误。
Microsoft VBScript runtime 错误 '800a01f4' 
Variable is undefined: 'Id' 
/a.asp，行 3 
下面是a.asp文件代码
<!--#include file="inc/const.asp"-->
<%
Id=Request.QueryString("ID")
set r=server.createobject("adodb.recordset")
sql="select * from 5U_Content where id="&id
set rsc=conn.execute(sql)
id=rsc("id")
Source=rsc("Source")
title=rsc("title")
Description=rsc("Description")
Indexpic=rsc("Indexpic")
Filepath=rsc("Filepath")
Viewpath=rsc("Viewpath")
conn.execute (sql)
rsc.close
set rsc=nothing
if verity<>1 then
Response.Write "<script language=javascript>alert('系统找不到该网站...');this.location.href='./';</script>"
Response.End
end if
%>
<title><%=title%></title> 
这个错误我曾经在腾讯问问上发问过，但是回答者一律错误，原帖地址：http://wenwen.soso.com/z/q127976473.htm。希望大家帮我改下代码，或者重新给我个新的代码也可以，感谢！

------解决方案--------------------
变量未定义，变量有强制声明的，在id上加个语句
dim id
不过看你的代码里，很多变量都没有事先声明，都要声明一下