2006年4月10日
ASP导出数据到Excel
摘要： 1、用Office组件完成。 sub Test() dim objExcel dim objExcelSheets,objExcelBook,objExcelSheet if Isobject(objExcel) then objExcel.Quit set objExcel=nothing end if strsql="SELECT id, title, author,url FROM art... 阅读全文
posted @ 2006-04-10 14:33 lonelywolf 阅读(2066) 评论(2) 推荐(0) 编辑
ASP通URL解析生成静态页面
摘要： 跟前一篇差不多，只是方法不同，和生成速度不同。呵呵，比较简单。'1、输入url目标网页地址，返回值getHTTPPage是目标网页的html代码 Function getHTTPPage(url) dim Http set Http=createobject("Msxml2.XMLHTTP") Http.open "post",url,false,"","" Http.send if Http.r... 阅读全文
posted @ 2006-04-10 13:48 lonelywolf 阅读(758) 评论(0) 推荐(0) 编辑
ASP使用模板生成静态页面
摘要： 发现自己的记性越来越不好了。哎，怕忘了，把它记下来吧。发现自己倒退了许多，为了糊口又做起了自己不会的ASP。哎！！！其实跟ASP.NET的原理是一样的，可能通用。简单的写一下。其实这个东西也很简单，我在这里简单的写一下重要的东西。变量替换就不写。这个是读模板的操作，strModelFile是模板的名字function readModel(strModelFile) readModel = "" ... 阅读全文
posted @ 2006-04-10 13:43 lonelywolf 阅读(644) 评论(0) 推荐(0) 编辑