📄 js-gg.asp

📁 Art2008 CMS是一款具有强大的功能的基于ASP语言的网站管理软件
💻 ASP
字号:
<!--#include file = admin_conn.asp -->
<!--#include file = admin/titleb.asp -->
document.write("<head><meta http-equiv='Content-Language' content='zh-cn'><meta http-equiv='Content-Type' content='text/html; charset=gb2312'></head>");

function ggview(url) {
var 
newwin=window.open(url,"","toolbar=no,location=no,top=100,left=200,directories=no,center:yes;status=no,menubar=no,scrollbars=yes,resizable=no width=520,height=365");

return false;
}
document.write("<div id=js_gg> ");
<%
Function glhtmlgg(title)
  title=replace(title,"&nbsp;","")
  title=replace(title,"""","'")
  title=replace(title,chr(10),"")
  title=replace(title,chr(13),"<br>")
  glhtmlgg=title
  set reg=nothing
End Function

id=trim(Request("id"))
ttt=trim(request("ttt"))
ty=trim(request("ty"))
if ttt="" then ttt=1
if id="0" then id=""
if ty="" then ty=0
'2007_05_19修改

  sql="select * from [webgg] where ifhide=0 and gtype="& ty &""

if id<>"" then sql=sql&" and id="&clng(id)
sql=sql&" order by id desc"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1

while not rs.eof
 title=titleb(rs("title"),24)
 content=glhtmlgg(rs("content"))
 addtime=rs("addtime")
 id=rs("id")
 
	
  
  
if ttt="1" then%>
	document.write("<font style='font-size:9pt'><center><b><%=title%></b></center></font>");
	document.write("<font style='font-size:9pt'><center><hr size=1>加入时间：<%=formatdatetime(addtime,1)%></center></font>");
	document.write("<p><font style='font-size:9pt'><%=content%></font></p><br />");
<% elseif ttt="0" then%>
	document.write("<BR><font style='font-size:9pt'><%=content%></font>");
<% elseif ttt="2" then%>
	document.write("<BR><%=title%><br>");

<% elseif ttt="3" then%><!--进行连接的修改-->
	                                                                               <!--如果三天内的通知标题为红色-->
     
     document.write("<li><a href=<%=config("path")%>gg_view.asp?id=<%=rs("id")%>  onclick='return ggview(this.href);' target='_blank' title='点击浏览详细内容'><%if date() - cdate(rs("addtime")) <3 then%><font style='font-size:9pt' color='#FF0000'><%else%><font style='font-size:9pt'><%end if%><%=title%></font></a>&nbsp;&nbsp;[<%=formatdatetime(addtime,1)%>]</li>");
                                                                              
	//document.write("<a href=<%=path%>gg_view.asp?id=<%=rs("id")%> target='_blank' title='点击浏览详细内容'><BR><%if date() - cdate(rs("addtime")) <3 then%><font style='font-size:9pt' color='#FF0000'><%else%><font style='font-size:9pt'><%end if%><%=title%></font></a>");
    //document.write("<font style='font-size:9pt' color='#999999'><center><hr size=1>加入时间：<%=formatdatetime(addtime,1)%></center></font>");

<% elseif ttt="4" then%>

	
	document.write("<BR><a href=gg_view.asp?id=<%=rs("id")%> onclick='return ggview(this.href);' target='_blank' title='点击浏览详细内容'><%if date() - cdate(rs("addtime")) <3 then%><font style='font-size:9pt' color='#FF0000'><%else%><font style='font-size:9pt'><%end if%><%=title%></a><br>");
    document.write("<font style='font-size:9pt' color='#999999'><center><%=formatdatetime(addtime,2)%></center></font>");



<%
end if

rs.movenext
wend

rs.close
set rs=nothing
conn.close
set conn=nothing
%>
document.write("</div > ");
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -