??

Question

else
name=rstemp("basename")
response.Write name
response.Flush 
'unit=rstemp("baseunit")
end if
sql="insert into shop(stuffno,stuffname,buydate) values('"&ID&"','"&name&"','"&addtime&"')"
response.Write sql
response.Flush 
rs.open sql,conn,1,1
response.write "<script language=JavaScript>" & chr(13) & "alert('这本图书已添加到你的购物蓝中！');" & "history.back()" & "</script>" 
set rs=nothing
set rstemp=nothing
set conn=nothing
%>