不正常 GUID?? 在查询表达式 'id={0}' 中。

第一个页面(摄像机):(承接上一个页面的动态内容),比如:在数码产品中选择"摄像机",现在我想在看详细的内容.就点击"三星",然后弹出一个新的页面(此页面显示一款"三星"的"数码摄像机")就在这个时候,就出错了.请问是什么原因啊?
我用的是Dreamweaver MX + access数据库+ASP.NET(VB),
一些代码如下:
第一个页面:
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script language="vb" runat="server">
sub page_load(sender as Object,e as EventArgs)
' 连接数据库,并将数据绑定.
Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("./db/data.mdb"))
dim sqlstr,did as string
'接受参数.
did = request.querystring("id")
'如果参数不对或者为空,则提示错误.
if did="" then
response.Redirect("error.aspx?key=您输入的ID号无效！")
'如果参数正确,显示相关内容
else
sqlstr="select * from product where id=" & did
Dim cmd As New OleDbCommand(sqlstr, conn)
conn.Open()
Dim dr As OleDbDataReader = cmd.ExecuteReader()
dr.Read()
prename.text=dr.item("prename")
intro.text=dr.item("intro")
predate.Text = dr.Item("predate")
viewnum.text=dr.item("viewnum")
solded.text=dr.item("solded")
price1.text=dr.item("price1")
price2.text=dr.item("price2")

conn.close()
end if
end sub
</script>
(略)
<table width="127" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="22></td>
<td width="105">
<a href="sort.aspx?id={0}">JVC</a> (这里有错吗)
</td>
</tr>
</table>

第二个页面(详细的某个摄像机)
(那个错误提示,就是在显示这个页面的时候出来的,看了下地址栏:http://localhost/dw/product.aspx?id={0},这个0怎么不能变成数字呢?)

<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script language="vb" runat="server">
sub page_load(sender as Object,e as EventArgs)
Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("./db/data.mdb"))
dim sqlstr,did as string
'接受参数.
did = request.querystring("id")
'如果参数不对或者为空,则提示错误.
if did="" then
response.Redirect("error.aspx?key=您输入的ID号无效！")
'如果参数正确,显示相关内容
else
sqlstr="select * from product where id=" & did
Dim cmd As New OleDbCommand(sqlstr, conn)
conn.Open()
Dim dr As OleDbDataReader = cmd.ExecuteReader()
dr.Read()
'显示产品的详细资料
prename.text=dr.item("prename")
intro.text=dr.item("intro")
predate.Text = dr.Item("predate")
viewnum.text=dr.item("viewnum")
solded.text=dr.item("solded")
price1.text=dr.item("price1")
price2.text=dr.item("price2")
chajia.text=dr.item("price1")-dr.item("price2")
amount.text=dr.item("amount")
stock.text=dr.item("stock")
remarks.text=dr.item("remarks")
discount.text=dr.item("discount")*100
conn.close()
end if
</script>
(设计略)