Pasar datos a variable carrito

[Esly]

Este es mi codigo asp de mi carrito!!!!
quiero cambiar lo que esta entre /// donde tengo mi variable id=0123 quiero almacenar lo que consulto en mi Base de Datos, algo asi
id=<%result("ID")%>

algo asi como lo que esta en rojo pero no me sale me marca error!!!
<%
Set con = Server.CreateObject("ADODB.Connection")
'conexion sin utilizar ODBC para conectarse a una base de datos SQL Server
con.Open "Driver={SQL Server}; Server=BRYAN; Uid=sa; Pwd=; Database=Productos"
'Ejecuta la sentencia sql
'Var_matric = "&(request.form(Matricula))&"
sql = "Select * From Productos "

Set result = con.Execute(sql)

Do while Not result.EOF
%>

<% Response.Write("<tr>" & vbCrLf)%>
<%Response.Write("<td>" & result("ID") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Nombre") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Precio") & "</td>" & vbCrLf)%>
////////////////////////////////////////////////////////////////////////////////
<a href="introduce_producto.asp?id=0123&nombre=dvd&pr ecio=400">Comprar</a>
/////////////////////////////////////////////////////////////////////////////////
<td><a href="introduce_producto.asp?id=<%result("ID")%>&n ombre=<%result("Nombre")%>&precio=<%result("Precio ")%>">Comprar</a></td>

<%Response.Write("</tr>" & vbCrlf)%>

<%
result.MoveNext
Loop
con.Close
Set con = Nothing
%>

Aki dejo mi codigo si me pueden ayudar porfavor!!!!
gracias de antemano!!!

[u_goldman]

No analize todo tu codigo, pero basicamente lo que necesitas es imprimir estos valores, para lo cual te hace falta esto: <%=valor%>

<a href="introduce_producto.asp?id=<%=result("ID")%>& n ombre=<%=result("Nombre")%>&precio=<%=result("Prec io ")%>">Comprar</a>

Seria bueno que ademas de poner el codigo tambien pusieras el error, para que sea un poco mas descriptivo.

Salu2,

[Esly]

HTTP 500.100. Error interno del servidor: error de ASP
Servicios de Internet Information Server

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01C2)
Número de argumentos erróneo o asignación de propiedad no válida: 'result'

Este es mi codigo asp de mi carrito!!!!
quiero cambiar lo que esta en verde por lo de en rojo, donde tengo mi variable id=0123 quiero almacenar lo que consulto en mi Base de Datos, algo asi
id=<%result("ID")%>

algo asi como lo que esta en rojo pero no me sale me marca error!!!
<%
Set con = Server.CreateObject("ADODB.Connection")
'conexion sin utilizar ODBC para conectarse a una base de datos SQL Server
con.Open "Driver={SQL Server}; Server=BRYAN; Uid=sa; Pwd=; Database=Productos"
'Ejecuta la sentencia sql
'Var_matric = "&(request.form(Matricula))&"
sql = "Select * From Productos "

Set result = con.Execute(sql)

Do while Not result.EOF
%>

<% Response.Write("<tr>" & vbCrLf)%>
<%Response.Write("<td>" & result("ID") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Nombre") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Precio") & "</td>" & vbCrLf)%>
////////////////////////////////////////////////////////////////////////////////
<a href="introduce_producto.asp?id=0123&nombre=dvd&pr ecio=400">Comprar</a>
/////////////////////////////////////////////////////////////////////////////////
<td><a href="introduce_producto.asp?id=<%result("ID")%>&n ombre=<%result("Nombre")%>&precio=<%result("Precio ")%>">Comprar</a></td>

<%Response.Write("</tr>" & vbCrlf)%>

<%
result.MoveNext
Loop
con.Close
Set con = Nothing
%>

GRACIAS u_goldman SALU2, BESOS Y CUIDATE

[JuanRAPerez]

perdon que me meta pero lo que tedijo te gfaltaba son todos los signos iguales

<td><a href="introduce_producto.asp?id=<%=result("ID")%>&n ombre=<%=result("Nombre")%>&precio=<%=result("Precio ")%>">Comprar</a></td>

[JuanRAPerez]

perdon que me meta pero lo que tedijo te gfaltaba son todos los signos iguales

<td><a href="introduce_producto.asp?id=<%=result("ID")%>&n ombre=<%=result("Nombre")%>&precio=<%=result("Precio ")%>">Comprar</a></td>

[Esly]

Iniciado por JuanRAPerez

perdon que me meta pero lo que tedijo te gfaltaba son todos los signos iguales

<td><a href="introduce_producto.asp?id=<%=result("ID")%>&n ombre=<%=result("Nombre")%>&precio=<%=result("Precio ")%>">Comprar</a></td>

Asi es, jajaja intente las que podia pero nunca me di cuenta ademas mis prubas nunca abria un nuevo session y no me hacia la actualizacion de la pagina....

gracias ya pude!!!!!
codigo bien--->
Set con = Server.CreateObject("ADODB.Connection")
'conexion sin utilizar ODBC para conectarse a una base de datos SQL Server
con.Open "Driver={SQL Server}; Server=BRYAN; Uid=sa; Pwd=; Database=Productos"
'Ejecuta la sentencia sql
'Var_matric = "&(request.form(Matricula))&"
sql = "Select * From Productos "

Set result = con.Execute(sql)

Do while Not result.EOF
%>

<% Response.Write("<tr>" & vbCrLf)%>
<%Response.Write("<td>" & result("ID") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Nombre") & "</td>" & vbCrLf)%>
<%Response.Write("<td>" & result("Precio") & "</td>" & vbCrLf)%>

<td><a href="introduce_producto.asp?id=<%=result("ID")%>& nombre=<%=result("Nombre")%>&precio=<%=result("Pre cio ")%>">Comprar</a></td>

<%Response.Write("</tr>" & vbCrlf)%>

<%
result.MoveNext
Loop
con.Close
Set con = Nothing
%>