sp1000je
79 lines
2.7 KiB
Plaintext
79 lines
2.7 KiB
Plaintext
<!--#include virtual ="/common/lib/dbcon.asp"-->
|
|
<!--#include virtual ="/common/lib/func.asp"-->
|
|
<%
|
|
Dim R_Fields, sql, R_Fields_i, R_Fields_u, ok_url
|
|
Dim sc_idx, sc_sitename, sc_sitename_en, sc_ademail, sc_url, sc_company, sc_logo, sc_uptae, sc_jongmok, m_zip1, m_zip2, m_addr1, m_addr2, sc_no, sc_no2, sc_ceo, sc_phone1, sc_phone2, sc_phone3, sc_fax1, sc_fax2, sc_fax3, sc_title, sc_skeyword, sc_hdate1_y, sc_hdate1_m, sc_hdate1_d, sc_hdate2_y, sc_hdate2_m, sc_hdate2_d, sc_hdd, sc_logouttime, sc_wdate, sc_date_chk, sc_hdd_chk
|
|
|
|
|
|
R_Fields = "sc_idx, sc_sitename, sc_sitename_en, sc_ademail, sc_url, sc_company, sc_logo, sc_uptae, sc_jongmok, m_zip1, m_zip2, m_addr1, m_addr2, sc_no, sc_no2, sc_ceo, sc_phone1, sc_phone2, sc_phone3, sc_fax1, sc_fax2, sc_fax3, sc_title, sc_skeyword, sc_hdate1_y, sc_hdate1_m, sc_hdate1_d, sc_hdate2_y, sc_hdate2_m, sc_hdate2_d, sc_hdd, sc_logouttime, sc_wdate, sc_date_chk, sc_hdd_chk"
|
|
|
|
Call RequestAll (R_Fields, "request.Form")
|
|
|
|
sc_zipcode = m_zip1 & m_zip2
|
|
sc_addr1 = m_addr1
|
|
sc_addr2 = m_addr2
|
|
|
|
sc_copyright = InputValue2( sc_copyright )
|
|
|
|
If sc_hdd = "" Then sc_hdd = "1"
|
|
|
|
|
|
sc_hdate1 = sc_hdate1_y & "-" & sc_hdate1_m & "-" & sc_hdate1_d
|
|
sc_hdate2 = sc_hdate2_y & "-" & sc_hdate2_m & "-" & sc_hdate2_d
|
|
|
|
|
|
|
|
If sc_idx = "" Then '//저장
|
|
|
|
sql = "truncate table site_config"
|
|
dbcon.execute sql
|
|
|
|
R_Fields_i = "sc_sitename, sc_sitename_en, sc_ademail, sc_url, sc_company, sc_logo, sc_uptae, sc_jongmok, sc_zipcode, sc_addr1, sc_addr2, sc_no, sc_no2, sc_ceo, sc_phone1, sc_phone2, sc_phone3, sc_fax1, sc_fax2, sc_fax3, sc_title, sc_skeyword, sc_copyright, sc_logouttime, sc_wdate "
|
|
|
|
If sc_date_chk <> "Y" Then '//기간 무제한일때
|
|
|
|
R_Fields_i = R_Fields_i & ", sc_hdate1, sc_hdate2"
|
|
|
|
End if
|
|
|
|
If sc_hdd_chk <> "Y" then '//용량 무제한일때
|
|
|
|
R_Fields_i = R_Fields_i & ", sc_hdd"
|
|
End if
|
|
|
|
sc_wdate = getDateFm(Now(), 3)
|
|
|
|
Call InsertQuery( R_Fields_i, "site_config")
|
|
|
|
ok_url = "write.asp" & page_info
|
|
|
|
|
|
Else '//수정
|
|
|
|
|
|
|
|
R_Fields_u = "sc_sitename, sc_sitename_en, sc_ademail, sc_url, sc_company, sc_logo, sc_uptae, sc_jongmok, sc_zipcode, sc_addr1, sc_addr2, sc_no, sc_no2, sc_ceo, sc_phone1, sc_phone2, sc_phone3, sc_fax1, sc_fax2, sc_fax3, sc_title, sc_skeyword, sc_copyright, sc_logouttime, sc_wdate, sc_date_chk, sc_hdd_chk"
|
|
|
|
If sc_date_chk <> "Y" then '//기간 무제한일때
|
|
|
|
R_Fields_u = R_Fields_u & ", sc_hdate1, sc_hdate2"
|
|
End if
|
|
|
|
If sc_hdd_chk <> "Y" then '//용량 무제한일때
|
|
|
|
R_Fields_u = R_Fields_u & ", sc_hdd"
|
|
End if
|
|
|
|
sc_wdate = getDateFm(Now(), 3)
|
|
|
|
Call UpdateQuery (R_Fields_u, "site_config", "where sc_idx=" & sc_idx)
|
|
|
|
ok_url = "write.asp?" & page_info
|
|
|
|
End if
|
|
|
|
dbcon.close
|
|
Set dbcon = nothing
|
|
|
|
Call loding("0", ok_url)
|
|
%> |