 本 站 搜 索 |
 分 类 列 表 |
 文 章 阅 读 排 行 |
|
 |
ASP(FSO)通过数组给文件列表排序 |
|
1208 |
2008-03-07 |
| 当您使用FILESYSTEMOBJECT（fso）对象获得某个目录下的文件列表的时候，你有没有发现无法控制它们的排序方式，比如按照名字排序，按照扩展名排序，按照文件大小排序等等，让我们试着用数组给它们排排序儿。
如果您想通过名字排序，那将是非常简单的，但是假如你想通过文件大小或者文件创立时间等等来.. |
|
|
ASP用JavaScript脚本实现分页的办法 |
|
1228 |
2008-03-07 |
| ASP分页做为一个经典的asp问题，有着非常丰富的分页形式和分页方法，但是大多数的asp分页都是使用VBscript作为服务器端的脚本，本文介绍了一种使用javascript脚本来处理asp服务器端的分页方法，感兴趣的朋友可以看看。
%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%!--#include file="connect.asp"--!--#.. |
|
|
MD5 算法的ASP实现代码 |
|
1709 |
2008-03-07 |
| MD5的全称是Message-Digest Algorithm 5（信息-摘要算法），在90年代初由MIT Laboratory for Computer Science和RSA Data Security Inc的Ronald L. Rivest开发出来，经MD2、MD3和MD4发展而来。
它的作用是让大容量信息在用数字签名软件签署私人密匙前被"压缩"成一种保密的格式（就是把一个任意长度的.. |
|
|
ASP英文字母加数字随机验证码 |
|
1309 |
2008-03-07 |
| 我们平常见的多数是单纯的数字验证码或英文字母验证码，而这个验证码不错，英文字母和数字结合，安全性更好，值得收藏！
% Sub ImageValidCode(sName) Response.Expires = -1 Response.AddHeader "Pragma","no-cache" Response.AddHeader "cache-ctrol","no-cache" Response.ContentType = "Image/BMP.. |
|
|
目录下的文件排序(通过rs对象) |
|
963 |
2008-03-07 |
| %'文件排序set fs = CreateObject("Scripting.FileSystemObject")set folder = fs.GetFolder("d:\shop_gb\admin\")
'Get Recordset Object and DisconnectSet rs = Server.CreateObject("ADODB.Recordset")rs.CursorLocation = 1 rs.CursorType = 1rs.Fields.Append "filename",200,255rs.Fields.App.. |
|
|
ASP分页函数 |
|
955 |
2008-03-07 |
| %Function ExportPageInfo(ByRef rs,curpage,i,LinkFile) Dim retval, j, pageNumber, BasePage retval = "第" curpage "页/总" rs.pagecount "页 " retval = retval "本页" i "条/总" rs.recordcount "条 " If curpage = 1 Then retval = retval "首页 前页 " Else retval = retval "a hr.. |
|
|
用ASP 按修改时间读取文件夹中文件并排序 |
|
3171 |
2008-03-07 |
| Option Explicit
Private Type typFlieDate Name As String CreatedDate As Date AccessedDate As Date ModifiedDate As Date End Type
Private myFiles() As typFlieDate '包含文件的数组 Private Sub Command1_Click() Dim n As Integer n = GetFolderFiles( "d:\" , 1) End Sub
Private Func.. |
|
|
ASP生成文本文件(.txt)的代码 |
|
2307 |
2008-03-07 |
| %set conn=server.CreateObject( "adodb.connection" )set rs=server.CreateObject( "adodb.recordset" )db= "数据库路径"conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" server.MapPath(db)sql= "select * from 表名 order by id desc"set rs=conn.execute(sql)set fileobj=server.Crea.. |
|
|
金额大小写转换的ASP版 |
|
1038 |
2008-03-07 |
| 01 form name= "form1" method= "post" action= "Submit.asp" 02 input type= "text" name= "page1num" 03 input type= "submit" name= "Submit" value= "提交" 04 /form 05 06 ------以下是Submit.asp的代码--------- 07 % 08 dim tmpnum 09 '从第一张页面传过来的小写金额 10 tmpnum=request("pa.. |
|
|
ASP(FSO)文件列表排序 |
|
3775 |
2008-03-07 |
| files_path=self_path.ParentFolder.ParentFolder folderspec=files_path "\" dir_name Set f = fso.GetFolder(folderspec)
Set fc = f.Files For Each f1 in fc response.write f1.name"br" next ---------------------------------------------------------------
%@LANGUAGE="VBSCRIPT" CODEPA.. |
|
|
ASP如何获取客户端真实IP地址 |
|
1310 |
2008-05-30 |
| 在 ASP 中使用 Request.ServerVariables(REMOTE_ADDR) 来取得客户端的 IP 地址，但如果客户端是使用代理服务器来访问，那取到的就是代理服务器的 IP 地址，而不是真正的客户端 IP 地址。要想透过代理服务器取得客户端的真实 IP 地址，就要使用 Request.ServerVariables(HTTP_X_FORWARDED_FOR) 来读取.. |
|
|
通杀网页加密源代码 |
|
1063 |
2008-07-18 |
| 有些网站的源代码是经过加密的，如何快捷的破解这些加密的代码呢？告诉你一个简单而有效的方法。在地址栏或按Ctrl+O，输入：javascript:s=document.documentElement.outerHTML;document.write('body/body');document.body.innerText=s;
源代码就出来了。不论加密如何复杂，最终都要还原成浏览器.. |
|
|
文 章 列 表