专栏首页加菲猫的VFP扩大一倍,VFPBS使用ASP的资源和组件的秘招

扩大一倍,VFPBS使用ASP的资源和组件的秘招

虽然ASP也已经不更新了,但是中国早期开发的网站都是用ASP开发的,所以相对VFP来说,ASP的资源和教程是很多的,这些资源大部分是可以被VFP所用的。

我们先从ASP的FileSystemObject对象来讲,其实FileSystemObject对象是个com,也就是几乎所有的语言都是可以调用的。

ASP FileSystemObject 对象

FileSystemObject 对象用于访问服务器上的文件系统。此对象可对文件、文件夹以及目录路径进行操作。也可通过此对象获取文件系统的信息。

新建一个a.asp,下面的代码会创建一个文本文件 (c:\test.txt),然后向这个文件写一些文本:

<%
dim fs,fname
      set fs=Server.CreateObject("Scripting.FileSystemObject")
      set fname=fs.CreateTextFile("c:\test.txt",true)
      fname.WriteLine("Hello World!")
      fname.Close
   set fname=nothing
   set fs=nothing
%>

那么在VFPBS中怎么使用呢?非常简单!

新建模板HTML,输入如下代码

<%
      fs=CreateObject("Scripting.FileSystemObject")
			fname=fs.CreateTextFile("c:\test.txt",.T.)
      fname.WriteLine("Hello World!")
      fname.Close()
%>

也可以写在后端的controller类中

Define Class ctl_asp As Session
	Procedure test
		fs=Createobject("Scripting.FileSystemObject")
		fname=fs.CreateTextFile("c:\test.txt",.T.)
		fname.WriteLine("Hello World!")
		fname.Close()
	Endproc

Enddefine

是不是非常简单,像图片加水印,广告组件什么的,都可以使用ASP的相应组件。

FileSystemObject 对象的属性和方法描述如下:

属性

描述

Drives

返回本地计算机上所有驱动器对象的集合。

方法

方法

描述

BuildPath

将一个名称追加到已有的路径后

CopyFile

从一个位置向另一个位置拷贝一个或多个文件。

CopyFolder

从一个位置向另一个位置拷贝一个或多个文件夹。

CreateFolder

创建新文件夹。

CreateTextFile

创建文本文件,并返回一个 TextStream 对象。

DeleteFile

删除一个或者多个指定的文件。

DeleteFolder

删除一个或者多个指定的文件夹。

DriveExists

检查指定的驱动器是否存在。

FileExists

检查指定的文件是否存在。

FolderExists

检查某个文件夹是否存在。

GetAbsolutePathName

针对指定的路径返回从驱动器根部起始的完整路径。

GetBaseName

返回指定文件或者文件夹的基名称。

GetDrive

返回指定路径中所对应的驱动器的 Drive 对象。

GetDriveName

返回指定的路径的驱动器名称。

GetExtensionName

返回在指定的路径中最后一个成分的文件扩展名。

GetFile

返回一个针对指定路径的 File 对象。

GetFileName

返回在指定的路径中最后一个成分的文件名。

GetFolder

返回一个针对指定路径的 Folder 对象。

GetParentFolderName

返回在指定的路径中最后一个成分的父文件名称。

GetSpecialFolder

返回某些 Windows 的特殊文件夹的路径。

GetTempName

返回一个随机生成的文件或文件夹。

MoveFile

从一个位置向另一个位置移动一个或多个文件。

MoveFolder

从一个位置向另一个位置移动一个或多个文件夹。

OpenTextFile

打开文件,并返回一个用于访问此文件的 TextStream 对象。

FileSystemObject 组件的更多用法可以百度哦。

我会找些好用的ASP组件,让大家的BS之旅更加舒适。

写在最后面的话

加菲猫的VFP公众号接受投稿,一经采用,即有稿费,稿费暂定50元一篇。

加菲猫的vfp倡导用VFP极简混合开发,少写代码、快速出活,用VFP,但不局限于VFP,各种语言混合开发。

已经带领一百多名会员成功掌到VFP的黑科技,进入了移动互联网时代,接下来我们要进入物联网领域。

本文分享自微信公众号 - 加菲猫的VFP(VFPPLUS),作者:加菲猫的VFP

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2021-09-16

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • 中国 SaaS 二十年的进化

    ? 来源:牛透社|作者:崔牛会、崔强 | 编辑:燕子 ---- 腾讯SaaS加速器 三期40席项目招募 报名方式 腾讯SaaS加速器,作为腾讯产业加速器的重要...

    腾讯SaaS加速器
  • 百度网盘又被限速,终极加速大法来了!

    百度网盘提速下载神器 Pandownload 最近好像被限速了,莱蒙随便试了个链接,使用切换 UserAgent 的网页下载方法只能达到 1MB/s 的速度:

    小小詹同学
  • PHP 与 JSP 比较(PHP、ASP、JSP是什么)

      PHP(Hypertext Preprocessor)是一种嵌入HTML页面中的脚本语言。它大量地借用C和Perl语言的语法, 并结合PHP自己的特性,使W...

    微风-- 轻许--
  • 常见中间件漏洞(续)

    WebDAV(Web-based Distributed AuthoringVersioning,基于Web的分布式创作和版本控制) 一种基于 HTTP 1.1...

    字节脉搏实验室
  • JavaWeb学习总结(一)——JavaWeb开发入门

      WEB,在英语中web即表示网页的意思,它用于表示Internet主机上供外界访问的资源。   Internet上供外界访问的Web资源分为:

    Java团长
  • 谷歌宣布开放Cloud TPU,每小时6.5美元,英伟达还坐得住吗?

    镁客网
  • 一个人的武林:渗透测试常规分析(一)

    这门技术(艺术)一开始也不是每个人都会的,正所谓没有人一出生就会走路,从不懂到入门到深谙,一步步慢慢来,每个人都是这样;但是在这个过程中,思路无疑是最重要的,没...

    HACK学习
  • ASP.NET特写

    本文由来源 21aspnet,由 javajgs_com 整理编辑,其版权均为 21aspnet 所有,文章内容系作者个人观点,不代表 Java架构师...

    Java架构师必看
  • 云原生分布式深度学习初探

    大规模数据以及大型的神经网络结合在很多机器学习的任务上带来了超凡的表现。在训练深度学习模型的时候,当数据以及参数量变大的时候计算资源是决定我们算法迭代速度的关键...

    溪歪歪
  • BS开发必须知道的两个函数,掌握它就入门啦

    极简VFPBS入门公开课程已经进行了三场了,大家学习的气氛也是极好的,甚至让我尽快开物联网的课程。我现在整理一下昨天公开课的一些资料,大家努力珍惜在社群学习的机...

    加菲猫的VFP
  • daydao入选「2020中国ToB新增长势力TOP榜」|腾讯SaaS加速器·学员动态

    ? 来源 | 腾讯SaaS加速器首期项目-理才网 ---- ——腾讯SaaS加速器 二期30席项目招募—— 报名方式 腾讯SaaS加速器,作为腾讯产业加速器的...

    腾讯SaaS加速器
  • 一个程序员重写一个旧系统的故事(二)

    最近又干了件吃力不讨好的事情,把公司一套旧系统的后台给重写了。有同学心里可能在嘀咕了,又重写系统,你怎么就这么仇视别的同事的工作成果,拿着公司给你的报酬,却做着...

    用户1608022
  • 人均年薪400万、公司年亏40亿,正在盖大楼的DeepMind最新财务数据曝光

    这不是随便哪家AI公司,这是打造了AlphaGo的DeepMind,也可能是整个AI行业的真实写照。

    量子位
  • 武林秘籍之设计模式迷你手册

    编程是一个江湖,江湖之大,鱼龙混杂,一部分江湖人士乃虾兵蟹将,一不小心就被一箭射死,我们称之为“码农”,这些人事江湖的重要组成部分,他们承担着堆砌代码,实现功能...

    陈宇明
  • 不读研,没出路?全国最疯狂考研地区榜

    1978年,我国开始恢复招收研究生,那时招生数量仅一万出头。到2017年,研究生报名人数突破200万,共招收80余万人,比首届学生增加了大约74倍。

    昱良
  • 独家编译 | 硅谷大数据公司Cloudera秘密提交IPO申请 拟募集41亿美元

    数据猿导读 彭博消息,硅谷大数据公司Cloudera正在准备进行IPO,首次公开发售拟筹约41亿美元。据报道,其IPO申报工作于早些时候被秘密提交给了美国证券交...

    数据猿
  • 面向高维度的机器学习的计算框架-Angel

    简介 为支持超大维度机器学习模型运算,腾讯数据平台部与香港科技大学合作开发了面向机器学习的分布式计算框架——Angel 1.0。 Angel是使用Java语言开...

    腾讯大数据
  • mssql注入

    一些sql扩展 xp_regaddmultistring xp_regdeletekey 删除键名 xp_regdeletevalue 删除键值 xp_...

    赵腰静
  • 码云周刊 | 面试之前,或许该高效率地学点干货!

    一周热门资讯回顾 1、程序员多大年纪算高龄,届时该何去何从? ? 随着年龄的增长,程序员会相对难以保持技能更新。许多人宁愿留在自己的舒适区,不冒任何风险。即使...

    码云Gitee

扫码关注云+社区

领取腾讯云代金券