ASP
kingapex1
这个作者很懒,什么都没留下…
展开
-
Microsoft Mediaplayer 对象参数表
------------Microsoft Mediaplayer 对象参数表-----------------、 >原创 2004-06-24 09:03:00 · 1368 阅读 · 1 评论 -
最近的 杂 东西
用fso配置文件Set fs=CreateObject("Scripting.FileSystemObject")Set TS1 = fs.OpenTextFile(Server.MapPath("config.asp"),2,True) TS1.writeline "TS1.writeline "webname="&chr(34)&""&request("webname")&""&chr(3原创 2004-09-01 14:36:00 · 830 阅读 · 0 评论 -
写文件常用转义字符
chr(37) %chr(34) “chr(13) /n原创 2004-09-16 11:11:00 · 1126 阅读 · 0 评论 -
随机数
生成 0 - 9 的随机数Randomize MyValue = Int((9 * Rnd) + 0)原创 2004-08-26 17:29:00 · 761 阅读 · 0 评论 -
域名查询类
class DominClass----------------------------------------------- class DominClass 域名查询类 作者:KingApex 最后修改时间:2004年9月2日 --------------原创 2004-09-02 18:18:00 · 851 阅读 · 0 评论 -
asp 加密
另外可以使用Script Encoder。但这个方法也可以方便的解密。Script Encoder是Microsoft出品的一个script加密工具,它是一个简单的命令行工具,可以对html文件进行加密,加密后其中的文本部分均保持不变,只是对其中的javascript 和VBscript部分进行加密处理,加密后的script在功能上无任何损失,仅是其代码变成密文,用源文件方式查看只是一些乱码。原创 2004-08-27 14:29:00 · 2117 阅读 · 1 评论 -
Recordset对象方法
发现论坛里面问此类问题的人太多,所以贴出来。很有可能和以前有些人发的帖子重复,如果重复的话不要拿砖头砸我啊 :)Recordset对象方法 Open方法 recordset.Open Source,ActiveConnection,CursorType,LockType,Options Source Recordset对象可以通过Source属性来连接Command对象。Source参数可以是一个原创 2004-08-26 15:47:00 · 1890 阅读 · 0 评论 -
关于文件下载
function dl(f,n) on error resume next Dim S Set S=CreateObject("Adodb.Stream") S.Mode=3 S.Type=1 S.Open S.LoadFromFile(server.mappath(f)) if Err.Number>0 then Response.Status="404" else Respon原创 2004-08-11 14:35:00 · 1466 阅读 · 0 评论 -
释放数组占用空间
静态数组 Erase A 动态数组 Erase A 或 Set A=nothing原创 2004-07-26 16:27:00 · 1990 阅读 · 0 评论 -
文件操作
做了一个新闻发布,写了些文件操作函数,把他们记录在此 生成一个新文件并写入内容 Function CreateNewFile(ByVal FileName) Set afile = fso.Createtextfile(FileName,true)afile.writeline filecontentafile.closeset afile = nothing End Functi原创 2004-07-22 13:09:00 · 926 阅读 · 0 评论 -
购物车
castclass.asp Class ShopBag 放商品的空间 Private ProSpace 商品信息个数 Private ItemsCout ============================================================= 共有的===============================原创 2004-07-03 12:42:00 · 1777 阅读 · 0 评论 -
每行显示5 个
显示小类别Sub ShowProClass() ProClass 小类返回的数组MaxC 商品个数TdC 每行显示个数 const TdC = 5dim j ,MaxCj=0 if not isarray(ProClass) then Response.Write "此系列无类别"elseMaxC = UBound(ProClass,2) %>原创 2004-06-29 17:03:00 · 2450 阅读 · 1 评论 -
记录集用GetRows返回数组时的分页
记录集用GetRows返回数组时的分页 函数名: ShowPageLink()参数 : 无作用 : 显示分页连接返回值:无Sub ShowPageLink()Response.Write "" Response.Writ原创 2004-06-25 13:12:00 · 1774 阅读 · 0 评论 -
如何在模态对话框中进行提交而不新开窗口?
如果你 的 浏览器是IE5.5+,可以在对话框中使用带name属性的iframe,提交时可以制定target为该iframe的name。对于IE4+,你可以用高度为0的frame来作:例子, test6.htm =================== window.showModalDialog("test7.htm") test7.htm =================== if(原创 2004-06-24 08:56:00 · 1560 阅读 · 2 评论 -
一个不错的效果
原创 2004-08-05 15:36:00 · 899 阅读 · 0 评论 -
asp 中 创建表的的一段代码
OpenDBConnsql = "select * from dbo.sysobjects where id = object_id(N[dbo].[TuiGuang]) and OBJECTPROPERTY(id, NIsUserTable) = 1"createRsrs.open sql,conn,1,1if rs.eof or rs.bof then创建TuiGuang原创 2004-10-07 13:46:00 · 1823 阅读 · 0 评论