📄 primsgsend.asp
字号:
<!--#include file="conn.asp" -->
<!--#include file="../function/function.asp" -->
<!--#include file="session.asp" -->
<%
web_id="../language/"&l_id
web_id=web_id&"/USER_ADMIN.ASP"
call include(web_id)
web_id="../language/"&l_id
web_id=web_id&"/CHECK.ASP"
call include(web_id)
id=request.QueryString("id")
re_primsg=request.QueryString("re_primsg")
sname=session_cookie_name
if id=sname then
RESPONSE.WRITE "<font color=ff0000>"&L_PRIMSG_JG&"</font>"
response.end
end if
if request.Form("method")="submit" then
re_primsg_s=request.Form("re_primsg_s")
sename=trim(request.Form("sname"))
primsgtitle=trim(request.Form("primsgtitle"))
primsgcontent=trim(request.Form("primsgcontent"))
primsguser=request.Form("primsguser")
up_money=momey_inof + addpri_money
update_user=session_cookie_name
call up_money_f(up_money,update_user)
if primsguser="" then
RESPONSE.WRITE("error!")
response.End
end if
strsql="insert into [primsg] (primsguser,primsgtitle,primsgcontent,primsgtime,primsgsender,primsgtype,g_id,re_primsg) values('"&primsguser&"','"&primsgtitle&"','"&primsgcontent&"',now(),'"&sename&"',1,'"&session_cookie_gid&"','"&re_primsg_s&"')"
conn.execute(strsql)
log_url="primsg_ok.asp"
log_msg=L_PRIMSG_SENDERING
%>
<!--#include file="welcom.asp" -->
<%
response.end
end if
%>
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript">
<!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.primsgtitle.value == "")
{
alert("<%=L_CHECK_PRIMG1%>");
theForm.primsgtitle.focus();
return (false);
}
if (theForm.primsgtitle.value.length > 40)
{
alert("<%=L_CHECK_PRIMG2%>");
theForm.primsgtitle.focus();
return (false);
}
if (theForm.primsgcontent.value == "")
{
alert("<%=L_CHECK_PRIMG3%>");
theForm.primsgcontent.focus();
return (false);
}
if (theForm.primsgcontent.value.length > 100)
{
alert("<%=L_CHECK_PRIMG4%>");
theForm.primsgcontent.focus();
return (false);
}
return (true);
}
//-->
</script>
<form name="FrontPage_Form1" method="post" action="primsgsend.asp" onsubmit="return FrontPage_Form1_Validator(this)">
<center>
<%
RESPONSE.WRITE "<table width=360 border=1 cellpadding=2 cellspacing=1 bgcolor="&list_borderbg_color&">"
RESPONSE.WRITE "<tr><td align=center colspan=3 bgcolor="&list_bg_color&">:::"&L_PRIMSG_SENDERto&id&":::</td>"
RESPONSE.WRITE "</tr><tr><td bgcolor="&list_bg_color&">"&L_PRIMSG_TITLE&":</td>"
RESPONSE.WRITE "<td bgcolor="&list_bg_color&">"
%>
<input name="primsgtitle" type="text" id="primsgtitle" size="39" height="20" style="background-color: <%=test_style_onMouseOut%>" onMouseOver = "this.style.backgroundColor = '<%=test_style_onMouseOver%>'" onMouseOut = "this.style.backgroundColor = '<%=test_style_onMouseOut%>'" maxlength="40">
</td>
</tr>
<tr>
<td bgcolor="<%=list_bg_color%>"><%=L_PRIMSG_body%>:(<font color="#FF0000"><%=L_CHECK_USER31%></font>)</td>
<td bgcolor="<%=list_bg_color%>">
<textarea name="primsgcontent" cols="37" rows="6" id="primsgcontent" style="background-color: <%=test_style_onMouseOut%>" onMouseOver = "this.style.backgroundColor = '<%=test_style_onMouseOver%>'" onMouseOut = "this.style.backgroundColor = '<%=test_style_onMouseOut%>'"></textarea>
</td>
<%
RESPONSE.WRITE "</tr><tr><td colspan=2 bgcolor="&list_bg_color&"><div align=center>"
RESPONSE.WRITE "<input name=primsguser type=hidden id=primsguser value="&id&">"
RESPONSE.WRITE "<input name=sname type=hidden id=sname value="&sname&">"
RESPONSE.WRITE "<input name=method type=hidden id=method value=submit>"
if re_primsg="" then
re_primsg="0"
end if
RESPONSE.WRITE "<input name=re_primsg_s type=hidden value="&re_primsg&">"
%>
<input type="submit" name="Submit" value="<%=L_PRIMSG_sub%>" style="background-color: <%=test_style_onMouseOut%>" onMouseOver = "this.style.backgroundColor = '<%=test_style_onMouseOver%>'" onMouseOut = "this.style.backgroundColor = '<%=test_style_onMouseOut%>'">
<input type="reset" name="Submit2" value="<%=L_PRIMSG_reset%>" style="background-color: <%=test_style_onMouseOut%>" onMouseOver = "this.style.backgroundColor = '<%=test_style_onMouseOver%>'" onMouseOut = "this.style.backgroundColor = '<%=test_style_onMouseOut%>'">
</div></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -