麻阳万盛生态农业

时间:2012年04月23日作者:灰色的灵魂查看次数:50 views评论次数:0

给老乡做的一个网站,他们公司是做肥料的。

分类:Software

湘西凤凰游

时间:2012年04月23日作者:灰色的灵魂查看次数:43 views评论次数:0

给一个朋友做的旅游网站,简单的介绍和说明。

分类:Case

做数据库处理经常用到admin的md5加密

时间:2012年04月17日作者:灰色的灵魂查看次数:54 views评论次数:0

admin的MD5加密码和admin888的MD5加密码
admin 的加密代码:
16位加密:7a57a5a743894a0e
32位加密:21232f297a57a5a743894a0e4a801fc3
admin888的MD5加密码
16位:469e80d32c0559f8
32位:7fef6171469e80d32c0559f88b377245
admin 和 admin888是大家用的比较多的,上面加密也分为16位和32位加密。
分类:Share, Web Code

asp 利用js打印页面内指定区域

时间:2012年04月12日作者:灰色的灵魂查看次数:48 views评论次数:0

今天做项目的时候需要使用到区域打印,用js实现比较简单,特存档于此。

在head区域内插入js调用代码

<script language=”javascript”>
//设置网页打印的开始位置和结束位置
function preview() {
bdhtml=window.document.body.innerHTML;
sprnstr=”<!–startprint–>”;
eprnstr=”<!–endprint–>”;
prnhtml=bdhtml.substr(bdhtml.indexOf(sprnstr)+17);
prnhtml=prnhtml.substring(0,prnhtml.indexOf(eprnstr));
window.document.body.innerHTML=prnhtml;
window.print();
window.document.body.innerHTML=bdhtml;
 }
</script>

然后利用 js代码内sprnstr 和 eprnstr 的定义来寻找需要打印的区域,格式如下

<!–startprint–> 需要打印的区域 <!–endprint–>

最后添加打印按钮,我用的是input方式,大家也可以用img,href连接等。代码如下

<input type=”submit” style=”cursor:hand;” onclick=”preview()” value=”打印” />

OK了。

 

 

分类:asp, js, Web Code

asp返回上一页并且刷新代码

时间:2012年04月11日作者:灰色的灵魂查看次数:49 views评论次数:0

代码都比较常用,所以搜录,哪天写代码的时候打错字或者调试错误的时候可以直接使用。

response.Write(“<script language=’javascript’>alert(‘返回前一页!’);window.location =’ “&Request.ServerVariables(“HTTP_REFERER” )&”‘ ;</script>”)

方便大家,方便自己!

分类:asp, js, Web Code

js中用到的过滤字符正则表达式

时间:2012年04月07日作者:灰色的灵魂查看次数:71 views评论次数:0

今天做项目的时候需要用到,我开始在外部定义,后来发觉失效,直接在js里面调用,此代码作为存档用。

function stripscript(s)
{
var pattern = new RegExp(“[`~!@#$^&*()=|{}':;',\\[\\].<>/?~!@#¥……&*()——|{}【】‘;:”“’。,、?]”)
var rs = “”;
for (var i = 0; i < s.length; i++) {
rs = rs+s.substr(i, 1).replace(pattern, ”);
}
return rs;
}

代码代码量比较精简,调用的时候直接插入stripscript(变量名)

分类:Software

asp 将很长的数字用逗号(,)隔开,形成数组样式

时间:2012年03月31日作者:灰色的灵魂查看次数:81 views评论次数:0

比较实用,故放置于此!

 <%
Function Comma(str)
If Not(IsNumeric(str)) Or str = 0 Then
Result = 0
ElseIf Len(Fix(str)) < 4 Then
Result = str
Else
Pos = Instr(1,str,”.”)
If Pos > 0 Then
Dec = Mid(str,Pos)
End if
Res = StrReverse(Fix(str))
LoopCount = 1
While LoopCount <= Len(Res)
TempResult = TempResult + Mid(Res,LoopCount,3)
LoopCount = LoopCount + 3
If LoopCount <= Len(Res) Then
TempResult = TempResult + “,”
End If
Wend
Result = StrReverse(TempResult) + Dec
End If
Comma = Result
End Function
%>

上面4是进行了长度判断,可以一句自己的需要修改数组的元素形式!

分类:asp, Web Code

asp 过滤不需要的字符代码

时间:2012年03月31日作者:灰色的灵魂查看次数:63 views评论次数:0

以前用做项目的时候使用的代码,发觉比较实用,故发上来方便其他人使用;

<%
'字符过滤
function HTMLEncode(fString) If not isnull(fString) then
     fString = replace(fString, "\", "")
     fString = replace(fString, " ", "")
     fString = replace(fString, "、", "")
     fString = replace(fString, ".", "")
 HTMLEncode = fString End If End function
%>

代码   fString = replace(fString, ““, “”)   用后面”" 内的字符 替换 红色字符;”"替换内容可以输入自己特定字符

分类:asp, Web Code