[求助]自动排序的问题
我要做一个自动排序的系统,比如说我有很多的产品:产品1、产品2、产品3、产品4、产品5我现在想添加一个产品6让他排在第二位,添加的程序和排序程序已经有了:
id2=trim(request("id2"))
set re=server.CreateObject("adodb.recordset")
sqlstrl="select * from s where id2 like '"&id2&"' "
re.open sqlstrl,conn,1,3
if not re.eof then
set re=server.CreateObject("adodb.recordset")
sqlstrl="select * from s where id2>="&id2
re.open sqlstrl,conn,1,3
for k=1 to re.recordcount
re("id2")=re("id2")+1
re.update
re.movenext
next
end if
这只是插入记录可以用,但是我现在想把产品5拿到产品2的位置,让它排第二位,后面的就往下挤。
程序该怎么写呢!
我想了很多的方法还是不能实现!!!