Hola compañeros del Desarrollo Web, pues aqui de nuevo con un problema, les presento el siguiente codigo:
Código HTML:
<%@ Language=VBScript%>
<%
Dim oConn,strSQL, objRS
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./Ventas.mdb"))
strSQL = "SELECT * FROM Productos ORDER BY Productos"
Set objRS = oConn.Execute(strSQL)
%>
<html>
<head>
<link rel="STYLESHEET" type="text/css" href="css/letras.css">
<meta http-equiv="Content-Language" content="es">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ventas</title>
</head>
<body >
<h1 align="center">Venta de productos</h1>
<p align="center">Seleccione el producto a comprar: </p>
<select size="1" name="Producto" >
<% while not Rs.EOF
%>
<option value="<%=Rs(IdProducto)%>"> <%=Rs(Productos)%></option>
<% Rs.movenext
wend
Rs.close
%>
</select>
<table border="1" width="80%" height="79" align="center">
<tr>
<td width="25%" height="1" align="center">
<p align="center"><b>PRODUCTOS</b></p>
</td><td width="13%" height="1" align="center">
<p align="center"><b>Cantidad</b></p>
</td>
<td width="12%" height="1" align="center">
<p align="center"><b>Comprar</b></p>
</td><td width="21%" height="1" align="center">
<p align="center"><b>Precio</b></p>
</td>
<td width="29%" height="1" align="center">
<p align="center"><b>Sub-Total</b></p>
</td>
</tr>
<tr>
<td width="25%" height="1">
</td>
<td width="13%" height="1">
<form method="POST" action="compras.asp" webbot-action="--WEBBOT-SELF--">
<p align="center"><input type="text" name="Cpolvo" size="15"></p>
</form>
</td>
<td width="12%" height="1" align="center">
<p align="center"><input type="checkbox" name="Copolvo" value="ON"></p>
</td>
<td width="21%" height="1">
<p align="center">
</td>
<td width="29%" height="1">
<p align="center"></td>
</tr>
</table>
</body> Problema: Intento Poner en un select los nombres de mis productos o materiales que se encuentran en la base de datos Ventas, y el value sera el id del producto, pero no se puede, me podrian explicar que tego que hacer o en que estoy fallando.
Abusando un poco ma de su amabilidad, objetivo del formulario:
1. Cuando alguien seleccione un producto del menu desplegable, en la casilla productos de la tabla, se deven generar su derivados: ejmeplo:
menu desplegable: polvo
tabla, casilla productos y precio:
polvo fino............ 2.65
polvo grueso........ 2.13
polvo labado........ 2.36
2. Lo anterior pasa con las casillas de precio tambien.
3. Cuando el checkbox este activado se manda a una BD que se llame pedido, solo necesito saber como validar la activacion del checkbox.
De ante mano muchas gracias por su ayuda.