这段代码是正常的:
<SCRIPT LANGUAGE="VBScript">
clipboardData.setData "Text", "111!"
</SCRIPT>
可放到上传组件中桥册森就出问题了,提示:
Microsoft VBScript 运行时错误 '800a01a8'姿散
缺少对象: 'clipboardData'
\up\uploadfile.asp, line 46
程序如下:
If Not CheckFileExt(GetFileExt(fileItem.FileName),strExt,true) Then upload.ErrMsg=upload.ErrMsg &"本系统支持 " &strext &" 文件上传!您的图片文件格式不正确!请重新选择上传! <br/>敏亩"
If upload.ErrMsg = "" Then
'生成随机不重复文件名
savefilename= GetNewnumber() &fileItem.FileExt
'将上传的文件保存为硬盘文件,
fileItem.SaveAs formPath &savefilename
clipboardData.setData "Text", "1111"
不准查看源文件放在<head>中间:<script language="高唤锋JavaScript"><!--document.onmousedown=click function click() {if ( event.button==2) {alert('不准查看源文件戚晌') }if ( event.button==3) {alert('不准查看源文件') }}//--></script>
1、在网页的Head部分加入如下代码,这段代码的主要功能是屏蔽PrintScreen键链雀,不断清空剪贴版,防止图片被用文件——另存为菜单另存。
<script language="javascript">
<!--
function testclip(){
try {
if(clipboardData.getData("Text")||clipboardData.getData("HTML")||clipboardData.getData("URL"))
{
null
}
}
catch(e){
clipboardData.setData("Text","")
}
setTimeout("testclip()",500)
}
testclip()
//-->
</script>
2、屏蔽IE6下的图像工具条,那么可以这样做:
<img src="*.jpg" galleryimg="no">
或者
<meta http-equiv="imagetoolbar" content="no">
3、屏蔽右键功能
在<body>上加上
<body oncontextmenu="return false" onselectstart="return false" ondragstart="return false">
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)