2012年02月_若水印象

12月 03月 02月

原创 ASP静态页面点击数的实现

静态页面代码点击： dj.asp页面代码str=request("id")set rs=server.createobject("adodb.recordset") sql="select * from xw where xwbh="&str rs.open sql,conn,1,3 if not rs.eof then rs("dj")=rs("dj")+1

2012-02-27 14:34:03 897

原创 ASP.NET连接数据库以及调去数据

第一步，新建网站，保证数据库已经有相关表和数据第二步，打开default.asp.cs文件，全部代码为：using System;using System.Collections.Generic;using System.Data;//操作SQL Server数据库必须添加此引用空间using System.Data.SqlClient;using System.Lin

2012-02-26 16:13:54 930

原创 sql2008+vs2008安装心得以及详细教程

今天装了VS2008+SQL2008，安装可谓是费劲心思，总算成功了，下边简单总结一下吧第一步，我把原来装的vs2005+sql2005全部卸载了第二步，下载VS2008同时下载sql2008；第三步，开始安装VS2008专业版，网上有很多给出了微软的地址，在这里我也贴一个吧 http://download.microsoft.com/download/e/7/

2012-02-26 16:08:00 3105

原创下拉滑动门

下拉滚动门 body{ margin:10px; padding:10px; } body,td,div,span,li{ font-size:12px; } .title01,.title02{ color:#fff; font-weight:bold; } #DoorP{ border:12px solid #eee; width:150px; heigh

2012-02-25 13:46:32 1656

原创常用的二级导航样式

<!-- *{margin:0;padding:0;border:0;} body { font-family: arial, 宋体, serif; font-size:12px; } #nav { line-height: 24px; list-style-type: none; background:#666; } #nav a { display: block; widt

2012-02-25 13:36:36 1060

原创有关ewebeditor编辑器在修改文章时内容...

在用ewebeditor编辑器编辑文章的时候（就是修改文章的时候），有没有遇到过，被自动截断了最后一个段落的几行文字，全部文字都跑到录入框外面了的情况呢？原因是这样的官方给出的演示方法为添加那么很多人在修改的时候就会写成">其实这样也未尝不可你只需要在添加的时候先把内容复制到文本文档里（作用是清除了htm代码），在复制到编辑器就可以了，不过这样很麻烦其实最

2012-02-25 13:32:03 1090

转载一些常用的ASP自定义函数全集

<%'========================================================'函数导航'FormatDate(DT,tp) ------------------------------------------日期格式化'IsInteger(para) ---------------------------检测传递的参数是否为数字型

2012-02-25 13:28:28 1346

原创用红色显示ASP查询数据时得到的记录关键词

response.write replace(rs("字段X"),searchname,"" & searchname & "")%>说明：rs为记录集对象，searchname为搜索的关键词

2012-02-25 13:26:39 812

原创 asp去除html代码的方法

关于去除asp中html的方法有很多，现在我在这里说几种简单的，希望对大家有用。1.'=============================='功能描述：用正则除去HTML标记'==============================Function RemoveHTMLTag(str)Set re = New RegExpre.Pattern = "]*>"

2012-02-25 13:21:07 1393

原创 getpy() 汉字转为拼音

'取字段数据每个汉字的拼音首字母Function getpychar(char) tmp = 65536 + Asc(char) If(tmp>= 45217 And tmp getpychar = "A" ElseIf(tmp>= 45253 And tmp getpychar = "B" ElseIf(tmp>=

2012-02-25 13:20:22 20401 1

原创 ASP实现记住密码的功能

把以下代码加入验证页： Response.Cookies("UserCookie")("username") = Trim(Cstr(request.Form("username"))) Response.Cookies("UserCookie")("passwords") = trim(request.Form("passwords")) ’Response.Cookie

2012-02-25 13:14:10 2827

原创 Asp全选删除代码

function CheckAll(form) { ///定义函数checkall,参数为form for (var i=0;i///循环,form.elements.length得到表单里的控件个数 { ///把表单里的内容依依付给e这个变量 var e = form.elements[i]; if (e.name != ’chkall’) e.checked =

2012-02-25 13:13:00 888

原创再说ASP输出N行N列表格

几乎在每个站点中我们都要使用程序来输出列表：新闻列表、产品列表等等，输出的方式也因内容的不同而不同，对于新闻列表，通常是一行一行的循环输出；对于产品列表，通常得一个单元格一个单元格的输出。下边我们就用ASP来输出一个五行四列的表格。1、一行一行的输出以下为引用的内容：Response.Write("")For i=1 to 5Response.Write(" "

2012-02-25 13:10:34 1244

原创 ASP获取字符串长度的自定义函数

ASP获取字符串长度的自定义函数'----------------------------------------------------------------'' getStrLen' 获取字符长度，一个中文字符长度算 2' 参数：' str 需要获取长度的字符串' 返回值：整数 (字符串的长度)'--------------------------------

2012-02-25 13:08:48 2990

原创 asp实现文章摘要功能

通过去除HTML标签的方式来选取前一部分，这个代码不是很完善后期我会拿出完善的代码出来。'去除html标记的函数Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Glob

2012-02-25 13:07:02 830

原创 asp 验证码以及更换

保存下面代码到code.asp,在需要显示验证码的地方使用来显示,使用session("GetCode") powered by 592yu.cn来提取验证码Option Explicit Response.buffer=true Call Com_CreatValidCode("GetCode") Sub Com_CreatValidCode(pSN) Res

2012-02-25 13:05:27 1463

转载 windows2003中IIS对于上传文件大小限制的解决办法

分析:从提示的错误中可以知道是由于 Request 引起的说明发送的数据对错了突然想到 win2003 iis6 默认接收的数据是200KB 可能是POST数据超过了200KB解决办法:一、打开IIS在本地计算机上查看属性如下图:选中　允许直接编辑配置数据库二、用计事本打开 C:\Windows\System32\Inetsrv 中的 metabase.XML找

2012-02-25 13:03:36 1075

原创 sql去除重复列（行）

有重复数据主要有一下几种情况：1.存在两条完全相同的纪录这是最简单的一种情况，用关键字distinct就可以去掉 example： select distinct * from table(表名) where (条件)2.存在部分字段相同的纪录（有主键id即唯一键）如果是这种情况的话用distinct是过滤不了的，这就要用

2012-02-25 13:02:39 3471

原创常用的修改代码

<%if request("action")="xg" thenset rs= Server.CreateObject("adodb.Recordset") sql="select * from xw where xwbh="&request("xwbh") rs.open sql,conn,1,3 rs("lmbh")=request("lmbh") rs(

2012-02-25 13:00:01 818

原创 JS复制粘贴另存代码

function Preview(obj) { var TestWin=open(''); TestWin.document.write(obj.value); } function copyCode(obj) { var rng = document.body.createTextRange(); rng.moveToElementText(o

2012-02-25 12:54:29 968

原创 ASP常用链接数据库代码（access）

<% set conn = Server.CreateObject("ADODB.Connection") strProvider="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("../date/#407592529.mdb") conn.Open strProvider%>

2012-02-25 12:52:16 793

原创 ASP LIKE 语句的用法

like '%"&searchkey&"%' "

2012-02-25 10:17:56 1951

原创 gotTopic()截字符串函数

'*************************************************'函数名：gotTopic'作用：截字符串，汉字一个算两个字符，英文算一个字符'参数：str ----原字符串' strlen ----截取长度'返回值：截取后的字符串'*****************************************

2012-02-24 15:49:37 1188

原创 GetTimeNumber()当前时间生成的整数

' ============================================' GetTimeNumber()当前时间生成的整数' ============================================Function GetTimeNumber() 'GetTimeNumber=Year(Date)*31104000+Month(Date)*2

2012-02-24 15:48:36 1084

原创过滤非法字符函数

' ============================================' 过滤非法字符函数' ============================================function killstr(str) dim tempstr if str="" then exit function tempstr=replace(str,ch

2012-02-24 15:47:40 1533

原创 Go_Error(str) 错误返回处理

' ============================================' 错误返回处理' ============================================Sub Go_Error(str) Call CloseConn() Response.Write "alert('" & str & "\n\n"& p_xtjzd &"');

2012-02-24 15:46:52 639

原创 Get_hydlzt()栏目是否只有会员查看权限，如是检查会员是否登录

' ============================================' Get_hydlzt()栏目是否只有会员查看权限，如是检查会员是否登录' ============================================Function Get_hydlzt() dim Resultzt Resultzt=False '登陆检测 I

2012-02-24 15:44:58 672

原创 ASP实现倒计时功能

mskaishi="2012-2-21-12-10-00" '秒杀开始msjieshu="2012-2-22-12-11-00" '结束时间 dqshijian=replace(date() ,"/","-")&"-"&replace(time(),":","-") '当前时间'response.Write("现在时间是： "&dqshijia

2012-02-24 13:49:24 4241

原创 ASP百度分页常用代码

'====================================================================================='ASP百度风格分页'作者：上善若水'变量解释：'pUrl 需要分页的网页url'pPage 页码'pSize 每页显示数目'pCount 总页数'pMax 分页栏显示的页码数目'p

2012-02-24 13:34:01 1233

原创 ASP FSO删除文件（后台删除时候可加上此代码连同删除其中的文件）

Dim objFSO '声明一个名称为 objFSO 的变量以存放对象实例 Set objFSO = Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(Server.MapPath("1.jpg")) Then objFSO.DeleteFile Server.MapPath("1.jpg"),

2012-02-24 13:25:59 971

全国省市县mysql数据

2021-12-7最新省市县数据，已排序，用于自己项目中，已做验证

2021-12-07

ueditor-dev-1.5.0【ueutf8-php】

github下载最新版编译后的包，直接可用，无任何修改。很多人不会编译，这里直接编译好给大家了，也省的去下载了，无毒无任何修改

2021-02-04

PHP邮件发送实例【SMTP方式】已测试通过

PHP发送邮件代码，你需要做的只是下载下来修改下你的smtp信息就可以发送了，已经测试过了。我用半小时的时间来整理打包然后用虚拟的5分给你下载并使用，且开源免费。你还犹豫个鸟？

2013-01-18

ASP上传文件实例简易版本，直接预览就可以

ASP上传文件实例简易版本，直接预览就可以，内附说明文档。用不明白的可以加我Q聊下，免费的哦亲

2012-10-10

ASP常用的后台编辑器，带图片上传功能调用方法如下例子： <textarea name="nr" ROWS="20" COLS="70">%=Server.HTMLEncode(rs("nr"))%></textarea> <iframe ID="eWebEditor1" src="../eWebEditor/ewebeditor.htm?id=nr frameborder="0" scrolling="no" width="700" HEIGHT="440"></iframe>

2012-02-25

asp百度分页

常用的百度分页代码，一直都在用这个，挺好用的

2012-02-24

ASP上传文件实例

asp常用的上传程序，但是需要简单修改一下上传页面，去掉多余的东西就可以了

2012-02-24

clearbox实例（完美教会你怎么用可弹出图片、视频等）

clearbox实例（完美教会你怎么用可弹出图片、视频等）可添加多个图片多个视频左右点击翻动、自动播放带滚动条。已测试。以前做项目时候用到的，总结了一下。常用于产品模块等图片以及新闻模块的特效展示。

2012-02-24

网页浮动QQ--网页浮动客服--浮动QQ

网页浮动QQ，自己做的，给一个客户使用的时候用到的，预览效果可以点击下边的链接看下是否满意 http://www.592yu.cn/xw/news/1057.html

2011-06-08

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

全国省市县mysql数据

ueditor-dev-1.5.0【ueutf8-php】

百度UEDITOR 内网上传视频支持IE8的方法

PHP邮件发送实例【SMTP方式】已测试通过

ASP上传文件实例简易版本，直接预览就可以

eweb编辑器（带图片上传功能）

asp百度分页

ASP上传文件实例

clearbox实例（完美教会你怎么用可弹出图片、视频等）

网页浮动QQ--网页浮动客服--浮动QQ

空空如也