ITPub博客

首页 > Linux操作系统 > Linux操作系统 > xml+asp+xsl实现wap1.2和html页面输出(转)

xml+asp+xsl实现wap1.2和html页面输出(转)

原创 Linux操作系统 作者:jcszjswkzhou 时间:2019-04-29 09:03:04 0 删除 编辑
xml的资源文件
catalog.xml




bicyle
loveChina,我爱你中国。
中国
Columbia
10.90
1982


bicyle
loveChina,我爱你中国。
中国
Columbia
10.90
1982




catalog_html.xsl


" target="_blank">http://www.w3.org/TR/WD-xsl">












TitleArtist







catalog_wap.xsl



" target="_blank">http://www.w3.org/TR/WD-xsl">








中国,我爱你

bicyle.126.com







index.asp

<%
liulanqi=request.ServerVariables("HTTP_User-Agent")
if Instr(liulanqi,"Mozilla")<>0 then
xls_use="catalog_html.xsl"
else
xls_use="catalog_wap.xsl"
Response.ContentType = "text/vnd.wap.wml"
response.Write("")
response.Write("")" target="_blank">http://www.wapforum.org/DTD/wml_1.1.xml'>")
end if

'Load the XML
set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = false
xml.load(Server.MapPath("catalog.xml"))
'Load the XSL
set xsl = Server.CreateObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load(Server.MapPath(xls_use))
'Transform the file
Response.Write(xml.transformNode(xsl))
%>

以上文件为以前学习xml后,学着编写的适合ie浏览器和手机、wap模拟器访问演示的程序代码,根据不同的设备生成两种代码。
希望大家提意见:以更好开发xml的多平台应用。

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-125307/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2007-08-29

  • 博文量
    3488
  • 访问量
    2621614