zoukankan      html  css  js  c++  java
  • asp + wap 实现查询系统

     Shows how to perform a search with a WAP page and use ASP on the server to do the database query and then

      display the results.

      <%Response.ContentType = "text/vnd.wap.wml"%>

      <?xml version="1.0"?><!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML

      1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">

      <wml>

      <%

      Dim conn, rs

      Dim strSQL,strFirstName, strLastName

      Set conn = Server.CreateObject("ADODB.Connection")

      Set rs= Server.CreateObject("ADODB.Recordset")

      conn.open session("myconnect_string") 'Replace with your connect string

      strWhoIs = Request.QueryString("username")

      if strWhoIs="" then

      %>

      <card id="UserSearch" title="Search">

      <p>

      Please enter username to find? <input name="username" type="text" maxlength="15"/>

      <do type="accept" label="Locate">

      <go href="thispage.asp" method="get">

      <postfield name="username" value="$username"/>

      </go>

      </do>

      </p>

      </card>

      <%

      else

      strSQL = "SELECT * FROM tblUsers WHERE Username ='& strWhoIs & '"

      Set rs = conn.Execute(strSQL)

      %><card id="UserResult" title="Result">

      <p>

      <%

      if not rs.EOF then

      rs.MoveFirst

      Response.Write "<strong>User Search Results</strong>"

      While not rs.EOF

      strFirstName = "First Name " & rs("FirstName")

      strLastName = "Last Name " & rs("LastName")

      Response.Write strFirstName

      Response.Write strLastName

      rs.MoveNext

      Wend

      else

      Response.Write "Sorry, no user found."

      end if

      %>

      </p>

      </card>

      <%

      end if

      %>

      </wml>

  • 相关阅读:
    博客园开通新随笔
    遍历两个数组,并输出数组中的不同内容
    1021-二叉树复制和左右子树互换
    1020-层次遍历二叉树
    1019-计算二叉树的高度和结点数
    1018-深度遍历二叉树
    1017-乘积最大
    1016-求幂
    1015-最大公约数和最小公倍数
    1014-数据的插入与删除
  • 原文地址:https://www.cnblogs.com/winner/p/356136.html
Copyright © 2011-2022 走看看