1 ASP+XML自动生成静态HTM--杭州精灵电子
用户中心  购物篮
会员登陆  收藏夹
  精灵电子元件网购商城是专业的电子元件批发、零售、网购服务的网站,本商城主要在线销售小家电产品,电子制作小产品,网上购物流行商品,以及数码产品和电脑产品家电维修配件电子元件等等,提供个人以及团体网上最实惠、最安全的购物环境,奉献给广大的网上购物消费者最贴心的服务和最实惠的商品。精灵电子元件物商城的网上购物:价格最低!质量最好!服务最优! 电子元件邮购 小电器,家用电器,网上购物,购物商城。 精灵电子
     星期四
 您的位置: 杭州精灵电子>>电脑网络/办公设备>>ASP+XML自动生成静态HTM
   后您也可以发表文章的哦ASP+XML自动生成静态HTM

<!--process.asp
用于生成临时XML文件,并生成静态HTML文件
-->

<!--#include file="conn.inc"-->
<%
author=request.form("n_author")
title=request.form("n_title")
content=request.form("n_content")

tempXml=replace( replace( replace (now,":",""), "-", ""), " ", "") & ".xml"
dim objdom
set objdom=server.createobject("Microsoft.XMLDOM")
dim objroot
set objroot=objdom.createElement("moonpiazza")
objdom.appendchild objroot

Set objPI = objDom.createProcessingInstruction("xml","version='1.0'")
objDom.insertBefore objPI, objDom.childNodes(0)

dim objbook
set objbook=objdom.createElement("book")
objroot.appendchild objbook

set objtit=objdom.createElement("书名")
objtit.text=title
objbook.appendchild objtit

set objaut=objdom.createElement("作者")
objaut.text=author
objbook.appendchild objaut

set objpri=objdom.createElement("定价")
objpri.text=content
objbook.appendchild objpri

'生成临时XML放于TEMP文件夹下

objdom.save(server.mappath("temp/"&tempXml))

'//以下部分为生成htm部分
cHtmLFile = replace( replace( replace (now,":",""), "-", ""), " ", "") & ".htm"

cXMLFile =server.mappath("temp/"&tempXml)
cXSLFile = Server.MapPath("book.xsl")
cOutputFile = Server.MapPath("news/"&cHtmLFile)

Set oXML = Server.CreateObject("Microsoft.XMLDOM")
oXML.async = false
oXML.load(cXMLFile)

Set oXSL = Server.CreateObject("Microsoft.XMLDOM")
oXSL.async = false
oXSL.load(cXSLFile)

Set oOutput = Server.CreateObject("Microsoft.XMLDOM")
Call oXML.transformNodeToObject(oXSL, oOutput)

oOutput.save (cOutputFile)

Set oXML = Nothing
Set oXSL = Nothing
Set oOutput = Nothing

sql="INSERT INTO news(author,title,content,url) values('"&author&"','"&title&"','"&content&"','news/"&cHtmLFile&"')"

conn.execute(sql)

'生成HTM文件保存到NEWS文件夹下

Response.redirect("news/"&cHtmLFile)

%>

<!--list.asp

文件列表-->

<!--#include file="conn.inc"-->
<%response.contentType="text/html"%>
<html>
<body>
<%
response.write("<table>")
set rs=server.createobject("adodb.recordset")
rs.open "select * from news ",conn,1,1
do while not rs.eof
 response.write("<tr><td><a href="&rs("url")&" target='_blank'>"&rs("title")&"</a></td></tr>")
rs.movenext
loop
response.write("</table>")
%>

发布人:admin 发布时间:2007年10月18日 已被浏览 3280
上一篇教你如何用自己的电脑做服务器
下一篇部分CPU主要功能
电脑网络/办公设备
 I10四核—S805 英菲克I5小馒头刷机教程
 安装 XBMC 中文设置及插件安装等使用教程
 P2P终结者的使用方法
 宽带连接错误:691/623/678/645/720/721/718/734的处理办法
 显示器进入工厂模式的方法
 网站集成支付宝的过程
 ADSL路由器密码大汇集
 花生壳+IIS打造个人FTP服务器
 如何正确选择摄像机镜头
 笔记本电脑维修不为人知的内幕
电路图纸软件下载排行
长虹2129A彩色电视机存储器数
TCL-2501A彩电电路图纸
尚明堂SR-17XX-2电磁炉电
欧林通用型号-4电磁炉电路图纸
卓异2023E 3121 581
KV-F29MF1_KV-F29
LA4270立体声音频功率放大器
长虹C2588K彩电图纸
创维5I30彩色电视机电路原理图
创维5M10彩色电视机中放单元电
友情链接: 电子制作实验室 互易中国 淘宝店 神州宏网 波茵电子 耐王科技淘宝店 电子套件DIY
查ip手机 百度搜索 51单片机论坛 立创EDA开源 
客服:286124798@qq.com  点击这里给我发消息 旺旺: 点击这里给我发消息
© 杭州精灵电子  页面执行时间 72.26563 毫秒 访问量:19515241 
本站淘宝店地址:http://shop34111169.taobao.com/  杭州电子市场
   浙ICP备17031801号