用ASP实现远程将文件批量改名的代码

2017年02月06日 70 阅读

＜% @LANGUAGE = VBSCRIPT %＞＜%Option Explicit%＞＜%"以下程序批量改名文件夹中的文件名，并将所有文件移动到新的文件夹；Response.Write "＜html＞" & VbCrLf & "＜head＞" & VbCrLfResponse.Write "＜title＞批量文件改名＜/title＞" & VbCrLfResponse.Write "＜/head＞" & VbCrLf & "＜body＞" & VbCr...

在Asp程序中取得表单所有内容的代码

2017年02月06日 60 阅读

在Asp中如何得到所有表单的名称跟对应的值。其实，这个问题很简单，但是可能还是有很多人不知道该怎么做，所以特地写下来，仅供参考。在Asp程序中，用来获得客户端数据的对象是 Request，这个对象给我们提供了很多的方法以及属性。比如，有这样一个Form，<FORM METHOD=POST name=cqq ACTION=""><INPUT TYPE="text" NAME="username"><INPUT TYPE="tex...

使用ASP实现网站的“目录树”管理的代码

2017年02月06日 72 阅读

使用ASP实现网站的目录树数据库结构（共使用了两个表）1。tblCategory字段名 类型 Root binary 说明树关或开（目录的根）ID 自动编号 关键字Sort integer 识别该字段内容的整数（如果root是开状态sort为0）表示显示的目录的顺序Name text（255）可以包含html中的标识符HREF text（255） 允许空2。tblPagesID 自动编号 Sort integer 关键字Name text（255）HREF...

BytesToBstr获取的源码转换为中文的代码

2017年02月06日 60 阅读

"================================================== "函数名：BytesToBstr "作用：将获取的源码转换为中文 "参数：Body------要转换的变量 "参数：Cset------要转换的类型 "================================================== FunctionBytesToBstr（Body,Cset） DimObjstream SetObjs...

PostHttpPage用asp是实现模拟登录效果的代码

2017年02月06日 59 阅读

"================================================== "函数名：PostHttpPage "作用：登录 "================================================== FunctionPostHttpPage（RefererUrl,PostUrl,PostData） DimxmlHttp DimRetStr SetxmlHttp=CreateObject（"Msxml...

asp下实现UrlEncoding转换编码的代码

2017年02月06日 87 阅读

"================================================== "函数名：UrlEncoding "作用：转换编码 "================================================== FunctionUrlEncoding（DataStr） DimStrReturn,Si,ThisChr,InnerCode,Hight8,Low8 StrReturn="" ForSi=1ToLen...

GetBody asp实现截取字符串的代码

2017年02月06日 72 阅读

"================================================== "函数名：GetBody "作用：截取字符串 "参数：ConStr------将要截取的字符串 "参数：StartStr------开始字符串 "参数：OverStr------结束字符串 "参数：IncluL------是否包含StartStr "参数：IncluR------是否包含OverStr "=========================...

asp之GetArray提取链接地址，以$Array$分隔的代码

2017年02月06日 68 阅读

"================================================== "函数名：GetArray "作用：提取链接地址，以$Array$分隔 "参数：ConStr------提取地址的原字符 "参数：StartStr------开始字符串 "参数：OverStr------结束字符串 "参数：IncluL------是否包含StartStr "参数：IncluR------是否包含OverStr "============...

DefiniteUrl asp将相对地址转换为绝对地址的代码

2017年02月06日 74 阅读

"================================================== "函数名：DefiniteUrl "作用：将相对地址转换为绝对地址 "参数：PrimitiveUrl------要转换的相对地址 "参数：ConsultUrl------当前网页地址 "================================================== FunctionDefiniteUrl（ByvalPrimitive...

ReplaceSaveRemoteFile 替换、保存远程图片 的代码

2017年02月06日 58 阅读

"================================================== "函数名：ReplaceSaveRemoteFile "作用：替换、保存远程图片 "参数：ConStr------要替换的字符串 "参数：SaveTf------是否保存文件，False不保存，True保存 "参数:TistUrl------当前网页地址 "=================================================...

ReSaveRemoteFile函数之asp实现查找文件保存替换的代码

2017年02月06日 84 阅读

"================================================ "函数名：ReSaveRemoteFile "作用：查找文件保存替换 "参数：Str----原字符串 "参数：url----当然网站URL "参数：Dir-----保存目录 "参数：InSave------是否保存,True,False "返回值：格式化取后的字符串 "=============================================...

FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码

2017年02月06日 63 阅读

"================================================ "函数名：FormatRemoteUrl "作用：格式化成当前网站完整的URL-将相对地址转换为绝对地址 "参数：url----Url字符串 "参数：CurrentUrl----当然网站URL "返回值：格式化取后的Url "================================================ PublicFunctionForm...

ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码

2017年02月06日 63 阅读

"================================================ "函数名：ReplaceTrim "作用：过滤掉字符中所有的tab和回车和换行 "================================================ PublicFunctionReplaceTrim（ByValstrContent） OnErrorResumeNext Dimre Setre=NewRegExp re.Igno...

CheckFile函数之asp实现检查某一文件是否存在的代码

2017年02月06日 74 阅读

"================================================== "函数名:CheckFile "作用：检查某一文件是否存在 "参数：FileName------文件地址如:/swf/1.swf "返回值：False----True "================================================== PublicFunctionCheckFile（FileName） OnErrorR...

SaveRemoteFile函数之asp实现保存远程的文件到本地的代码

2017年02月06日 81 阅读

"================================================== "过程名：SaveRemoteFile "作用：保存远程的文件到本地 "参数：LocalFileName------本地文件名 "参数：RemoteFileUrl------远程文件URL "================================================== FunctionSaveRemoteFile（LocalFil...

FpHtmlEnCode 函数之标题过滤特殊符号的代码

2017年02月06日 65 阅读

"================================================== "函数名：FpHtmlEnCode "作用：标题过滤 "参数：fString------字符串 "================================================== FunctionFpHtmlEnCode（fString） IfIsNull（fString）=FalseorfString<>""orfStr...

GetPaing 函数之asp采集函数中用到的获取分页的代码

2017年02月06日 65 阅读

"================================================== "函数名：GetPaing "作用：获取分页 "================================================== FunctionGetPaing（ByvalConStr,StartStr,OverStr,IncluL,IncluR） IfConStr="$False$"orConStr=""OrStartStr=""...

ScriptHtml 函数之过滤html标记的asp代码

2017年02月06日 61 阅读

"================================================== "函数名：ScriptHtml "作用：过滤html标记 "参数：ConStr------要过滤的字符串 "================================================== FunctionScriptHtml（ByvalConStr,TagName,FType） DimRe SetRe=newRegExp Re.Ig...

asp实现检查目录是否存在与建立目录的函数

2017年02月06日 62 阅读

"------------------------- "--检查目录是否存在 "---------------------- FunctionCheckDir（byvalFolderPath） dimfso Setfso=Server.CreateObject（"Scripting.FileSystemObject"） Iffso.FolderExists（Server.MapPath（folderpath））then "存在 CheckDir=True ...

ShowPage 显示“上一页 下一页”等信息的封装代码

2017年02月06日 73 阅读

"************************************************** "函数名：ShowPage "作用：显示“上一页下一页”等信息 "参数：sFileName----链接地址 "TotalNumber----总数量 "MaxPerPage----每页数量 "ShowTotal----是否显示总数量 "ShowAllPages---是否用下拉列表显示所有页面以供跳转。有某些页面不能使用，否则会出现JS错误。 "strUni...