无标题文档

<% Function glhtmlgg(name) name=replace(name," ","") name=replace(name,"""","'") name=replace(name,chr(10),"") name=replace(name,chr(13),"
") glhtmlgg=name set reg=nothing End Function ttt=trim(request("ttt")) if ttt="" then ttt=1 if id="0" then id="" sql="select * from [gamelist]" if id<>"" then sql=sql&" where 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 name=rs("name") ip=glhtmlgg(rs("ip")) addtime=rs("addtime") ap=rs("ap") if ap="正常" then picap="images/1.gif" elseif ap="繁忙" then picap="images/2.gif" else picap="images/3.gif" end if %> <% rs.movenext wend rs.close set rs=nothing conn.close set conn=nothing %>

服务器名	服务器IP	线路	状态
只手遮天	121.12.104.124	中国电信新区
愤怒之战	121.12.104.3	中国电信
激情会所	121.12.104.58	中国电信
仙剑战场	下载专用登陆器	中国电信
光彩照人	下载专用登陆器	中国电信
光辉潇洒	下载专用登陆器	中国电信
群龙无敌	下载专用登陆器	中国电信
倾国倾城	下载专用登陆器	中国电信
统治皇朝	下载专用登陆器	中国电信
三分天下	下载专用登陆器	中国电信
经典之风	下载专用登陆器	中国电信
颠峰浮云	下载专用登陆器	中国电信
杀神无敌	下载专用登陆器	中国电信
天国王朝	下载专用登陆器	中国电信
颠峰再现	下载专用登陆器	中国电信
激情时代	下载专用登陆器	中国电信
英雄年代	下载专用登陆器	中国电信
疯狂杀戳	下载专用登陆器	中国电信
辉煌帝国	下载专用登陆器	中国电信
霸气狂人	下载专用登陆器	中国电信
赶尽杀绝	下载专用登陆器	中国电信
激情永恒	下载专用登陆器	中国电信
疯狂袭击	下载专用登陆器	中国电信
燃烧经典	下载专用登陆器	中国电信
王者风范	下载专用登陆器	中国电信
龙腾风云	下载专用登陆器	中国电信
天涯豪情	下载专用登陆器	中国电信
疯狂之战	下载专用登陆器	中国电信
嘟嘟传奇	下载专用登陆器	双线VIP