敬业的IT人 >> 网站建设 >> Web编程 >> Asp >> 用asp生成wml

用asp生成wml

敬业的IT人 互联网 佚名 2008-4-14 16:37:35
第一个ASP页面。
Note Pad输入下面的程序。
<%@ Language=VBScript %>
<% 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>
  <card id="main">
  <p>
     Hello
  </p>
  </card>
</wml>

保存为hello.asp。并且是它和hello.wml在同一个子目录下。
启动你的iis(微软的WEB服务器平台)服务器管理。在“默认的Web站点”下找到“wap”目录,用鼠标右键点击它,选择属性“Properties”,就会弹出一个对话框,里面有好多配置选项。 在“虚拟目录”标签页当中有一项应用程序设置。将“许可”一项设置为:“执行(包括脚本)”。确定后,退出iis(微软的WEB服务器平台) Console。
打开WinWap,马上Stop它,在URL栏里输入:“http://127.0.0.1/wap/hello.asp”,并按下回车。等着欣赏你的第一个
ASP页面。

动态生成WBMP
WBMP的具体解释请参看该部分的ISAPI的例子。


<%@ Language=VBScript %>
<%
Function StoB(varstr)
str2bin = ""
For i = 1 To Len(varstr)
varchar = Mid(varstr, i, 1)
str2bin = str2bin & ChrB(AscB(varchar))
Next
StoB = str2bin
End Function
img=chr(0) & chr(0) & chr(5) & chr(2) & chr(0) & chr(&Hf8)

Response.ContentType="image/vnd.wap.wbmp"
Response.BinaryWrite stob(img)
%>

——————————————————
粤ICP备06119539号
Copyright CiscoSky.Org,Some Rights Reserved.
Email:me1228#tom.com