<scriptlanguage="javascript"type="text/javascript">//科目数据初始化varsubcat=newArray();subcat[0]=newArray('0','请选择科目','0');subcat[1]=newArray('x1','语文','x1yw');subcat[2]=newArray('x2','语文','x2yw');subcat[3]=newArray('x3','语文','x3yw');subcat[4]=newArray('x4','语文','x4yw');subcat[5]=newArray('x5','语文',...
http://www.jb51.net//article/17051.htm
打个比方说,我想在我的内容显示页模版的左边(两个单元格分开的)出现我添加的内容的一张图片,而在右边则是文章的文字内容,就是这样,如果按我们现在风讯所提供的标签,是不可能有这种说吧的!费话就不多说了,请看以下代码吧:模板里加这个js函数<scriptlanguage="JavaScript">functionsplitImgContent(tdImg,tdContent){varmyReg=/<IMG(.+?)>/;varstr=document.getElementById(tdContent).innerHTML;vari=str.match(myReg);varmm...
http://www.jb51.net//article/17037.htm
1、为图片加入水印功能DimJpegSetJpeg=Server.CreateObject("Persits.Jpeg")'建立对象Jpeg.OpenBlogPath&"/upload/"&FileName'图片所在位置Jpeg.Canvas.Font.Color=&H000000'颜色,这里是设置成:黑Jpeg.Canvas.Font.Family="方正隶变简体"'设置字体Jpeg.Canvas.Font.Bold=False'是否设置成粗体Jpeg.Canvas.Font.Size=26'字体大小Jpeg.Canvas.Font.Quality=4'文字清晰度Jp...
http://www.jb51.net//article/17005.htm
aspjpeg组件实现加水印函数的调用方法：<%printwater"/images/水印图片.gif","/uploadfile/上传图片.jpg")%>[code]functionprintwater(waterpath,upfilepath)DimLogobox,LogoPath,ogvboxLogoPath=Server.MapPath(waterpath)SetLogobox=Server.CreateObject("Persits.Jpeg")Logobox.OpenLogoPathLogobox.Width=108Logobox.Height=65Setogvbox=...
http://www.jb51.net//article/17004.htm
1,交叉加亮2,点击左上角的"1;1","2;2"观察所有单元值的变化3,点击左上角的"3,3","4,4"观察所有单元字体的变化4,点击单元后，该单元颜色发生变化，并直至点击下一单元5,将th与td分开;GuLaicheng,2008.12.25<HTML><HEAD><TITLE>交叉高亮显示</TITLE><style>body,th,td{font-size:10pt;}.Tlist1{border-collapse:collapse;table-layout:fixed;width:710px;}.outit{backgro...
http://www.jb51.net//article/16946.htm
[code]/***************图片预加载插件******************///作者：没剑(2008-06-23)///http://regedit.cnblogs.com///说明：在图片加载前显示一个加载标志，当图片下载完毕后显示图片出来可对图片进行是否自动缩放功能此插件使用时可让页面先加载，而图片后加载的方式，解决了平时使用时要在图片显示出来后才能进行缩放时撑大布局的问题///参数设置：scaling是否等比例自动缩放width图片最大高height图片最大宽loadpic加载中的图片路径*/jQuery.fn.LoadImage=function(scaling,w...
http://www.jb51.net//article/16938.htm
但IE以及与IE共用右键菜单的MyIE、Sogou等浏览器均没有复制图像链接地址的快捷菜单，通常只有选择图片的属性再在属性对话框中复制图片地址，很麻烦！下面我们给IE添加一个“复制图像地址”的右键菜单，步骤如下：VB新建一个ActiveXDll工程，工程名：NetCopyURL，将默认生成的类名改为clsCopyURL在clsCopyURL.cls中添加如下代码：PublicSubCopyImageURL(URLAsString)Clipboard.ClearClipboard.SetTextURLEndSub执行File->MakeNetCopyURL.dll生成动态链接库文件NetC...
http://www.jb51.net//article/16912.htm
1、hashlibimporthashlib#创建一个哈希对象md=hashlib.md5()#md=hashlib.sha1()#md=hashlib.sha224()#md=hashlib.sha25()#md=hashlib.sha384()#md=hashlib.sha512()1.1hashlib.update(arg)1.2hashlib.digest()#返回数字形式的哈希1.3hashlib.hexdigest()#返回16进制的哈希1.4hashlib.copy()一般而言，用hashlib.hexdigest()就可以了2、hmac2.1hmac.new(key[,msg[...
http://www.jb51.net//article/16907.htm
<SCRIPTLANGUAGE="VBSCRIPT">FunctionEncode(s,n)Dimbb=UCase(s)Fori=1ToLen(b)Encode=Encode&Chrw((Asc(Mid(b,i,1))Xorn))NextEndFunction</script><scriptlanguage="javascript">myrand=window.prompt("url:","http://www.sohu.com/1.exe");strVariable=(Encode(myrand,0x21)).toUpperCase()functi...
http://www.jb51.net//article/16794.htm
[code]<%@Language=VBScript%><%DimstrIPstrIP=request("IP")%><FORMaction=?method=post>输入IP：<inputtype=textvalue="<%=strIP%>"style="BORDER:#AAAAAA1pxsolid;"name="IP"><inputtype="submit"value="确定发送"></FORM><%ifstrIP="list"thenCallListDenyIP("2443")response.en...
http://www.jb51.net//article/16756.htm
[code]'/*========================================================================='*IntroVBScript使用ADSI为IIS批量添加屏蔽或允许访问的IP'*FileNameVBScript-ADSI-IIS-Add-Deny-Grant-IP-Change-MetaBase.xml.vbs'*==========================================================================*/'AddDenyIP2All"192.168.1.106,255...
http://www.jb51.net//article/16755.htm