无需技术,做网站,你也牛!
所有新购主机 增送数据库
操作简洁 功能强大
专业团队 资深背景
微信搜索:cn163ns
主要功能是针对微信商家公众号提供与众不同的、有针对性的营销推广服务。通过微信平台,用户可以轻松管理自己的微信各类信息,对微信公众账号进行维护、开展智能机器人、在线发优惠劵、抽奖、刮奖、派发会员卡、打造微官网、开启微团购等多种活动,对微信营销实现有效监控,极大扩展潜在客户群和实现企业的运营目标。无使用时间和功能限制
本文使用VB来实现的,主要介绍两种方法:
方法一:
Dim objFso
Set objFso = CreateObject("Scripting.FileSystemObject")
方法二:
工程->引用->Microsoft Scripting Runtime
第二种相对简单些,但是有的时候,会提示 不能加载SCRRUN.dll,此时就只能用第一种了,我用第一种的时候,还提示 什么什么没注册 在 运行 那输入 regsvr32 scrrun.dll 注册一下即可正常使用了
下面是一个删除文件的简单例子:
Dim Fso
Dim File1
Private Sub Command1_Click() ’点击按钮则删除
Fso.DeleteFile (File1)
End Sub
Private Sub Form_Load()
Set Fso = CreateObject("scripting.filesystemobject")
Set File1 = Fso.GetFile("F:\web\123.rar")
'请保证文件存在 不然会报错
End Sub
文章来源:http://www.hulian.top,转载请注明!