uso este form ASP para cargar registros a un SQL server, como hago para ingresar los datos nuevamente y haga UPDATE en vez de otro insert.
Tengo un campo en la tabla que se llama "id_registro" que se autoincrementa y no se repite nunca, calculo que lo debo usar, pero no se como.
aqui mi form:
Código:
<%
FInicio = "2007/1/1"
dia=DateDiff("d", FInicio ,date())
%>
<FORM METHOD="POST" ACTION="cargado.asp">
<%
for i = 0 to 30
%>
<table width="70%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center" class="Estilo10"><%=((Date() - dia) + i)%></div></td>
<td><span class="Estilo10">
<input name="bme<% = i %>" type="text" value="" size="15" /></span></td>
<td><div align="center" class="Estilo10">
<input name="fecha<% = i %>" type="hidden" value="<%=((Date() - dia) + i)%>" />
</div></td>
<td><div align="center" class="Estilo10">
<input name="turno<% = i %>" type="hidden" value="1" />
</div></td>
<td><div align="center" class="Estilo10">
<input name="local<% = i %>" type="hidden" value="1" />
</div></td>
</tr>
</table>
<%next%>
<INPUT TYPE="hidden" value="<% = i %>" name="cantidad">
<INPUT TYPE="hidden" value="<% = i %>" name="cantidad2">
<INPUT TYPE="hidden" value="<% = i %>" name="cantidad3">
<INPUT TYPE="hidden" value="<% = i %>" name="cantidad4">
<br>
<INPUT TYPE="SUBMIT" value="Insertar">
</p>
</p>
</FORM>
y aqui la hoja que toma los datos osea cargado.asp (a donde envia el form anterior)
Código:
<%
'Recogemos los valores del formulario
cantidad = Request.Form("cantidad")
cantidad2 = Request.Form("cantidad2")
cantidad3 = Request.Form("cantidad3")
cantidad4 = Request.Form("cantidad4")
'Instanciamos y abrimos nuestro objeto conexion
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "circulacion", "sa", ""
set objRS = CreateObject("ADODB.Recordset")
for i = 0 to cantidad
bme_actual = request.form("bme" & i)
fecha_actual = request.form("fecha" & i)
turno_actual = request.form("turno" & i)
local_actual = request.form("local" & i)
'Ahora creamos 30 sentencias SQL
if bme_actual<>"" or bme<>0 then
sSQL="Insert Into costos_maxirest (bme,fecha,turno,local) values ('" & bme_actual & "','" & fecha_actual & "','" & turno_actual & "','" & local_actual & "')"
'y Ejecutamos la orden 30 veces
set objRS = Conn.Execute(sSQL)
end if
next
%>
</p>
<p class="Estilo11">Datos cargados </p>
<%
'Cerramos el sistema de conexion
Conn.Close
%>
cualquier consejo sera de gran ayuda.
muchisimas gracias.
pela