¿Como podria implementar un control de inventario en una web con carro de la compra?
Gracias.
| |||
haber haber mmbenitez... esperamos tu respuesta!!
__________________ tech-nico.com |
| |||
Estoy desarrollado un carro de la compra en asp, lo que quiero es introducir en una campo de la base de datos con el numero de unidades disponibles del articulo, y que a medida que algun cliente vaya comprando ese producto ese numero de unidades disponibles vaya disminuyendo, de manera que cuando llegue a 0 no se muestre ese producto o aparezca un mensaje diciendo que ese producto se encuentra fuera de stock. |
| |||
Tambien puedes comprobar si quedan unidades de un producto cuando lo seleccionen, en el caso de que no queden lo pones directamente, y si hay, cuando el usuario te introduzca las unidades que quiere le dices si hay stock suficiente o no |
| |||
He probado lo siguiente, pero tengo muchas dudas, con esto aun no conseguiria que se modificase el stock de los productos, pero avanzaria bastante. Creo la tabla inventario, con los siguientes campos: idstock (clave principal) campo autonumerico idproducto (es la clave principal de otra tabla llamada productos) idpedidos (es la clave principal de otra tabla llamada pedidos) stock (campo numerico) alerta (campo numerico) Creo la pagina prestock.asp <!-- #include file="db.asp" --> <% ‘Esto es un comentario, este es el contenido de db.asp dim db dim strConn strConn = "comercio" Set db = Server.CreateObject("ADODB.Connection") db.open strConn %> <center> <form method="POST" action="stock.asp"> <table> <tr> <td>stock </td> <td><input size=20 name="stock" value="<%= stock %>" maxlength=100></td> </tr> <tr> <td>Email </td> <td><input size=20 name="alerta" value="<%= alerta %>" maxlength=100></td></tr> </table> <input type="submit" value="Enviar"> </form> </center> Creo la pagina stock.asp <center> <form method="POST" action="altas.asp"> <table> <tr> <td>Nombre </td> <td><input type=text name="nombre" size=40></td> </tr> <tr> <td>Email </td> <td><input type=text name= "mail" size=40></td> </tr> <tr> <td>Pais </td> <td><input type=text name= "pais" size=40></td> </tr> </table> <input type="submit" value="Enviar"> </form> </center> <% db.close set db=nothing %> Creo la pagina stock.asp <% '**** stock.asp **** <!-- #include file="db.asp" --> <% ‘Esto es un comentario, este es el contenido de db.asp dim db dim strConn strConn = "comercio" Set db = Server.CreateObject("ADODB.Connection") db.open strConn %> ' Recogemos los valores del formulario dim varstock, varalerta varnstock = Request.Form("stock") varalerta = Request.Form("alerta") 'Creamos un recordset txtsql = "Select * from inventario" set rs = db.execute (txtsql) 'esta instruccion es la que va a hacer el insert de nuestros valores en la BD insertar = "INSERT into inventario (idproducto,idpedido,stock, alerta) values ('"& varstock &"','"& varalerta &"')" db.execute (insertar) ¿¿¿¿¿ Como pondria en la instrucción anterior para que cogiese el valor de idproducto de la tabla producto, y el valor idpedido de la tabla pedidos???????? ¿¿¿¿¿ Como pondria hacer que no necesariamente el campo idpedido tenga que tener algun contenido, ya que cuando introduzco un producto en el inventario quiero fijar el stock y la alerta, y en un primer momento no hay o no tiene porque haber ningun pedido de es producto???????? 'Terminamos e imprimimos un mensaje Response.Write "<body><p><b>Alta exitosa!!!</b></p>" Response.Write "<p>Los datos que se grabaron son : </p>" Response.Write "<b>idproducto: </b> "& idproducto & "<br>" Response.Write "<b>idpedidol: </b> "& idpedido & "<br>" Response.Write "<b>stock: </b> "& stock & "<br>" Response.Write "<b>alerta: </b> "& alerta & "<br>" 'liberamos la memoria cerrando la conexion y el recordset <% db.close set db=nothing %> <% '**** Creo la pagina controlstock.asp**** <!-- #include file="db.asp" --> <% ‘Esto es un comentario, este es el contenido de db.asp dim db dim strConn strConn = "comercio" Set db = Server.CreateObject("ADODB.Connection") db.open strConn %> 'Ejecuta un sentencia SQL de consulta txtsql = "Select * from inventario" Set rs = con.Execute(txtsql) %> <body> <h2>Resultado de la consulta</h2> <p>Aqui tenemos a todos nuestros contactos.</p> <center> <table border=1> <tr> <th>idproducto</th> <th>idpedido</th> <th>stock</th> <th>alerta</th> </tr> <% 'iniciamos un ciclo para el vaciado de los registros Do while not rs.EOF %> <tr> <td> <%= rs("idproducto")%> </td> <td> <%= rs("idpedido")%> </td> <td> <%= rs("stock")%> </td><td> <%= rs("alerta")%> </td> </tr> <% 'nos movemos al siguiente registro rs.MoveNext 'y regresamos a nuestro ciclo Loop 'al terminarlo de vaciar datos liberamos memoria <% db.close set db=nothing %> </table> </center> </body> </html> //////////////////Gracias por vuestra ayuda/////////////////////////// |