Files
sms_host20170829/hostsms_addr.asp
T
2026-02-23 10:01:00 +09:00

70 lines
1.9 KiB
Plaintext

<!--#include virtual="/include/lib/dbcon.asp"-->
<!--#include virtual="/include/function/default_func.asp"-->
<%
'────────────────────────────────────
' 주소록 인증문자 1.234.4.91
'────────────────────────────────────
'm_id : 회원ID
'msg : 메세지
'tran_callback : 회신번호
'tran_phone : 수신번호 ex) 0111231234;0171231234
'rtn_url : 리턴URL ex) http://nninc.co.kr
' m_id = inputValue( Request.Form("m_id") )
' msg = inputValue( Request.Form("msg") )
' tran_callback = inputValue( Request.Form("tran_callback") )
' tran_phone = inputValue( Request.Form("tran_phone") )
' rtn_url = inputValue(Request.Form("rtn_url"))
m_id = inputValue( request("m_id") )
msg = inputValue( request("msg") )
tran_callback = inputValue( request("tran_callback") )
tran_phone = inputValue( request("tran_phone") )
rtn_url = inputValue(request("rtn_url"))
msg = "[주소록] 인증번호는 "&msg&" 입니다. "
If tran_callback = "" Then tran_callback = tran_callback1&tran_callback2&tran_callback3
' If rtn_url = "" Then rtn_url = Request.ServerVariables("HTTP_REFERER")
Rdate = Date()& " " & Hour(now)&":"&Minute(now)
' If smsSelect2(m_id) > 0 Then
If m_id="nninc_addr" Then
tran_phone_arr = Split(tran_phone,";")
z = 0
For i = 0 To UBound( tran_phone_arr )
If tran_phone_arr(i) <> "" then
SQL = "Insert into em_tran(tran_id, tran_phone, tran_callback, tran_status, tran_date, tran_msg) values ("
SQL = SQL & "'"&m_id&"','"&tran_phone_arr(i)&"', '"&tran_callback&"', '1', '"&Rdate&"', '"&Msg&"')"
' response.write sql
Dbcon.Execute sql
z = z + 1
End if
Next
' sql = "update member set M_g_sms = M_g_sms - "&z&" where M_id = '"&m_id&"'"
' Dbcon.Execute sql
Response.write "success"
End If
Dbcon.close
Set Dbcon = Nothing
' If rtn_url<>"" then
' response.redirect rtn_url
' End if
%>