<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
%>
热门信息
阅读 (139)
1 独特的随机字母阅读 (133)
2 检查和设置IIS服务器正确的权限阅读 (130)
3 存在的文件阅读 (125)
4 随机图像阅读 (114)
5 Response Redirect（代码强制跳转）