欢迎来到入门教程网!

vb

当前位置:主页 > 软件编程 > vb >

将HTML或txt文件转换为ASP输出的vbs代码

来源:本站原创|时间:2020-01-10|栏目:vb|点击:

使用方法:手工修改html文件的名称与想要生成的asp的文件名称,然后将下面的代码保存为1.vbs,跟1.html放同一个目录双击运行即可。

复制代码 代码如下:

html = "1.html"
asp = "1.asp"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fhtml = fso.OpenTextFile(html, 1)
Set fasp = fso.OpenTextFile(asp, 2, true)
While fhtml.AtEndOfStream <> true
text = fhtml.ReadLine
text = "Response.Write "&""""&Replace(text, """", """""")&""""
fasp.WriteLine(text)
wend
fhtml.close
fasp.close
set fso = nothing
msgbox "success"

上一篇:VBS调用WMI实现搜索硬盘mp3文件

栏    目:vb

下一篇:用vbs读取index.dat内容的实现代码

本文标题:将HTML或txt文件转换为ASP输出的vbs代码

本文地址:https://www.xiuzhanwang.com/a1/vb/7475.html

网页制作CMS教程网络编程软件编程脚本语言数据库服务器

如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。

联系QQ:835971066 | 邮箱:835971066#qq.com(#换成@)

Copyright © 2002-2020 脚本教程网 版权所有