<html>
<title>Alphabetic Database Display</title>
<body bgcolor="#FFFFFF">
<%
for counter = 65 to 90
‘下一步来创建当前页面的目标的拼音的超链接
%>
<a href="<%= request.servervariables("script_name")%>?u_letter=&#<%= counter %>;">
&#<%= counter %>;</a>
<% next %>
<p>
<%
u_letter=trim(request.querystring("u_letter"))
‘如果用户点击链接那会搜寻db
if u_letter<>"" then
accessdb="state_info"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from states where left(statename,1)='"& u_letter &"' order by statename asc"
rs.Open sql, cn
‘如果搜索显示没有结果的话
‘没有找到的信息结果
if rs.eof then
%>
No states begin with the letter <%= u_letter %>
<% else
do while not rs.eof
‘显示所有找到的规则 %>
<br>
<%= rs("statename") %>
<%
rs.movenext
loop
end if ' end check for obs
end if ' end check for user input
%>
热门信息
阅读 (109)
1 什么样的编程语言是最值得我们学习的呢?阅读 (109)
2 asp 如何解析api接口返回的xml阅读 (109)
3 ASP-数组阅读 (108)
4 asp网站伪静态化URL Rewrite中的httpd.ini伪静态化规则编写方法阅读 (105)
5 asp取access数据库里本周、本月、本季度的记录~