최초등록

This commit is contained in:
sp1000je
2026-02-23 10:01:00 +09:00
commit 7bc9767bf4
3120 changed files with 198447 additions and 0 deletions
+40
View File
@@ -0,0 +1,40 @@
<!--#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)
%>