首页  »  网页设计教程  »  初试WAP之wml+ASP查询

初试WAP之wml+ASP查询

浏览数:共 489 次     评论:共 0 条     发布日期:2011-08-17     分类:asp

<% response.contenttype="text/vnd.wap.wml" %>
<?xml version="1.0" encoding="gb2312"?>

请输入查询资料<input name="qycx" type="text" maxlength="16" />
<anchor title="确定">确定
<go href="qycx.asp" method="post">
<postfield name="qycx" value="$qycx"/>
</go>
</anchor>

上饶工商信息网
</p>

二、信息接收 页面 qycx.asp

<% response.contenttype = "text/vnd.wap.wml" %>
<?xml version="1.0" encoding="gb2312"?>
<!doctype wml public "-//wapforum//dtd wml 1.1//en" "http://www.wapforum.org/dtd/ wml_1.1.xml">

<card id="qycx2" title="上饶工商信息网">

<%
qycx=request.form("qycx")
cx="企业名称 like "%"&;qycx&;"%" "

"conn.open "dsn=qycxsjk;uid=;pwd=;database=data.mdb"
conn.open "driver={microsoft access driver (*.mdb)};dbq="&;server.mappath("qycx.mdb")

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
%>
<%qymc=rs("企业名称")
id=rs("id")

<%
rs.movenext
loop
rs.close
%>
<br/><br/>
上饶工商信息网
</p>

<% function uni(chinese)
for i = 1 to len (chinese)
a=mid(chinese, i, 1)
uni=uni &; "&;#x" &; hex(ascw(a)) &; ";"
next
end function
%>

=================================================


第二点评:看到这里,我有点汗,刚开始以“企业名称”做为关键字提交,后来才想到以id为关键字进行查询避免了汉字提交的问题。这么基础一个问题,我居然琢磨了大半天。这里根据hello.asp提交的“企业名称”关键字查询得到所有“企业名称”字段中含有该关键字的企业全称(以免重复),做一个列表,点击将入第三个页面,即该企业详细资料。

三、qycx2.asp

<% response.contenttype = "text/vnd.wap.wml" %>
<?xml version="1.0" encoding="gb2312"?>
<!doctype wml public "-//wapforum//dtd wml 1.1//en" "http://www.wapforum.org/dtd/ wml_1.1.xml">

<%
set conn=server.createobject("adodb.connection")
"conn.open "dsn=qycxsjk;uid=;pwd=;database=data.mdb"
conn.open "driver={microsoft access driver (*.mdb)};dbq="&;server.mappath("qycx.mdb")
%>

<card id="qycx3" title="上饶工商信息网">
<p>
<%
name=request.querystring("id")

rs.open sql,conn,1,1
do while not rs.eof
%>
<%qymc=rs("企业名称")%>
企业名称:<%response.write qymc%>
<br/>

住所:<%response.write zs%>
<br/>

法定代表人:<%response.write fddb%>
<br/>

注册资本:<%
if left(zczb,1)="." then
response.write "0"
else
end if
response.write zczb%>万元
<br/>

<



上一篇:解决利用ASP无法连接ORACLE 9i数据库的问题
下一篇:动态网站首页的静态生成方式