Ciao ragazzi,
ho un DB in cui vorrei inserire un nuovo record...Questo DB di record ne ha 135 e quello che voglio inserire deve andare al numero 20.
Ho un file asp che gestisce la posizione dei record;
Questo è il codice del file:
--------------------------------------------------------------------------
<%
Dim posizione, sposta, cod
posizione=Request.Querystring("posizione")
sposta=Request.Querystring("sposta")
cod=Request.Querystring("cod")
id_record = Request.Querystring("id_record")
posizione_U = (posizione-10)
posizione_D = (posizione+10)
Set con = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs1 = Server.CreateObject("ADODB.Recordset")
con.Open connStr
if sposta = "U" then
rs.Open "select * from prodotti WHERE id_sottocategoria="&cod&" and posizione="&posizione_U, connStr, 1, 3
rs.Update("posizione") = posizione
rs.Close
set rs = nothing
rs1.Open "select * from prodotti WHERE id="&id_record, connStr, 1, 3
rs1.Update("posizione") = posizione_U
rs1.Close
set rs1 = nothing
elseif sposta = "D" then
rs.Open "select * from prodotti WHERE id_sottocategoria="&cod&" and posizione="&posizione_D, connStr, 1, 3
rs.Update("posizione") = posizione
rs.Close
set rs = nothing
rs1.Open "select * from prodotti WHERE id="&id_record, connStr, 1, 3
rs1.Update("posizione") = posizione_D
rs1.Close
set rs1 = nothing
end if
con.Close
SET con=nothing
response.redirect "prodotti_esp.asp?sottocategoria=" & cod
%>
--------------------------------------------------------------------------
Con questo file riesco a spostare un record di 10 posizioni su o giù, ma il record che viene sostituito non scala di uno come voglio io, ma va alla posizione vecchia di quello nuovo...
A me interessa che scalino i record, non un cambio di posizione.
Grazie per il vostro tempo
Juan
Rispondi quotando
