📄 new_page_1.asp
字号:
<%
Sql=Session("sql")
Ps="provider=microsoft.Jet.oledb.4.0;data source=C:\My Documents\设计\db2.mdb"
Set cnn=server.Createobject("ADODB.connection")
Cnn.open ps
'创建rst
set rst=server.createobject("adodb.recordset")
rst.open sql,cnn,2,1
while rst.eof
response.redirect "asp1.htm"
wend
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>
<body bgcolor="#00ffff">
<center>
<h2>查询结果<HR>
<table border=1>
<tr bgcolor=#00ffaa>
<%
for i=0 to rst.fields.count-1
response.write"<td>" & rst(i).name & "</td>"
next
%>
</TR>
<%
rst.movefirst
while not rst.eof
x="<tr>"
for i=0 to rst.fields.count-1
x=x & "<td>" & rst(i) & "</td>"
next
response.write x & "</tr>"
rst.movenext
wend
%>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -