28,406
社区成员
发帖
与我相关
我的任务
分享<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.CodePage=65001%>
<%Response.Charset="UTF-8"%>
<!--#include file="../inc/conn.asp"-->
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta name="Author" content="手机版"/>
<meta http-equiv="Content-Type" content="<%=header%>; charset=utf-8" />
<link rel="stylesheet" href="style.css" type="text/css"/>
<title> 手机版 </title>
</head>
<body>
<div id="container" style="width:100%;">
<div class="h2" style="background-color:#91c7e9;padding:3px;"> 快速发布 </div>
<div id="footNav"><form method="POST" action="ok.asp">
<textarea name="Content" id="Content" class="qs"></textarea><br><input type="checkbox" name="jiami" value="1" title="打钩即表示只有自己看到此消息而已">加密<input type="submit" value="提交" name="B1">
</form></div>
<div style="background-color:#91c7e9;padding:3px;"> 我发过的消息 </div>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 5 * from ble_topic order by id desc"
rs.open sql,conn,1,3
do while not rs.eof
%>
<%=rs("content")%><hr>
<%
RS.MoveNext
Loop
rs.close
%>
</div>
<div id="footer">
Copyright(c)2009 <br/>
</div>
</div>
</body>
</html>