| 利用FSO取得BMP，JPG，PNG，GIF文件信息 |
| <%
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
'::: BMP, GIF, JPG and PNG :::
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
'::…… |
|
| 三种禁用FileSystemObject组件的方法 |
| 众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组
件。…… |
|
| 清空iis log 中自己登录ip的vbs |
| Option Explicit
Dim sourcefile,ipaddress,objargs
const destfile="tempfile"
Const ForWriting = 2
Dim Text
Dim fso,objNet,ServiceObj
Dim txtStream, txtStreamOut
Set objArgs = WScript.Arguments
If objArgs.Count = 2 Then
sourcefile=objArgs(0)
ipaddress=…… |
|
| fso的一些特殊功能 |
| 下面列举一下这些不常用但是却非常酷的功能：
很少被了解的FSO功能
GetSpecialFolder Method 返回特定的Windows文件夹的路径: Windows安装目录；Windows系统目录；Windows临时目录 FSO.GetSpecialFolder([0, 1, or 2])
GetTempName Method 返回一个随机产生的文件或者目录名字，用于需要存储临时数据时
Ge…… |
|
| 使用FSO按文件大小浏览文件目录并进行删除操作 |
| <%@ Language=VBScript %>
<%Server.ScriptTimeout=50000%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</HEAD>
<BODY>
<%
function JudgeParaR…… |
|
| 一个老个写的无组件上传 |
| <!--#include file="../lib/filelib.asp"-->
<%
Response.write "<title>上传文件至当前文件夹</title>"
Response.Write "<body bgcolor=""#D6D3CE"" leftmargin=""0"" topmargin=""0"" title = "" 请您遵守国家相关法律法规上传文件。上传前请杀毒，否则系统将会自动删除此文件！""…… |
|
| NAV导致IIS调用FSO失败的解决方法 |
| 症状：
当你浏览调用FileSystemObject的ASP页面时，
对页面的请求处于停止状态并最终导致页面在浏览器中的超时。
原因：
这种问题是因为 Norton Antivirus 软件的 Script Blocking
功能阻止了脚本操作对文件系统的访问，例如使用 FileSystemObject。
这种问题不仅在ASP网络应用程序中存在，同时它也会在其他技术…… |
|
| 构建免受 FSO 威胁虚拟主机（三） |
| 此时会弹出如下图所示的“安全”警告，点“删除”：
<IMG SRC="http://202.100.116.12/paddy/bbsimages/fsosafe/012.gif" border=0>
此时安全选项卡中的所有组和用户都将被清空（如果没有清空，请使用“删除”将其清空），然后点“添加”按钮。
<IMG SRC="http://202.100.116.12/paddy/bbsimages/fsosafe/0…… |
|
| 构建免受 FSO 威胁虚拟主机（二） |
| 在弹出的“选择 组”对话框中找到“Guests”，点“添加”，此组就会出现在下方的文本框中，然后点“确定”：
<IMG SRC="http://202.100.116.12/paddy/bbsimages/fsosafe/007.gif" border=0>
出现的就是如下图所示的内容，点“确定”关闭此对话框：
<IMG SRC="http://202.100.116.12/paddy/bbsimages/fsosaf…… |
|
| 构建免受 FSO 威胁虚拟主机（一） |
| 现在绝大多数的虚拟主机都禁用了 ASP 的标准组件：FileSystemObject，因为这个组件为 ASP 提供了强大的文件系统访问能力，可以对服务器硬盘上的任何文件进行读、写、复制、删除、改名等操作（当然，这是指在使用默认设置的 Windows NT / 2000 下才能做到）。但是禁止此组件后，引起的后果就是所有利用这个组件的 ASP 将…… |
|
| 类似于iis浏览的功能 |
| <!---将此文件存为folder_list.asp看看效果就知道了加上权限就可以方便自己了,--->
<%
'const_domain_name为域名最后不要加斜杠
const const_domain_name="http://localhost"
%>
<style>
b,img,a{font-size:9pt;line-height:150%;text-decoration:none;color:#0000cc;}
span{font-size:12pt;}
&l…… |
|
| 巧用FileSystem组件实现WEB应用中的本地特定打印 |
| 1、引言
随着Internet的飞速发展，许多企业都纷纷开发基于WEB的业务应用系统。一般情况下，基于WEB的业务应用都采用三层或三层以上的结构，前台即客户端是普通的WEB浏览器，中间业务逻辑应用层存放于WEB服务器上，由WEB服务器上的服务构件访问后台数据库。为了业务系统与Internet的互联，WEB服务器和数据库系统均托管在ID…… |
|
| ASP中FSO对象对IIS WEB服务器数据安全的威胁及对策 |
| scripting.filesystemobject 对象是由 scrrun.dll 提供的许多供 vbscript/jscript 控制的 com 对象之一。scripting.filesystemobject 提供了非常便利的文本文件和文件目录的访问，但是同时也对 iis web 服务器数据安全造成了一定的威胁。
filefinder 的代码很简单，由3 个函数和 30 行左右的顺序代码构成。
最关键的…… |
|
| 文件的读出 编辑 管理 |
| <%
urlpath="http://"&Request.ServerVariables("SERVER_NAME")
dim cpath,lpath
set fsoBrowse=CreateObject("Scripting.FileSystemObject")
if Request("path")="" then
lpath="/"
else
lpath=Request("path")&"/"
end if
if Request("attrib")="true" then
cpath=lpath
attrib="true"
else
cpath=Server…… |
|
| 怎样判断一个盘上是否有文件 |
| <%
dim objfolder
dim objfso
dim j
set fso=server.CreateObject("scripting.filesystemobject")
set objfolder=fso.GetFolder("d:/")
if objfolder.size>0 then
j=0
for each objfile in objfolder.files
j=j+1
next
if j>0 then '此盘上有文…… |
|
| 用ASP实现对MP3曲目信息的操作 |
| 先简单说一下MP3的ID3 标记，因为主要是操作这个玩意
MP3最开始的时候没有我们今天看到的那样，有歌手、年代，专集等等信息
只有一些简单的参数如yes/no来表示是不是privated或者copyrighted等信息，这样对MP3的相关工作带来了很多不便，1996年的时候有个老外提出来在每个MP3后面追加一段数据，用以存放上述的那些信息，…… |
|
| 关于用ADO STREAM做的无组件上传程序简单介绍 |
| 前面有人贴了用ADO STREAM做的无组件上传程序，今天我做一下关于它的简单介绍
以前，如果要用ASP操作文件，比如移动、复制、删除或者创建一个记事本文件，基本上都是通过FILESYSTEMOBJECT对象做的，当然，这个东西很专业，也没说什么不好，它可以提供完善的文件信息，比如建立时间，大小，上次修改时间等等，但是如果你不…… |
|
| 从文本文件中读取信息并存储入数据库 |
| ''===================================================================
''从文本文件中读取信息，取其中的一部分，并且将其插入到数据库中去……
'' [email protected]
'' version 1.0
''===================================================================
<%
dim fso,f1
Const ForReading = 1
set fso=…… |
|
| 文本搜索 |
| <%
Head = "搜索"
SearchString = Request("SearchString")
count=0
'把当前目录的实际路径转换为虚拟路径
Function UnMapPath( Path )
UnMapPath = Replace(Mid(Path, Len(Server.MapPath("/")) + 1), "\", "/")
End Function
Function SearchFile( f, s, title )
Set fo = fs.OpenTextFile(f)
…… |
|
| FileSystemObject处理文件 |
| 有两种主要的文件处理类型：
创建、添加或删除数据，以及读取文件
移动、复制和删除文件
创建文件
创建空文本文件（有时被叫做“文本流”）有三种方法。
第一种方法是用 CreateTextFile 方法。 下面的示例示范了在 VBScript 中如何用这种方法来创建文本文件：
Dim fso, f1
Set fso = CreateObject("Scriptin…… |
|
| [1][2] › » 20条/页 共27条 |
