将HTML或txt文件转换为ASP输出的vbs代码
导读：收集整理的这篇文章主要介绍了将HTML或txt文件转换为ASP输出的vbs代码，觉得挺不错的，现在分享给大家，也给大家做个参考。 使用方法:手工修改htML文件的名称与想要生成的asp的...
收集整理的这篇文章主要介绍了将HTML或txt文件转换为ASP输出的vbs代码，觉得挺不错的，现在分享给大家，也给大家做个参考。 使用方法:手工修改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"
@H_777_22@ 您可能感兴趣的文章:
- VBS合并一个文件夹里的TXT的实现代码
- vbs解决处理TXT文本数据相关问题实现代码
- VBS实现将Excel表格保存为txt文本
- TXT转HTM、HTML「TXT转网页」的vbs实现代码
- 用vbs产生的若干个随机数并写入到一个.txt中的代码
- 用VBS将一篇txt后缀的内容保存为html格式
- vbs实现的支持拖动的txt文本切割器
- vbs操作txt文本文件常用方法与函数代码
声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！
若转载请注明出处： 将HTML或txt文件转换为ASP输出的vbs代码
本文地址： https://pptw.com/jishu/609858.html