ASP网页设计菜鸟学ADO实例教程之ADO 查询数据
缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。ado|教程|数据 本站原创内容,转载请说明出处网页教授教养网。我们可使用SQL语句来创立一个查询，完成按前提显现我们必要的数据库中的数据。
比方显现"Companyname"以A入手下手的公司的名字。上面代码能够完成：
<html>
<body>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open"e:/webjx/webjx.mdb"
setrs=Server.CreateObject("ADODB.recordset")
sql="SELECTCompanyname,ContactnameFROMCustomersWHERECompanyNameLIKEA%"
rs.Opensql,conn
%>
<tableborder="1"width="100%">
<tr>
<%foreachxinrs.Fields
response.write("<th>"&x.name&"</th>")
next%>
</tr>
<%dountilrs.EOF%>
<tr>
<%foreachxinrs.Fields%>
<td><%Response.Write(x.value)%></td>
<%next
rs.MoveNext%>
</tr>
<%loop
rs.close
conn.close%>
</table>
</body>
</html>
显现"Companyname"中入手下手字母年夜于E的那些公司的信息：
<html>
<body>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("e:/webjx/webjx.mdb"))
setrs=Server.CreateObject("ADODB.recordset")
sql="SELECTCompanyname,ContactnameFROMCustomersWHERECompanyName>E"
rs.Opensql,conn
%>
<tableborder="1"width="100%">
<tr>
<%foreachxinrs.Fields
response.write("<th>"&x.name&"</th>")
next%>
</tr>
<%dountilrs.EOF%>
<tr>
<%foreachxinrs.Fields%>
<td><%Response.Write(x.value)%></td>
<%next
rs.MoveNext%>
</tr>
<%loop
rs.close
conn.close
%>
</table>
</body>
</html>
显现"Country"为china的公司的信息：
<html>
<body>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("e:/webjx/webjx.mdb"))
setrs=Server.CreateObject("ADODB.recordset")
sql="SELECTCompanyname,ContactnameFROMCustomersWHERECountry=china"
rs.Opensql,conn
%>
<tableborder="1"width="100%">
<tr>
<%foreachxinrs.Fields
response.write("<th>"&x.name&"</th>")
next%>
</tr>
<%dountilrs.EOF%>
<tr>
<%foreachxinrs.Fields%>
<td><%Response.Write(x.value)%></td>
<%next
rs.MoveNext%>
</tr>
<%loop
rs.close
conn.close
%>
</table>
</body>
</html>
用户本人选择国度，然后显现响应的信息：
<html>
<body>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("e:/webjx/webjx.mdb"))
setrs=Server.CreateObject("ADODB.recordset")
sql="SELECTDISTINCTCountryFROMCustomersORDERBYCountry"
rs.Opensql,conn
country=request.form("country")
%>
<formmethod="post">
选择国度：<selectname="country">
<% dountilrs.EOF
response.write("<option")
ifrs.fields("country")=countrythen
response.write("selected")
endif
response.write(">")
response.write(rs.fields("Country"))
rs.MoveNext
loop
rs.Close
setrs=Nothing%>
</select>
<inputtype="submit"value="显现信息">
</form>
<%
ifcountry""then
sql="SELECTCompanyname,Contactname,CountryFROMCustomersWHEREcountry="&country&""
setrs=Server.CreateObject("ADODB.Recordset")
rs.Opensql,conn
%>
<tablewidth="100%"cellspacing="0"cellpadding="2"border="1">
<tr>
<th>公司名</th>
<th>接洽人</th>
<th>国度</th>
</tr>
<%
dountilrs.EOF
response.write("<tr>")
response.write("<td>"&rs.fields("companyname")&"</td>")
response.write("<td>"&rs.fields("contactname")&"</td>")
response.write("<td>"&rs.fields("country")&"</td>")
response.write("</tr>")
rs.MoveNext
loop
rs.close
conn.Close
setrs=Nothing
setconn=Nothing%>
</table>
<% endif%>
</body>
</html>
ASP在国内异常流行，因为国内大多使用的是盗版的Windows和盗版的SQLServer，而ASP＋COM＋SQLServer实际上也是一种不错的搭配，其性能也不输于PHP+MYSQL，特别是Windows系统和SQLServer都有图形界面，比APACHE和MYSQL易于维护，因此对于不重视知识产权的国家来说也是一种不错的选择。 它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。 它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 那么，ASP.Net有哪些改进呢？
页:
[1]