-
ASP + Serv-u 实现FTP的代码
<!--#include file="md5.asp"--> <% Dim iniPath,iniFileName,iniStr,tmpStr,n Dim userName,passWord,tmp userName = "myfso222" '用户名 passWord = "awaysrain" '密码 tmp = "ai" '随机...
作者:asdasdasd03-30 -
在ASP编程中使用数组
数组的定义 Dim MyArray MyArray = Array(1,5,123,12,98) 可扩展数组 Dim MyArray() for i = 0 to 10 ReDim Preserve MyArray(i) MyArray(i)=i next 将一个字符串分割并返回分割结果的数组 Dim ...
作者:asdasdasd03-30 -
IE功能汇总
<OBJECT id=WebBrowser height=0 width=0
classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2></OBJECT>
<INPUT onclick=document.all.WebBrowser.ExecWB(1,1) type=button value=... -
Asp遍历服务器对象的代码
复制代码 代码如下:一 遍历Request 方式1: <% For Each r In Request.QueryString Response.Write "Request("""&r&""") = " & Request(r) Response.Write "<p>" Next %> 方式2: <% For i = 1 ...
作者:asdasdasd03-30 -
vbcrlf的意思
常数 值 描述 vbCr Chr(13) 回车符。 vbCrLf Chr(13) & Chr(10) 回车符与换行符。 vbFormFeed C...
作者:asdasdasd03-30 -
FileSystemObject 对象
FileSystemObject 对象
FileSystemObject(FSO) 对象模式包含下面的对象和集合。
对象/集合
描述
FileSystemObject
主对象。包含用来创建、删除和获得有关信息,以及通常用来操作... -
保证asp叶面一定不会出现乱码 UTF8
保证asp叶面一定不会出现乱码的代码应该是这样的:(假定是UTF-8的叶子) <%@ CODEPAGE=65001 %> <% Response.CodePage=65001%> <% Response.Charset="UTF-8" %> 可以建立公共文件code.asp,所有...
作者:asdasdasd03-30 -
asp组件编写准备工作
最近在尝试用组件写asp,一些心得如下,不对之处请指正 经常要重启IIS,所以需要一个批处理的文件,将下面两行代码存为xxx.bat net stop w3svc net start w3svc 经常需要注册、卸载dll,所以需要在...
作者:asdasdasd03-30 -
ASP常用的函数
ASP常用的函数,希望能用的着。
作者:asdasdasd03-30
<%
dim db
db="dbms.mdb"
'******************************************************************
'执行sql语句,不返回值,sql语句最好是如下:
'update 表... -
登陆asp class
复制代码 代码如下:<!-- #include file="conn.asp" --> <!-- #include file="cls_main.asp" --> <!-- #include file="cls_md5.asp" --> <% dim obj set obj = New admin_login call obj.Mai...
作者:asdasdasd03-30 -
FSO 读出TXT文件
<!--#include file="dbconn.asp"-->
作者:asdasdasd03-30
<%
function ReadFile(filename)
on error resume next
err.clear
'ASP的一种校错方法
Const ForReading = 2
Const Create = false
Dim FSO
DIM TS
DIM fi... -
利用AdoDb.Stream对象来读取UTF-8格式的文本文件
复制代码 代码如下:'函数名称:ReadTextFile '作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件 '---------------------------------------------------- Function ReadFromText...
作者:asdasdasd03-30 -
ASP 非法字符过滤函数
复制代码 代码如下:<% '==============================================================检查提交数据合法性 Function CheckInput() '--------定义部份------------------ Dim Fy_Post,Fy_Ge...
作者:asdasdasd03-30 -
Oracle常用功能集锦
数值函数:
作者:asdasdasd03-30
abs(m) m的绝对值
mod(m,n) m被n除后的余数
power(m,n) m的n次方
round(m[,n]) m四舍五入至小数点后n位的值(n缺省为0)
trunc(m[,n]) m截断n位小数位的值(n缺省为0)
---------... -
不用模板,只用ASP+FSO生成静态HTML页的一个方法
FSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题,至少我是这么认为的,还要别外做一个模板,麻烦!,我今天看见有一个方法可以解决这个问题
作者:asdasdasd03-30
如一个正常的index.asp页面,并且用A... -
自动采集程序
复制代码 代码如下:<% On Error Resume Next Const uploadPath = "/uploads/" '文件存放路径 Const allowFileExt = "jpg,wma,swf,gif" '允许被采集的文件类型 'Const allowFileSize...
作者:asdasdasd03-30 -
ASP FSO文件处理函数大全
复制代码 代码如下:<% '建立文件夹函数 Function CreateFolder(strFolder)'参数为相对路径 '首选判断要建立的文件夹是否已经存在 Dim strTestFolder,objFSO strTestFolder = Server...
作者:asdasdasd03-30 -
ASP代码的对象化
提起asp很多人就认为是一堆html脚本和被括在<%和%>之中的一些代码还有就是一些javascript脚本等筹在一起的一些代码的集合,这样的代码,再加上各类的不同格式的注释,看起来就一个字:乱。也不管...
作者:asdasdasd03-30 -
一个简单的HTML病毒分析
一直就想写这篇东西了,只是上班时说要上班,不写,回家后又忙着玩游戏,丢一边去了。现在只好不务正业的开写了,希望头儿不会知道我的blog。哈哈 在很久之前就对HTML的病毒很感兴趣了,很好...
作者:asdasdasd03-30 -
js+asp总结
一直在用JS写ASP,也不是特别原因,只是当初学的是JS,后来学ASP时知道ASP也可以用JS写,就没去学VBS.前几个月刚学ASP的时候找遍了深圳的书店也没有找到一本用JS做脚本语言的ASP书籍,没办法,只能自己...
作者:asdasdasd03-30 -
ASP,FSO遍历目录及目录下文件
<%@ Language=VBScript %>
作者:asdasdasd03-30
<%
'我写的一个遍历目录以及目录下文件的函数,
%>
<%
function bianli(path)
set fso=server.CreateObject("scripting.filesystemobject")
... -
如何使用FSO搜索硬盘文件
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
作者:asdasdasd03-30
<%
dim st
st=timer()
'*************************************************************
'*************搜索硬盘文件的类SearchFile *************
'... -
把字符串转换成数据库SQL语句格式
复制代码 代码如下:'把字符串转换成数据库SQL语句格式 '------------------------------------------------- Function AllStr2Database(str,strType) Dim strTemp:strTemp=str Select C...
作者:asdasdasd03-30 -
asp 常用函数用法
Array() FUNCTION: 返回一个数组 SYNTAX: Array(list) ARGUMENTS: 字符,数字均可 EXAMPLE: <% Dim myArray() For i = 1 to 7 Redim Preserve myArr...
作者:asdasdasd03-30 -
解决rs.absolutepage=-1的问题
有时候在做asp的分页程序的时候会遇到无法分页的情况,就试着把rs.absolutepage打印出来结果却一直为-1。 下面介绍一种解决方案: .......省略 rs.cursorlocation=3 '就是加上这行 rs.open sql...
作者:asdasdasd03-30