仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 468|回复: 7
打印 上一主题 下一主题

[学习教程] ASP网页设计菜鸟学ADO实例教程之ADO 查询数据

[复制链接]
活着的死人 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:10:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。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易于维护,因此对于不重视知识产权的国家来说也是一种不错的选择。
愤怒的大鸟 该用户已被删除
沙发
发表于 2015-1-25 20:28:11 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
灵魂腐蚀 该用户已被删除
板凳
发表于 2015-2-3 23:33:27 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
若天明 该用户已被删除
地板
发表于 2015-2-9 07:29:33 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
透明 该用户已被删除
5#
发表于 2015-2-27 04:47:07 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
深爱那片海 该用户已被删除
6#
发表于 2015-3-8 21:07:35 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
第二个灵魂 该用户已被删除
7#
发表于 2015-3-16 15:15:16 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
冷月葬花魂 该用户已被删除
8#
发表于 2015-3-22 23:50:12 | 只看该作者
那么,ASP.Net有哪些改进呢?
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 10:58

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表