feiliboos
- 浏览: 667378 次
-
最新评论
文章列表
1/ 曾经有个小国到中国来，进贡了三个一模一样的金人，金壁辉煌，把皇帝高兴坏了。可是这小国不厚道，同时出一道题目：这三个金人哪个最有价值？ 皇帝想了许多的办法，请来珠宝匠检查，称重量，看做工，都是一模一 ...
- 2006-01-12 22:41
- 浏览 533
- 评论(0)
主持人：今天的发言非常的踊跃，一会儿大家要提问，请递字条上来。因为现在提问非常多，我们选几个有代表性的问题，郎教授现在有这样一个问题。请问郎先生，您是对国家有责任感的人，你在批评国家不合理政策的时候， ...
- 2005-12-24 19:41
- 浏览 266
- 评论(0)
如何消除win2003只支持上傳200K的文件? 在用稻香老农的无组件上传附件时，以前极为正常，自服务器换了Win2003后，发现上传的附件如果超过204800字节后，系 统出错。这是因为win 2003默认上传字节为204800原因所致，现找到解决的方法，就是在服务器上进行如下操 作： 1. 先在服务里关闭 iis admin service 服务. 2. 找到 windows/system32/inesrv/ 下的 metaba se.xml 文件. 3. 打开, 找到 ASPMaxRequestEntityAllowed 把他修改为需要的值(可修改为10M即: 10240000), 默认为 ...
- 2005-11-30 14:28
- 浏览 619
- 评论(0)
在asp数据库操作程序中经常要关闭记录集对象清除对象，如果重复进行清除操作就会出现错误，一个解决的方法是先对对象的状态进行判断然后在进行相应的操作。如有问题竟联系我（vince6799@hotmail.com）或到本站获取最新信息（www.miplat.com）。
sub closers(crs)if Not crs Is Nothing Then '对象未清除 if (crs.state and 1)=1 thencrs.closeend ifset crs=nothingend ifend subsub endconnection(Econn)if Not Econn is Nothing ...
- 2005-11-24 14:17
- 浏览 258
- 评论(0)
在asp代码中分页是有点麻烦的事情，这是之前的asp分页函数的类方式,如有问题竟联系我（vince6799@hotmail.com）或到本站获取最新信息（www.miplat.com）。
page_list.asp<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>class Page_Listprivate Sub Class_Initialize Version="ASP分页类 Version 1.0"end subPrivate Sub Class_Terminate Version=""end sub'分页函数 ...
- 2005-11-19 22:33
- 浏览 870
- 评论(0)
程序员的困惑：我该何去何从
32岁的Smith(化名)已算是IT行业的元老了。
大学时代的他，有2/3的时间是在校园微机房里度过的，当时，他疯狂地迷上了电脑。大学毕业后，Smith早早地被一家IT业著名的跨国公司录用，担任程序员 ...
- 2005-11-05 14:32
- 浏览 659
- 评论(0)
下面是一个sq serverl的存储过程其中一部分实现了类似split的功能，我没有把这部分单独拿出来。（有更好的方法希望能与我联系：vince6799@hotmail.com或访问www.miplat.com）
CREATE PROCEDURE savesend(@mobile as nvarchar(4000),@content as nvarchar(70),@sendtime as nvarchar(50),@sender as nvarchar(50)) ASdeclare @stime nvarchar(50),@smobile nvarchar(50)declare @icoun ...
- 2005-11-04 18:41
- 浏览 385
- 评论(0)
对文本框输入的字数限制、通过复选框控制其他html控件的可用性。在判断上存在一点小问题：就是统计号码个数时输入“,”逗号才会加一。。（有更好的方法希望能与我联系：vince6799@hotmail.com或访问www.miplat.com）
test.asp<html><head><title></title><meta http-equiv="Content-type" content="text/html;charset=gb2312"><style type="text/cs ...
- 2005-11-03 16:16
- 浏览 807
- 评论(0)
由于文件域没有value属性，所以就无法用清除value的方法来清除文件域的值，这个是一个替代的方法在需要清除时用js重写文件域。在需要清除时用js重写文件域。（有更好的方法希望能与我联系：vince6799@hotmail.com或访问www.miplat.com）
<table><tr><script language="javascript">function clear(){document.getElementById("pfile").innerHTML = "<input type=/&qu ...
- 2005-11-01 09:44
- 浏览 671
- 评论(0)
I 元素 | i 对象 IMG 元素 | img 对象 DHTML 对象 IFRAME 元素 | iframe 对象 -------------------------------------------------------------------------------- 创建内嵌浮动框架。 成员表 下面的表格列出了 iframe 对象引出的成员。请单击左侧的标签来选择你想要查看的成员类型。 标签属性/属性 显示: 标签属性/属性 行为 集合 事件 滤镜 方法 对象 样式 标签属性 属性 描述 ALIGN align 设置或获取表格排列。 ALLOWTRANSPARENCY allowTr ...
- 2005-10-30 00:27
- 浏览 699
- 评论(0)
以下代码可以单独保存为一个js文件然后直接调用就可以了（www.miplat.com）
function isEmpty(str) {if ((str==null) || (str.length==0)) return(true);else return(false);}
function isBetween(val,lo,hi) {if ((val<lo) || (val>hi)) { return(false);}else {return(true);}}
function isDate(theStr) {var the1st = theStr.indexOf('/');v ...
- 2005-10-29 23:58
- 浏览 535
- 评论(0)
我们在制作网站的时候,都会让用户填写一些表格来获取注册用户的各种信息,因为用户有可能输入各式各样的信息,而有些不符合要求的数据会给我们的后端ASP处理程序带来不必要的麻烦,甚至导致网站出现一些安全问题。因此我们在将这些信息保存到网站的数据库之前,要对这些用户所输入的信息进行数据的合法性校验,以便后面的程序可以安全顺利的执行。所以我们一般会在后端编写一个ASP的校验程序来分析用户输入的数据是否是合法的。
或许有人会问了，使用运行在客户端的JavaScript不是可以更好更快的来校验用户的数据吗？的确，这样在大多的情况下是可以的，为什么是大多情况下呢？因为你编写的JavaScript不一定 ...
- 2005-10-29 00:01
- 浏览 256
- 评论(0)
计算当前日期是任意时间段内第几周的函数
Function CalculateWeekNo(BeginDate,EndDate,InputDate) dim wdate(500,8) z=0 x=0 strlong=len(CStr(inputdate))-9 inputdate=cdate(left(CStr(inputdate),strlong)) for i=cdate(BeginDate) to cdate(EndDate) if inputdate=i then x=z Exit For end if if weekday(i)=7 then z=z+1 end if next
Ca ...
- 2005-10-28 23:11
- 浏览 606
- 评论(0)
asp 中处理文件上传以及删除时常用的自定义函数
<%'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''所有自定义的VBS函数''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''function DeleteFile(Filename) '删除文件if Filename<>"" then Set fso = server.CreateObject("Scripti ...
- 2005-10-28 23:04
- 浏览 569
- 评论(0)
'突出显示匹配字段
在搜索时，有时候我们需要突出显示匹配的字符，这是一个用正则表达式实现的加粗和加红色显示匹配的字符的程序。<%function ShowBold(theField)Set objRegExp= New RegExpobjRegExp.Pattern="(" & key & ")"objRegExp.IgnoreCase=TrueobjRegExp.Global=TrueShowBold=objRegExp.Replace(theField,"<font color='#FF0000'>$1< ...
- 2005-10-28 23:02
- 浏览 524
- 评论(0)