Basicamente lo que quiero hacer es:
lo que se elija en el select name, pasarlo a una variable y de ahi insertarlo en la BD Access 2010.
code:
Código:
<div id="zona_1">
<%
sql = "Select * from usuarios"
rs.open sql,cn
%>
<label> <b> Seleccionar Usuario: </b></label>
<select name="selectUsuario">
<% Do While Not RS.EOF %>
<Option value=><%=rs("Usuarios")%></option>
<%
RS.MoveNext
Loop
rs.close
%>
</select>
<%
sql2 = "Select * from equipos"
rs.open sql2,cn
%>
</p>
<label> <b> Seleccionar Equipo: </b></label>
<select name="selectEquipo">
<% Do While Not RS.EOF %>
<Option value=><%=rs("Equipo")%></option>
<%
RS.MoveNext
Loop
rs.close
%>
</select>
</p>
<% dim actual
actual = Date() %>
<label> <b> Fecha de Prestamo: </b></label>
<%=Date()%>
<p> </p>
<div align="center">
<form id="cargar" name="cargar" method="post" action="">
<label><b>
<input type="submit" name="Alta" id="Alta" value="Cargar Prestamo !" />
</b></label>
</form>
</div>
<p> </p>
<% dim cargar, SelUsuario, selEquipo
'SelUsuario = request.Form("selectUsuario")
'SelEquipo = request.Form("selectEquipo")
if request.Form("Alta") = "Cargar Prestamo !" then
sql3 = "INSERT INTO Prestamos (FechaPrestamo, Usuario, equipo) VALUES (#" & Date() & "#, '" SelectUsuario "','" selectEquipo "' )"
rs.open sql3
'sirve para ver el sql que ejecuta, la cadena y ver el error
response.write sql3
response.end
end if
%>
</div>
NO SE si se puede hacer eso con ASP, por ahi lei que tenia que usar javascript para recoger lo que el usuario eligiera, pero... no le encuentro sentido como es que ASP no lo puede hacer?.
Cuando ejecuto esto, no me da error sino que inserta solamente la fecha
osea que ni registra los "select name" osea lo que elijen.
Gracias!!