z_ajk.asp

漂亮的企业网站系统v11 1、整体修改了上一版的一些BUG。 2、修改了页面底部的统计形式。 3、修改了“公告更新”栏目

<!-- #include file="include/config_other.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<!-- #include file="include/conn.asp" -->
<!-- #include file="include/z_adv_conn.asp"-->
<!-- #include file="include/config_jdv.asp"-->
<%
'*******************************************************************
'
'                         Joekoe V66 免费版
' 
'                       作者：joekoe
'                       QQ:   28755
'                       电邮：[e-mail]
'                       网址：http://www.joekoe.com
' 
'*******************************************************************

dim atb:atb=" target=_blank"
index_url="z_ajk"
tit=format_menu(index_url)
tit_fir=""
call web_head(0,0,0,0,0)
'------------------------------------left----------------------------------
call format_login()
call ajk_SortOrder()
call main_stat("","jt1",1,1,1)
call vote_type(1,2,"","f7f7f7")
'----------------------------------left end--------------------------------
call web_center(0)
'-----------------------------------center---------------------------------
%>
<table border=0 width='100%' cellspacing=0 cellpadding=0 align=center>
<%
dim ajk_action
ajk_action=request("ajk_action")
if ajk_action="save" then 
Response.Write "<tr><td align=center>"
call ajk_save()
Response.Write "</td></tr>"
elseif ajk_action="update" then
Response.Write "<tr><td align=center>"
call ajk_update()
Response.Write "</td></tr>"
	else
Response.Write "<tr><td align=center>"
call ajk_Stat()
Response.Write "</td></tr>"
end if
%>
</table>
<table border=0 width='100%' cellspacing=0 cellpadding=0 align=center>
</table>
<%
'---------------------------------center end-------------------------------
call web_end(0)
%>