 本 站 搜 索 |
 文 章 阅 读 排 行 |
|
 |
ASP(FSO)文件列表排序 |
|
3776 |
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版 |
|
1040 |
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生成文本文件(.txt)的代码 |
|
2309 |
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 按修改时间读取文件夹中文件并排序 |
|
3172 |
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分页函数 |
|
957 |
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.. |
|
|
目录下的文件排序(通过rs对象) |
|
965 |
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英文字母加数字随机验证码 |
|
1311 |
2008-03-07 |
| 我们平常见的多数是单纯的数字验证码或英文字母验证码，而这个验证码不错，英文字母和数字结合，安全性更好，值得收藏！
% Sub ImageValidCode(sName) Response.Expires = -1 Response.AddHeader "Pragma","no-cache" Response.AddHeader "cache-ctrol","no-cache" Response.ContentType = "Image/BMP.. |
|
|
Javascript:keyCode键盘键码值表 |
|
2662 |
2008-03-07 |
| 1.字母和数字键的键码值(keyCode)
按键 键码 按键 键码 按键 键码 按键 键码 A 65 J 74 S 83 1 49 B 66 K 75 T 84 2 50 C 67 L 76 U 85 3 51 D 68 M 77 V 86 4 52 E 69 N 78 W 87 5 53 F 70 O 79 X 88 6 54 G 71 P 80 Y 89 7 55 H 72 Q 81 Z 90 8 56 I 73 R 82 0 48 9 57
2.数字键盘上的键的键码.. |
|
|
JS 操作Cookie的教程 |
|
999 |
2008-03-07 |
| Cookies，有些人喜欢它们，有些人憎恨它们。但是，很少有人真正知道如何使用它们。现在你可以成为少数人中的成员－可以自傲的Cookie 大师。
如果你象作者一样记性不好，那么你可能根本记不住人们的名字。我遇到人时，多半只是点点头，问句“吃了嘛！”，而且期望问候到此为止。如果还需要表示些什么，.. |
|
|
JS和ASP操作FSO比较 |
|
1195 |
2008-03-07 |
| 本文介绍了在js和asp中使用FileSystemObject（fso）来： 创建、添加或删除数据，以及读取文件； 移动、复制和删除文件；创建文件；创建空文本文件（有时被叫做“文本流”）有三种方法。
第一种方法是用 CreateTextFile 方法。 下面的示例示范了在 VBScript 中如何用这种方法来创建文本文件： Dim fso, f1 .. |
|
|
MD5 算法的ASP实现代码 |
|
1710 |
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用JavaScript脚本实现分页的办法 |
|
1229 |
2008-03-07 |
| ASP分页做为一个经典的asp问题，有着非常丰富的分页形式和分页方法，但是大多数的asp分页都是使用VBscript作为服务器端的脚本，本文介绍了一种使用javascript脚本来处理asp服务器端的分页方法，感兴趣的朋友可以看看。
%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%!--#include file="connect.asp"--!--#.. |
|
|
文 章 列 表