📄 con_forum_write.asp
字号:
<!-- #include file="jk_frm.asp" -->
<!-- #include file="jk_upload.asp" -->
<!-- #include file="jk_val_code.asp" -->
<%
function form_icon()
dim temp1
temp1=trim(request.form("icon"))
if not isnumeric(temp1) then
temp1="0"
end if
form_icon=temp1
end function
sub val_chk_end_forum(vals)
dim is_vals
select case int(forum_config(16))
case 1
is_vals=false
case 2
is_vals=true
case 0
if int(format_mid_num(43))=0 then
is_vals=true
else
is_vals=false
end if
end select
if is_vals=true then
call val_chk_end(vals)
end if
end sub
sub forum_readonly()
if int(forumpro)<>1 then
exit sub
end if
if not forum_power_true(forumpower) then
call web_error("readonly")
end if
end sub
function word_size_true(wst_var)
word_size_true=false
if wst_var="" then exit function
dim tmp_wnum
tmp_wnum=len(wst_var)
if tmp_wnum<int(min_word_size) then exit function
if tmp_wnum>(max_word_size*1024) then exit function
word_size_true=true
end function
function chinese(types)
dim ctypes,i,tt
ctypes=types:chinese="no"
for i=1 to len(ctypes)
tt=mid(ctypes,i,1)
if int(asc(tt))<0 then chinese="yes":exit for
next
end function
sub forum_write_frm_check()
%>
<script language=javascript>
<!--
function write_frm_check(topic_true)
{
//return true;
if (topic_true==1)
{
if(write_frm.topic.value=="" || write_frm.topic.value.length>50)
{
alert("你还没完全留下所需信息!\r\n\n贴子的 主题 是必须要的;\n且长度不能超过50个字符。");
write_frm.topic.focus();
return false;
}
}
if(write_frm.jk_word.value=="" || write_frm.jk_word.value.length><%response.write max_word_size*1024%>)
{
alert("你还没完全留下所需信息!\r\n\n贴子的 内容 是必须要的;\n且大小不能超过<%response.write max_word_size%>KB。");
write_frm.jk_word.focus();
return false;
}
if(write_frm.jk_word.value=="" || write_frm.jk_word.value.length<<%response.write min_word_size%>)
{
alert("你还没完全留下所需信息!\r\n\n贴子的 内容 是必须要的;\n且大小不能少于<%response.write min_word_size%>B。");
write_frm.jk_word.focus();
return false;
}
}
-->
</script>
<%
end sub
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -