加入收藏 | 设为首页 | 会员中心 | 我要投稿 应用网_常德站长网 (https://www.0736zz.com/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

在ASP中编写WML程序

发布时间:2022-09-28 15:33:02 所属栏目:Asp教程 来源:
导读:  在ASP中编写WML程序

  我们也可以直接在ASP程序中编写WML程序ASP程序,并可把它输出为WML程序。具体的处理规则如下:

  (1) 将WML程序使用包含起来,格式为:

  ……(语句)

 
  在ASP中编写WML程序
 
  我们也可以直接在ASP程序中编写WML程序ASP程序,并可把它输出为WML程序。具体的处理规则如下:
 
  (1) 将WML程序使用包含起来,格式为:
 
  ……(语句)
 
  %>
 
  (2) 声明wml文件类型。与前面讲述的方法相同,可采用ASP的Response对象,并将ContentType作为它的方法,但书写时不再需要使用。格式为:
 
  Response.ContentType="text/vnd.wap.wml"
 
  (3) 对于其他的WML语句,一律采用Response对象的write方法来处理。基本格式为:
 
  Response.write("……(WML标签或语句)")
 
  其中的“WML标签或语句”在write方法中可以连写,以节省程序代码行。
 
  (4) 在WAP服务器端,增加服务器对ASP的处理能力。操作方法与前面介绍的一样,这里不再重述。
 
  (5) 程序文件保存时也要采用“.asp”的扩展名。
 
  下面的程序就是在ASP中编写WML页面的简单例子:
 
  'msg = "Hello "
 
  Response.ContentType = "text/vnd.wap.wml"
 
  Response.write("//WAPFORUM//DTD WML 1.1//EN"" ""http://www.wapforum.org/DTD/wml_1.1.xml"">")
 
  Response.write("")
 
  Response.write("hello wml ! test ok !")
 
  Response.write("")
 
  %>
 
  当然,我们这里给出的属于ASP与WML结合使用的简单例子,但采用这种基本方法,并利用ASP的复杂功能,便可以开发出能够实现丰富功能的WML页面。
 
  例如,下面的ASP程序不仅可以显示“Hello”信息,同时可以显示信息的来源地或所在环境,这是通过利用Request对象的ServerVariables方法来获取服务器的HTTP_X_UP_SUBNO和HTTP_X_UP_UPLINK两个变量实现的。程序代码如下:
 
  ' hellowml.asp
 
  '
 
  Dim msg, subId, uplink
 
  msg = "Hello "
 
  subId = Request.ServerVariables("HTTP_X_UP_SUBNO")
 
  uplink = Request.ServerVariables("HTTP_X_UP_UPLINK")
 
  If Not Len(subId) = 0 Then
 
  msg = msg & "from " & subId
 
  End If
 
  If Not Len(uplink) = 0 Then
 
  msg = msg & " at " & uplink
 
  End If
 
  Response.ContentType = "text/vnd.wap.wml"
 
  Response.write("//WAPFORUM//DTD WML 1.1//EN"" ""http://www.wapforum.org/DTD/wml_1.1.xml"">")
 
  Response.write("
 
  ")
 
  Response.write(msg)
 
  Response.write("
 
  ")
 
  %>
 
  为增强大家对ASP编写WML程序的印象,我们再给出Phone.com提供的一个例子。该例的作用是根据对服务器和客户端设置测试结果的不同,给出不同的警告信息。程序代码如下:
 
  ' pushAlert.asp
 
  '
 
  Dimuplink, subId, url, ttl, alertType, title
 
  DimcontentType, lastResult
 
  contentType = "application/x-up-alert"
 
  uplink = Request.ServerVariables("HTTP_X_UP_UPLINK")
 
  subId = Request.ServerVariables("HTTP_X_UP_SUBNO")
 

(编辑:应用网_常德站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!