sp1000je
40 lines
1.0 KiB
Plaintext
40 lines
1.0 KiB
Plaintext
<!--#include virtual = "/common/lib/dbcon.asp" -->
|
|
<!--#include virtual = "/common/lib/func.asp" -->
|
|
|
|
<!--#include file = "config.asp" -->
|
|
|
|
<%
|
|
|
|
b_l_num = InputValue(request("b_l_num")) ' --일련번호
|
|
b_l_code = InputValue(request("b_l_code")) ' --정렬번호
|
|
move = InputValue(request("move")) ' --이동
|
|
|
|
|
|
|
|
|
|
if move = "up" then
|
|
sql = "select b_l_num, b_l_code from banner2 where b_l_code < "& b_l_code &" order by b_l_code desc"
|
|
ElseIf move = "down" then
|
|
sql = "select b_l_num, b_l_code from banner2 where b_l_code > "& b_l_code &" order by b_l_code"
|
|
End If
|
|
Set Rs = Dbcon.Execute (sql)
|
|
|
|
If Not rs.eof Then
|
|
|
|
v_rsb_l_num = trim(rs("b_l_num")) ' -- 대체할 디비번호
|
|
v_rsb_l_code = trim(rs("b_l_code")) ' -- 대체할 값
|
|
|
|
|
|
sql1 = "update banner2 set b_l_code = "& b_l_code &" where b_l_num = "& v_rsb_l_num
|
|
sql2 = "update banner2 set b_l_code = "& v_rsb_l_code &" where b_l_num = "& b_l_num
|
|
|
|
Dbcon.execute sql1
|
|
Dbcon.execute sql2
|
|
|
|
End If
|
|
|
|
Dbcon.close : Set Dbcon = Nothing
|
|
|
|
ok_url = "list.asp"
|
|
Call loding ("0", ok_url)
|
|
%> |