非常优秀的ASP随机验证码

2. 七月 2009
       朋友的网站老是被一些发帖机强奸,很是痛苦,换过几个验证码程序都还是被强奸,动网的ASP验证码程序可以说很强,但还是逃避不了被强奸的命运。几经测试,使用这个验证码程序暂时可以有效防止那些发垃圾资料的机器。推荐使用此随机验证码程序,比较优秀。(PS:这个验证码程序可以防住大部分信息机器人,但还有个别还是可以偶尔发进来,虽然不能100%防住所有发贴机,但有这样的效果我已经很满意了。)
       完全免费的传统ASP的VBScript 。 
       安全码是完全随机的。 
       动态图像处理。 
       没有图像文件的要求。 
       没有组件需要。 
       创建一个跨浏览器兼容的动态随机captcha图像。  [更多...]

,

asp仿漂亮的discuz论坛验证码

2. 七月 2009
        使用asp的jpeg组件,我们可以做出各种样式的漂亮的验证码,只是苦于目前大多数服务器的JPEG组件版本太低,无法消除文字而造成的毛边,除非用非透明模式去绘制字体,但这样又无法达到仿制discuz论坛验证码的目的,因此,暂且先不管这么多了,文字有毛边锯齿就先随着它,这并不能成为当前验证码的缺憾。该验证码非常简单明了,就算你是新手,在你查看过代码注释后,绝对也可以修改自如,可以很容易的修改成文字验证码、加法或其它算法的验证码等等。 [更多...]

ASP技术资料

MSSQLSERVER服务性错误而停止解决方法

27. 六月 2009
    服务器上面我用的是SQL Server 2005 开发者版,master数据库没有备份,本来可以正常的启动服务,但是让机房重启服务后,就不能启动SQL Server了,想重装N多东西要处理,还有别的库也要重新建立。太麻烦了。
    在网上找了好久,总算找到解决方案,原来是是因为突然断电,master数据库刚好产生坏区,我把别的服务器上面的这个库复制过来,再把此数据库覆盖过去就修复了,当然出现这种错误也可能是由于别的系统数据库损坏导致,覆盖一下就差不多了。 [更多...]

数据库相关

css控制select的边框及其他属性

25. 六月 2009
        select控件用CSS不太好控制,!在style里写上 width:**px;这个可以实现. 但height:**px; 这个就实现不了. 只能通过调整里面字体的大小来改变高度.同时background可以实现,但用背景图就不行了.select的border是默认的蓝色, CSS用border属性是改变不了的. 只有通过层伪装的方法才能让边框改变,先建一个带有预想边框的层, 在里面放上select,其中select的尺寸要比div稍微大一点,让超出层的内容隐藏从而遮盖住select自带的边框. [更多...]

页面美工设计 ,

最快的ASP排序算法

23. 六月 2009
Function QuickSort(vData, Low, Hi)
 If Not IsArray(vData) Then Exit Function
 Dim lTmpLow
 Dim lTmpHi
 Dim lTmpMid
 Dim vTempVal
 Dim vTmpHold [更多...]

ASP技术资料

ASP几种排序算法

23. 六月 2009
Dim aData
aData = Array(3,2,4,1,6,0)

Call ResponseArray(aData, "原来顺序")
Call ResponseArray(SelectSort(aData), "选择排序")
Call ResponseArray(QuickSort(aData), "快速排序")
Call ResponseArray(InsertSort(aData), "插入排序")
Call ResponseArray(BubbleSort(aData), "冒泡排序")

[更多...]

ASP技术资料

ASP删除重复数组

22. 六月 2009
Function MoveR(Rstr)
 Dim i,SpStr
 SpStr = Split(Rstr,",")
 For i = 0 To Ubound(Spstr)
  If I = 0 then
   MoveR = MoveR & SpStr(i) & ","
  Else
   If instr(MoveR,SpStr(i))=0 and i=Ubound(Spstr) Then [更多...]

ASP技术资料

asp 二维数组排序/一维数组排序

22. 六月 2009
Function Sort(ary)
   Dim KeepChecking,I,FirstValue,SecondValue
   IF Not IsArray(ary) Then Exit Function
   KeepChecking = True
   Do Until KeepChecking = False
     KeepChecking = False
     For I = 0 To UBound(ary)
       IF I = UBound(ary) Then Exit For [更多...]

ASP技术资料 , ,

asp添加、删除、修改xml文件中的节点

21. 六月 2009
1.ASP显示xml文件中的所有节点
2.ASP向xml文件中的添加节点
3.ASP删除xml文件中某个节点
4.使用asp修改xml中的节点
1.ASP操作xml--显示xml文件中的所有节点
通常是利用数据库来保存数据,但也可以使用xml文件来保存数据。假设xml文件的内容是: [更多...]

学习心得

ASP操作XML数据小结

21. 六月 2009
NO.1--建立一个XML数据库data.xml
<?xml version="1.0"?>
<records>
<record>
<name>caca</name>
<qq>154222225</qq>
<email>service@supidea.com</email>
</record>
<records> [更多...]

学习心得

Microsoft.XMLDOM相关资料

21. 六月 2009
取得根节点
set dom=CreateObject("microsoft.xmldom")
dom.async=false
dom.load "c:\user.xml"
getElementById
set book1=rootNode.childNodes(1)
book1.ownerDocument 返回Document节点,指向XML文档本身
book1.previousSibling 前一个节点 [更多...]

学习心得

Microsoft.XMLDOM(XMLDOM)对象的属性和方法

21. 六月 2009

async 属性
作 用 async 属性表示是否允许异步的下载。
基本语法 boolValue = XMLDocument.async;XMLDocument.async = boolValue;
说 明 布尔值是可擦写的(read/write),如果准许异步下载,值为True;反之则为False。
范 例
xmlDoc.async = "false";
alert(xmlDoc.async);

[更多...]

学习心得