ASP编程，请教高手

<%

dim ProductNumber,ProductName,num,ProductPrice,sum,sub_date,name,rs,sql

name=session("name")

ProductNumber=session("ProductNumber")

ProductQuantity=session("ProductQuantity")

dim sql1,rs1

sql1="select * from ProductList where ProductNumber='"&session("ProductNumber")&"'"

set rs1=cn.execute(sql1)

session("ProductPrice")=rs("ProductPrice")

session("ProductName")=rs("ProductName")

ProductQuantity=session("ProductQuantity")

sql="insert into mai(ProductNumber,ProductName,ProductQuantity,sub_date,hname,ProductPrice) values ('"&ProductNumber&",'"&session("ProductName")&"', '"&ProductQuantity&"',#"&date()&"#,'"&session("name")&"','"&session("ProductPrice")&"',)"

set rs=cn.execute(sql)

response.Redirect("dingdan.asp")

%>

我就是想把这个ProductList表中的 ProductName和ProductPrice获取过来写入mai这个表中的ProductName和ProductPrice写不进去

错误是我类型不匹配!ProductPrice是个货币类型ProductName是文本!

帮帮我啊,我郁闷两天了!

改为

<%

dim ProductNumber,ProductName,num,ProductPrice,sum,sub_date,name,rs,sql

name=session("name")

ProductNumber=session("ProductNumber")

ProductQuantity=session("ProductQuantity")

dim sql1,rs1

sql1="select * from ProductList where ProductNumber="&session("ProductNumber")&""

set rs1=cn.execute(sql1)

session("ProductPrice")=rs("ProductPrice")

session("ProductName")=rs("ProductName")

ProductQuantity=session("ProductQuantity")

sql="insert into mai(ProductNumber,ProductName,ProductQuantity,sub_date,hname,ProductPrice) values ("&ProductNumber&",'"&session("ProductName")&"', '"&ProductQuantity&"',#"&date()&"#,'"&session("name")&"',"&session("ProductPrice")&")"

set rs=cn.execute(sql)

response.Redirect("dingdan.asp")

%>

• ·Celeron D 3.06GHz这个处理器现
• ·肯德基和麦当劳？
• ·杭州采荷实验校校园网网址
• ·寻找韩国娱乐节目情书下载地址
• ·路由器是不是只能最开始设置的电脑才能进入?
• ·推荐当今歌坛四大天王
• ·有没有9月28出生的女孩?
• ·我的MP3有问题````谁来帮帮我`````
• ·我该选择什么样的职业呀？
• ·做无痛人流人流整整两个星期了还有褐色的东西流出