怎么使用ASP生成HTML文件 - 明辉手游网

明辉手游网中心：是一个免费提供流行视频软件教程、在线学习分享的学习平台！

文章发布全站软件文章热门搜索：爱奇艺视频好友流量会员 1分钱字幕资讯首页腾讯视频爱奇艺暴风影音酷狗音乐酷我音乐影音大全软件下载软件教程电脑系统下载聊天工具办公软件杀毒教程系统工具图形图像电脑学习应用软件网络软件苹果应用注册码网站教程技术开发安卓教程其它教程您当前所在位置：网视手游站 -> 技术开发 -> 怎么使用ASP生成HTML文件
怎么使用ASP生成HTML文件发表时间：2023-08-12 来源：明辉站整理相关软件相关文章人气： [摘要]使用ASP生成HTML文件共有两个页面index.htm是首页.程序比较简单，主要是用了ASP里的文件操作对象。 <!--index.htm---------------------->... 使用ASP生成HTML文件共有两个页面index.htm是首页.程序比较简单，主要是用了ASP里的文件操作对象。 <!--index.htm----------------------> <html> <head> <title>Untitled Document</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <body> <table width="770" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td><form name="form1" method="post" action="send.asp"> <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCFFFF"> <tr> <td height="20"><div align="center">发送消息</div></td> </tr> <tr> <td><div align="center"> <textarea name="msg" cols="100" rows="6"></textarea> </div></td> </tr> <tr> <td><div align="center"> <input type="submit" name="Submit" value="Submit"> <input type="reset" name="Submit2" value="Reset"> </div></td> </tr> </table> </form></td> </tr> </table> </body> </html> '//send.asp <% function chan_time(shijian)'转换日期时间函数 s_year=year(shijian) if len(s_year)=2 then s_year="20"&s_year s_month=month(shijian) if s_month<10 then s_month="0"&s_month s_day=day(shijian) if s_day<10 then s_day="0"&s_day s_hour=hour(shijian) if s_hour<10 then s_hour="0"&s_hour s_minute=minute(shijian) if s_minute<10 then s_minute="0"&s_minute chan_time=s_year & s_month & s_day & s_hour & s_minute end function function chan_data(shijian) '转换日期时间函数 s_year=year(shijian) if len(s_year)=2 then s_year="20"&s_year s_month=month(shijian) if s_month<10 then s_month="0"&s_month s_day=day(shijian) if s_day<10 then s_day="0"&s_day chan_data=s_year & s_month & s_day end function function chan_file(shijian)'转换日期时间函数 s_month=month(shijian) if s_month<10 then s_month="0"&s_month s_day=day(shijian) if s_day<10 then s_day="0"&s_day s_hour=hour(shijian) if s_hour<10 then s_hour="0"&s_hour s_minute=minute(shijian) if s_minute<10 then s_minute="0"&s_minute s_ss=second(shijian) if s_ss<10 then s_ss="0"&s_ss chan_file = s_month & s_day & s_hour & s_minute & s_ss end function top="<html><head><title>news</title></head><body>" botom="</body></html>" msg=request.Form("msg") msg=replace(msg,vbcrlf,"") msg=replace(msg,chr(9),"") msg=replace(msg," "," ") msg=replace(msg,"\r\n","<br>") msg=replace(msg,"\n","<br>") msg=top&msg&botom Set fs=Server.CreateObject("Scripting.FileSystemObject") all_tree2=server.mappath("news")&"\"&chan_data(now) if (fs.FolderExists(all_tree2)) then'判断今天的文件夹是否存在 else fs.CreateFolder(all_tree2) end if pass=chan_file(now) randomize '使用系统计时器来初始化乱数产生器 pass=rnd(pass) pass=get_pass(pass) pass=left(pass,10) file1=pass files=file1&".txt" filez=all_tree2&"\"&files set ts = fs.createtextfile(filez,true) '写文件 for z=1 to len(msg) write_now=mid(msg,z,1) ts.write(write_now) next ' ts.writeline(all_msg) ts.close set ts=nothing '文件生成 if err.number<>0 or err then%> <script language="javascript"> alert("不能完成") </script> <%else%> <script language="javascript"> alert("已完成") history.back(); </script> <%end if Set MyFile = fs.GetFile(filez) all_tree2=server.mappath("news")&"\"&chan_data(now) if (fs.FolderExists(all_tree2)) then else fs.CreateFolder(all_tree2) end if MyFile.name= left(MyFile.name,len(MyFile.name)-4)&".htm" set MyFile=nothing set fs=nothing set fdir=nothing function get_pass(pass) pass=cstr(pass) pass=replace(pass," ","") pass=replace(pass," ","") pass=replace(pass,"-","") pass=replace(pass," ","") pass=replace(pass,":","") pass=replace(pass,".","") pass=replace(pass,"+","") pass=replace(pass,"_","") pass=replace(pass,"<","") pass=replace(pass,">","") pass=replace(pass,"!","") pass=replace(pass,"@","") pass=replace(pass,"#","") pass=replace(pass,"$","") pass=replace(pass,"%","") pass=replace(pass,"^","") pass=replace(pass,"&","") pass=replace(pass,"","") pass=replace(pass,"(","") pass=replace(pass,")","") pass=replace(pass,"=","") pass=replace(pass,"\","") pass=replace(pass,"/","") pass=replace(pass," ","") get_pass=pass end function %> 把send.asp和index.htm放到你的ASP目录下，然后再建一个news文件夹。打开浏览器，在地址栏里输入：http://你的机器名/你的ASP虚拟目录名/index.html输入文字，然后提交，OK！看看你的ASP目录里新建的news文件夹里是不是多了个新的文件夹，而且是以当前日期命名的。里面有你刚刚提交的文字，看看是不是生成了HTML文件。怎么样，你可以在此基础上做个简单的新闻发布系统。标签：如何运用ASP生成HTML文件* 上一篇：用Asp隐藏文件路径，完成防盗链下一篇：asp提高首页性能的一个技巧	推荐资讯总人气榜 1PS提示：因为图层已锁定，无法编辑图层的处理方法 2picacg苹果版怎么找不到\|picacg ios版是不是下架了介绍 3Adobe Illustrator CS5 序列号大全 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本） 5Potato(土豆聊天)怎么换头像\|Potato app更改头像方法介绍 6PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程 7Potato(马铃薯聊天)怎么注册不了\|Potato不能注册处理方法介绍 8最新的Adobe Illustrator CS4序列号大全 9Intel i7-9700K性能跑分曝光：同代提升约12% 10qq邮件是否已读怎么看 QQ邮箱已经发出去的邮件怎么知道对方是否已经查看 11XP系统怎么清除缓存？ 12Intel Z390主板有望10月8日公布：8核9代酷睿随后登场 1PHP 留言簿（带Oracle数据库分页的显示技巧） 2php.ini 设置详细选项 3转：Java技术版主Jeru在IBM的DevelopWorks发表的对于设模的文章 4Visual C++剪贴板设置不完全攻略 5基于ACCESS数据库的纯asp论坛制作心得 6PHP新手上路--6. 网络资源 7Csharp+Asp.net系列图文详细教程（二） 8一个技巧完善的专栏管理的程序->这是asp.net的第二个应用(4) 9让动态创建的ActiveX控件响应Windows消息 10股票报价的WebService（转天极网）之5 11怎么合并2个ICON 12PHP.MVC的模板标签系统(5) 最新教程本月人气 1Access给字段添加有效果性 2PHP数据库链接类(PDO+Access)案例 3怎么使用c#设置ACCESS数据库 4通知我软件怎么打开Accessibility service服务？_手机软件图文说明教程 5Access9.8 保存新建的查询 6Excel中的数据怎么导入到Access数据库中? 7Apache的Mode Rewrite模块与.htaccess文件配合 8Excel工作表怎么导入Access数据库数据 9怎么拆分复制的Access 97数据库 10Access怎么含糊参数进行分页查询代码 11在Access2007“迅速访问工具栏”添加更多命令 12Java怎么连接Access数据库_Javascript图文说明教程 1猎豹浏览器抢票不受12306新版验证码影响 2360手机助手红包怎么提现 360手机助手红包提现设置流程 3160wifi远程桌面怎么连接 160wifi远程桌面连接设置方法 4微信PC版1.0.7.33官方下载公布修好bug优化软件 5ios9不越狱怎么恢复短信与照片 ios9不越狱恢复短信与照片图文说明教程 6抱抱app怎么玩抱抱app使用图文说明教程图 7抱抱app免费随机通话使用图文说明教程(图文流程) 8yy游戏直播怎么开 yy游戏直播打开方法 9手机登12306验证码总是出错处理方法介绍 10Linux内核4.2优化了哪一些地方？ 11linux系统使用命令维护RHCS的方法 12Linux系统Dalvik堆内存的管理与回收介绍
相关文章 asp+版本容易的留言板的制作(一) asp+版本容易的留言板的制作(3) asp+版本容易的留言板的制作(二) 强大的数组技巧(asp+程序数组技巧调用) 怎么用asp+取得post的页面的数据 asp+中常用的NameSpace的讲解随机函数生成密码的asp.net版本用浏览器来接收C# 的程序返回的时间cool! DataGrid灵活使用完成目录浏览 asp.net中的vb7中怎么使用socket作一个传送时间的server asp+发送Email完全手册 asp+ 制作图形