自动生成HTML的一段程序

if SaveFile("list.htm","http://192.168.1.4:920/lcy.asp") then Response.write "已生成"

else

Response.write "没有生成"

end if

function SaveFile(LocalFileName,RemoteFileUrl)

Dim Ads, Retrieval, GetRemoteData

On Error Resume Next

Set Retrieval = Server.CreateObject("Microso" & "ft.XM" & "LHTTP")

With Retrieval

.Open "Get", RemoteFileUrl, False, "", ""

.Send

GetRemoteData = .ResponseBody

End With

Set Retrieval = Nothing Set Ads = Server.CreateObject("Ado" & "db.Str" & "eam") With Ads

.Type = 1

.Open

.Write GetRemoteData

.SaveToFile Server.MapPath(LocalFileName), 2

.Cancel()

.Close()

End With

Set Ads=nothing if err <> 0 then

SaveFile = false

err.clear

else

SaveFile = true end ifEnd function

自动生成HTML的一段程序相关推荐

用MATLAB写一个自动生成福利彩票双色球号码的程序
用MATLAB写一个自动生成福利彩票双色球号码的程序规则红色球:1-33号任选6个蓝色球:1-16号任选1个 red = randi([1,33],1,6); disp('红色球'); fpri ...
自动生成小学四则运算题目的程序.心得体会
http://t.cn/RAS67B0 源代码 #include<stdio.h> #include<stdlib.h> #include<time.h> main ...
【用AI写周报，“卷死”同事】打造一款自动生成周报的微信小程序
文章目录前言步骤1:创建账号步骤2:创建一个微信小程序并配置API. 步骤3:在微信开发者工具中创建一个新的微信小程序项目步骤4:创建ChatGPT API云函数步骤5:创建UI界面步骤6 ...
软件工程关于自动生成四则运算题目程序的见解
1.需求分析一个程序员在编写程序前第一件事就是要知道我要编写的程序是要干什么的,它要那些功能. 题目中要求一个能自动生成小学四则运算题目的程序,分析起来很简单,做起来也很简单. 2.实施由于是小学 ...
根据Excel表的配置，自动生成数据库表的CRUD以及相关的Winform列表和编辑界面程序文件，接上篇(自动生成实体类)
本文仍然属于一个自动生成代码工具. 上一篇我们根据数据库表的信息,自动生成实体类.cs文件.这次我们根据Excel配置,直接生成CRUD以及窗体列表和编辑界面相关的程序源文件. 通过自动生成代码,这样 ...
ES批量索引写入时的ID自动生成算法
对bulk request的处理流程: 1.遍历所有的request,对其做一些加工,主要包括:获取routing(如果mapping里有的话).指定的timestamp(如果没有带timestamp ...
用Python自动生成NBA巨星生涯数据曲线
1.序之前写过一个用 python 自动生成球员职业生涯数据的程序(原文请关注本人公众号),大家的反响很好,我也感到很欣慰.有问我怎么做的,如何学 python 的,也有提建议说集成到 web 里面 ...
终于好了，自动生成支付宝自定义收款码
之前看到一篇关于xposed 介绍, 发现用xposed 可以用手机做很多好玩的东西.就研究用这个做了一个可以自动生成收款的码的程序.仅个人学习使用, 通过hook 支付宝函数, 可以调用支付宝生成个 ...
用java做小学数学系统_小学生数学练习题目自动生成系统——java课程设计
<小学生数学练习题目自动生成系统--java课程设计>由会员分享,可在线阅读,更多相关<小学生数学练习题目自动生成系统--java课程设计(37页珍藏版)>请在金锄头文库上搜索 ...

自动生成HTML的一段程序

自动生成HTML的一段程序相关推荐

最新文章

热门文章