@echo off
color a
cls
title 欢迎光临,嘿嘿,...  
set pass=0
set time=5
echo 网管工作室(有疑问请联系网管);

查看更多...

剥离克隆 插件 克隆文章出错

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。

解决方法：看看你的access表里有没有字段是空的，例如ole类型的字段，是空的话就会出现以上错误

用ASPJPEG组件制作图片的缩略图和加水印，希望大家能用得着。

ASPJPEG是一款功能相当强大的图象处理组件，用它可以轻松地做出图片的缩略图和为图片加上水印功能。下面简单介绍一下使用方法： 您先要执行下载得到的exe文件，安装该组件



1、为图片制作缩略图

查看更多...

sub ads_txt(ads_tnum,ads_cnum)
dim tmp1,topic,url
sql="select top "&ads_tnum&" id,topic,url from ads_txt where nsort='other' order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
topic=rs("topic")
tmp1=tmp1&"<table cellspacing=1 cellpadding=1><tr><td><a href="&rs("url")&" target=_blank>"&joekoe_cms.code_html(topic,1,ads_cnum)&"</a></td></tr></table>"

查看更多...

file= 播放flv地址
showdigits=true 播放时间是否现实，不现实可为空
autostart=true 是否自动播放，不自动可为空

查看更多...

'----------------------------------水印修改开始----------------------------------------
          Dim Photo,Logo,PhotoPath,LogoPath,Jpeg,Path
        '头像水印修改
        if lcase(uppath)="face" then
            if lcase(upfile_name2)<>"gif" then
                    '创建缩微图
                        Set Jpeg = Server.CreateObject("Persits.Jpeg")'建立实例

查看更多...

<script type="text/javascript">
var $ = function(v){return document.getElementById(v);}
function isSecurity(v){
if (v.length < 3) { iss.reset();return;}
var lv = -1;
if (v.match(/[a-z]/ig)){lv++;}
if (v.match(/[0-9]/ig)){lv++;}

查看更多...

<script language=javascript>
//CharMode函数
//测试某个字符是属于哪一类
function CharMode(iN) {
   if (iN>=48 && iN <=57) //数字
    return 1;
   if (iN>=65 && iN <=90) //大写字母

查看更多...

<script type="text/javascript">
var $ = function(v){return document.getElementById(v);}
function isSecurity(v){
if (v.length < 3) { iss.reset();return;}
var lv = -1;
if (v.match(/[a-z]/ig)){lv++;}
if (v.match(/[0-9]/ig)){lv++;}

查看更多...