sp1000je
38 lines
972 B
Plaintext
38 lines
972 B
Plaintext
<!--#include virtual = "/common/lib/dbcon.asp" -->
|
|
<!--#include virtual = "/common/lib/func.asp" -->
|
|
<%
|
|
|
|
g_num = InputValue(request("g_num")) ' --일련번호
|
|
g_code = InputValue(request("g_code")) ' --정렬번호
|
|
move = InputValue(request("move")) ' --이동
|
|
|
|
|
|
|
|
if move = "up" then
|
|
sql = "select g_num, g_code from member_group where g_code < "&g_code&" order by g_code desc"
|
|
ElseIf move = "down" then
|
|
sql = "select g_num, g_code from member_group where g_code > "&g_code&" order by g_code"
|
|
End If
|
|
Set Rs = Dbcon.Execute (sql)
|
|
|
|
If Not rs.eof Then
|
|
|
|
v_rsg_num = trim(rs("g_num")) ' -- 대체할 디비번호
|
|
v_rsg_code = trim(rs("g_code")) ' -- 대체할 값
|
|
|
|
|
|
sql1 = "update member_group set g_code = "&g_code &" where g_num = "&v_rsg_num
|
|
Dbcon.execute sql1
|
|
sql2 = "update member_group set g_code = "& v_rsg_code &" where g_num = "&g_num
|
|
Dbcon.execute sql2
|
|
|
|
|
|
End If
|
|
|
|
Dbcon.close : Set Dbcon = Nothing
|
|
|
|
|
|
ok_url = "write.asp"
|
|
Call loding ("0", ok_url)
|
|
|
|
%> |