让程序员成为正常人


程序员不是正常人吗?这一定是你看到标题想到的第一个问题。我的回答是,从事程序员这个行业的人确实在有些地方和正常人不一样。“与正常人不一样”和“不是正常人”不是一个概念。就好像“不健康心理”和“心理不健康”不是同一个概念一样。

我本身就是程序员,我写本文没有恶意,我只是希望程序员生活的更好。

《网虫的几个特征》
- 不说去上厕所,而说去下载。
- 当你在杂志或电视上看到www时,心跳会急剧加速,有一种想去点击的冲动。
- 当你从自己的房间里出来时,发现父母已经离婚了,而你却不知道什么时候离的。
- 家里的狗和猫都有自己的网页。
- 家庭作业都写成了HTML码,交给老师的只是URL.
- 填表格时总是习惯把在聊天时用的名字填上去。
- 半夜3点起床去上厕所,半路又折回来检查一下有没有新的邮件。
- 女朋友定出新规定:计算机不许带上床。
- 女朋友说交流很重要,所以你又买了一台计算机以便两人能上网聊天。
- 你给孩子起...


15年前10月25日 阅读:172 评论:0

SQLServer 通用分页存储过程(使用游标)


/*
  Powered By CMSDream Copyright (c) All rights reserved.
  通用分页存储过程
*/
CREATE proc [dbo].[cmsdream_SP_MultiPage](
	@sql varchar(8000)='',
	@PageSize int=1,
	@CurrentPage int=1,
	@RecordCount int=0 output,
	@PageCount int=1 output
)AS
if @PageSize < 1 set @PageSize = 1
if @CurrentPage < 1 set @CurrentPage = 1
begin
	set nocount on

	declare @p1 int,
	@rowcount int
	exec...


15年前9月20日 阅读:283 评论:0

获取js后所带的参数,如:a.js?a=value1&amp;b=value2


将以下代码保存为:a.js

function querystring(){      
    this.params = new Object();      
    this.initialize = function(){      
		var param=this.paramstring();      
		if(param.length == 0) return;      
		if(param.substring(0,1)=='?'){      
			param=param.substring(1);      
		}      
		param = param.replace(/\+/g, ' ');      
		var args = param.split('&amp;');		  
		for (var i=0;i<a...


15年前9月11日 阅读:881 评论:0

隐藏文件名后缀的URL Rewrite


我看网上有很多此类功能,当然asp.net自身很容易实现,但是其它的要实现会出现一点小问题,本人写了一个,经过测试没有任何问题,应该也支持apache。

代码如下:

RewriteRule ^(.*)/([\w\-]+)\?(.*)$ $1/$2\.asp\?$3
RewriteRule ^(.*)/([\w\-]+)$ $1/$2.asp

说明:http://www.x.com/test.asp?a=querystring 可以直接访问 http://www.x.com/test?a=querystring

还有一个省略文件名的正则,代码如下:

RewriteRule ^(.*)/([\w]+)$ $1/index\.asp\?$2

说明:http://www.x.com/index.asp?querystring 可以直接访问 http://www.x.com/querystring


15年前9月10日 阅读:1155 评论:0

一个简单的Ajax类


/**  
	Powered By CMSDream Copyright © 2007-2008 All rights reserved.  
	14:21 2008-5-10  
**/  
function CMSDreamAjaxLib(){   
	/**//**  
	成员变量  
	*/  
	this.XMLHttpReq = null;		//XML对象   
	this.method = "post";		//执行的方法(post/get)   
	this.url = "";			//异步调用的页面地址   
	this.responseText = "";		//异步返回的响应字符串   
	this.responseXML = "";		//异步返回的响应XM...


15年前9月8日 阅读:105 评论:0

动态加载样式元素的函数(兼容IE,FireFox,Opera)


如题,目前只对IE,FireFox,Opera这三种浏览器的兼容性进行过测试,其它浏览器还未测试。

有兴趣的朋友可以研究一下,应该也没问题的。

function AttachStyle(styDom, styCss, styId){   
	var istyle = styDom.createElement('style');   
	istyle.setAttribute("type", "text/css");   
	if(styId!=null){if(!document.getElementById(styId)){istyle.setAttribute("id", styId);}}   
	if (istyle.styleSheet){   
		istyle.styleSheet.cssText=styC...


15年前9月7日 阅读:177 评论:0

非常好用的Js的querystring类


/**  
	Powered By CMSDream Copyright © 2007-2008 All rights reserved.  
	15:10 2008-6-7  
**/  
function querystring(paramstring){   
	this.url=window.location.href;   
	this.params = new Object();   
	this.initialize = function(){   
		if(paramstring.length == 0) return;   
		if(paramstring.substring(0,1)=='?'){   
			paramstring=paramstring.substring(1);   
		}   
		paramstring = p...


16年前6月7日 阅读:159 评论:0

获取字符串长度的函数(ASP/VB/JS)


function strLen(str){      
	var len=0;      
	for(var i=0;i<str.length;i++){      
		var intCode=str.charCodeAt(i);      
		if(intCode>=0 &amp;&amp; intCode<=128){      
			len = len + 1;      
		}else{      
			len = len + 2;      
		}      
	}      
    return len;      
}



Private Function Length(iTxt)   
	Dim txt: txt = Trim(iTxt)   
	Dim x: x = Len(txt)   
...


17年前6月7日 阅读:204 评论:0

VB将域名转换成IP地址


Option Explicit   
  
Private Type HOSTENT   
	hName As Long  
	hAliases As Long  
	hAddrType As Integer  
	hLength As Integer  
	hAddrList As Long  
End Type   
  
Private Type WSADATA   
	wversion As Integer  
	wHighVersion As Integer  
	szDescription(0 To 256) As Byte  
	szSystemStatus(0 To 128) As Byte  
	iMaxSockets As Integer  
	iMaxUdpDg As Integer  
	lpszVendorInfo As Long...


17年前4月8日 阅读:301 评论:0

VB获取系统运行时间


Private Declare Function GetTickCount&amp; Lib "kernel32" ()   
  
Dim a As Long  
Dim b As Long  
Dim c As Long  
Dim d As Long  
Dim e As Long  
  
Private Sub Form_Load()   
	'   
End Sub  
  
Private Sub Timer1_Timer()   
	a = GetTickCount \ 1000   
	b = GetTickCount \ 1000 \ 60   
	c = GetTickCount \ 1000 \ 60 \ 60   
	d = (a - c * 3600) \ 60   
	e = a - b * 6...


17年前4月5日 阅读:168 评论:0

顶部