Asp教程_站长网

asp 获取中文句子头一个字的大写拼音字母的函数

所属栏目：[Asp教程] 日期：2023-09-19 热度：5766

取得中文句子头一个字的大写拼音字母

<%

'******************************

'函数：getpychar(char)

'参数：char,任意中文字符或句子

'作者：阿里西西

'日期：2007/7/15[详细]
定期自主运行ASP程式的代码

所属栏目：[Asp教程] 日期：2023-09-19 热度：3820

常有人希望在某個特定時間，可以自動某支 ASP 程式，進行某項作業，比如：發電子信、資料庫整理等。

方法

一、你可以去找 aspexe 元件來使用

二、你可以使用 WSH的方式來處理。以下文章是轉載至某個大陸[详细]
推荐ASP实现缓存类无错版

所属栏目：[Asp教程] 日期：2023-09-19 热度：4214

<%

'**********************************************

'vbs Cache类

' 属性valid，是否可用，取值前判断

' 属性name，cache名，新建对象后赋值

' 方法add(值,到期时间)，设[详细]
asp下顺利实现重新排序数字数组的代码

所属栏目：[Asp教程] 日期：2023-09-19 热度：5235

<%

'******************************

'函数：NewOrder(ArrStr)

'参数：Rstr,以逗号做分隔的数字数组

'作者：阿里西西

'日期：2007/7/13

'描述：重排序数字数组
[详细]
RegExp对象提供容易的正则表达式支持功能使用说明

所属栏目：[Asp教程] 日期：2023-09-19 热度：9792

RegExp对象的用法：

RegExpTest(patrn, strng)

Dim regEx, Match, Matches ' 建立变量。

Set regEx = New RegExp ' 建立正则表达式。

regEx.Pattern = patrn ' 设置模式。

regEx.I[详细]
asp下剔除数组中重复项的方法

所属栏目：[Asp教程] 日期：2023-09-19 热度：6629

复制代码代码如下:

<%

Function MoveR(Rstr)

Dim i,SpStr

SpStr = Split(Rstr,",")

For i = 0 To Ubound(Spstr)

If I = 0 then

MoveR = MoveR & SpStr(i) & ","

Else

If instr[详细]
用实现ASP批量清空目录及文件的代码

所属栏目：[Asp教程] 日期：2023-09-19 热度：2588

函数过程：

复制代码代码如下:

<%

'del.asp

dim fso,tmpfolder,tmpsubfolder,tmpfile,tmpfiles

set fso=server.CreateObject("Scripting.FileSystemObject")

sub delfolder(sPath)
[详细]
asp Chr 函数数字转字母的方法分享

所属栏目：[Asp教程] 日期：2023-09-19 热度：1446

Chr 函数

返回与指定的 ANSI 字符代码相对应的字符。

Chr(charcode)

charcode 参数是可以标识字符的数字。

说明

从 0 到 31 的数字表示标准的不可打印的 ASCII 代码。例如，Chr(10) 返回换行符。[详细]
asp重定向页面的方法汇总

所属栏目：[Asp教程] 日期：2023-09-18 热度：7701

返回上一页，一般用在判断信息提交是否完全之后<%

'******************************

'函数：GoBack()

'参数：无

'作者：阿里西西

'日期：2007/7/13

'描述：返回上一[详细]
asp 实现检测字符串是不是为纯字母和数字组合的函数

所属栏目：[Asp教程] 日期：2023-09-18 热度：1774

示例：<%=CheckString(strng)%>

'******************************

Function CheckString(strng)

CheckString = true

Dim regEx, Match

Set regEx = New RegExp

regEx.P[详细]
使用asp可以跳转到数值并以千分为单位进行数位处理

所属栏目：[Asp教程] 日期：2023-09-18 热度：6280

示例：<%=comma("120300")%>

'******************************

function comma(str)

if not(isnumeric(str)) or str = 0 then

result = 0

elseif len(fix(str)) < 4 then

result = str[详细]
asp 下用正则表达式测试邮箱格式的函数

所属栏目：[Asp教程] 日期：2023-09-18 热度：4017

示例：<%=IsValidEmail(ali@alixixi.com)%>

'*********************************************************

Function IsValidEmail(str)

Dim regEx

Set regEx = New RegExp

regEx.Pattern = [详细]
asp 用InStr查询特定字符串的代码

所属栏目：[Asp教程] 日期：2023-09-18 热度：1605

今天才发现这个函数的作用，原来可以查找特定的字符或者字符串。

下面是我写的简单例子：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<% Response.CodePage=65001%>

<% Response.Charset="UTF-8" %[详细]
asp 下形成任意位数随机密码的代码

所属栏目：[Asp教程] 日期：2023-09-18 热度：7792

'示例：<%=MakePassword(8)%>

'******************************

function MakePassword(byval maxlen)

dim strnewpass

dim whatsnext, upper, lower, intcounter

randomize

for int[详细]
可以实现ASP中针对文件大小进行格式化为以MB为单位的函数

所属栏目：[Asp教程] 日期：2023-09-18 热度：6145

<%

'******************************

'函数：FormatFileSize(l1)

'参数：l1,字节数

'作者：阿里西西

'日期：2007/7/12

'描述：格式化文件大小样式

'示例：[详细]
asp实现二进制字符串替换为Unicode字符串

所属栏目：[Asp教程] 日期：2023-09-18 热度：2084

若需要utf-8格式，请自行将下面的GB2312改成utf-8。

' 二进制转字符串，否则会出现乱码的！

Function sTb(vin)

Const adTypeText = 2

Dim BytesStream,StringReturn

[详细]
asp遍历站点全部文件夹的代码

所属栏目：[Asp教程] 日期：2023-09-18 热度：3275



<style>



</style>

<script language="vbscript">

<!--

sub fsubmit()

form1.submit

End[详细]
ASP对网页进行保障的简单代码 ip

所属栏目：[Asp教程] 日期：2023-09-18 热度：4005

要使用request对象的ServerVariables属性，通过它来获得环境变量的值。使用的语法为：Request.ServerVariables(variable)，“variable”表示环境变量的名称，如服务器主机名称、Web服务器软件名等等，若&l[详细]
asp下获取客户端IP地址函数转换IP地址函数

所属栏目：[Asp教程] 日期：2023-09-16 热度：5620

<%

'******************************

'函数：Userip()

'参数：无

'作者：阿里西西

'日期：2007/7/12

'描述：取得客户端IP地址

'示例：<%=Userip()%>

&[详细]
asp下实现截取字符串特选部分内容函数

所属栏目：[Asp教程] 日期：2023-09-16 热度：9876

截取字符串特定部分内容函数<%

'******************************

'函数：GetKey(HTML,Start,Last)

'参数：HTML,待截取的原字符串；tart,截取开始标记；last,截取结束标记

'作者：阿[详细]
asp巧用fso给文件夹和文件改名的代码

所属栏目：[Asp教程] 日期：2023-09-16 热度：9813

<%

Dim fso,f,folder

Set fso=Server.CreateObject("scripting.filesystemobject")

'改目录名

Set folder=fso.getfolder(Server.Mappath("Old"))

folder.name="New" '新[详细]
asp去除全部的超级链接的两种方法

所属栏目：[Asp教程] 日期：2023-09-16 热度：3314

<%

'******************************

'函数：RemoveHref_A(HTMLstr)

'参数：HTMLstr，待去除链接的字符串

'作者：阿里西西

'日期：2007/7/12

'描述：去除字符串中所[详细]
ASP的Global.asa使用阐述

所属栏目：[Asp教程] 日期：2023-09-16 热度：4335

SP组件就不叙述了,遇到重要的组件(主要是第三方的组件),如上传组件等等,再专门

.asa是文件后缀名,它是Active Server Application的首字母缩写。Global.asa文件可以

管理在ASP应用中两个非常苛刻的对象:Appli[详细]
采用ASP生成UTF-8网页文件的两种方法

所属栏目：[Asp教程] 日期：2023-09-16 热度：2777

方法一：createtextfile生成文件方法

复制代码代码如下:

<%function WriteToFile(FileName,FileContent)

set fso=server.createobject("scripting.filesystemobject")

set fp=fso.createtext[详细]
运用asp脚本实现限制IP访问

所属栏目：[Asp教程] 日期：2023-09-16 热度：841

cookies跨不了域很麻烦,有了这个脚本就方便多了.

<%

ip=Request.ServerVariables("REMOTE_ADDR")

set Fso=CreateObject("Scripting.FileSystemObject")

Set Files=Fso.OpenTextFile(server.mappath([详细]

2060

首页

尾页