?? content.asp
字號:
<%@ Language=VBScript %>
<%Response.Buffer=true%>
<html>
<head>
<META HTTP-EQUIV="REFRESH" CONTENT=5;url="content.asp">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<body bgcolor="#3366CC" background="background.gif" text="#FF9933" vlink="#993366" alink="#CCCC33">
<%
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("mydb.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from message order by id desc"
rs.Open sql,conn,1,1
do while not rs.eof
Response.Write rs("name")&"說:"&rs("message")&"<br>"
rs.MoveNext
loop
set rs=nothing
%>
</body>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -