//use: cscript this.js http://www.xxx.com/xxx.exe c:\xxx.exevar objArgs = WScript.Arguments;var sGet=new ActiveXObject("ADODB.Stream");var xGet = false;try {xGet = new XMLHttpRequest();} catch (trymicrosoft)&nb...

<?phpfunction GrabImage($url,$filename="") {  if($url==""):return false;endif;  if($filename=="") {    $ext=strrchr($url,".");    if($ext!=".gif" && $ext!=".jpg"):return false;endif;  ...

1.最简单的方法：利用鼠标右键菜单 　　这种方法是最简单的，就是对着你要保存的图片按鼠标右键，在弹出菜单中选择“图片另存为”，然后选择好你要保存的路径和文件名就可以了。 　　2.保存网页中所有图片的方法：利用文件菜单中的“另存为” 　　如果你想保存整个网页中的所有图片时可以采用本方法，因为它可以一次性的把所有图片文件都保存下来。方法是：看到你想保存的图片网页后，在IE浏览器中点击“文件”菜单中的“另存为”，把整个网页保存到硬盘，然后从中找到图片即可。注意，要选择“保存类型”中的“网页,全部(*.htm;*.html)”。 　　3.一般方法：利用专门的下载...

目前还是有BUG的,最新的测试页面在: http://www.reallydo.com/getimg.asp正则分析页面在: http://jorkin.reallydo.com/article.asp?id=380 发现BUG请在后面留言,谢谢.1.31修正src=后面有空格不能正确匹配.已修正.src=''为空时出错.已修正.发现BUG: 图片路径有多个空格时只能保留一个.未修正.2.18修正图片路径有多个空格时只能保留一个的BUG.已修正.[code]<% '功能:获取全部图片地址,保存到一个数组. '来源:http://...

最近公司在做一个项目，其中一块头部的菜单导航区，要求实现进入相关页面后上面的导航菜单图片也需变换．而这个对于静态页面或者用框架或iframe的来说是很容易实现的．而我们是利用include来包含进的这个top.asp．虽然可以在那个图片菜单上定义onclick的动作属性．但是只要一跳转页面，则这个onclick动作就没用了．因为top.asp被重新加载了．如果要解决这个问题，只能是在页面加载时能读取一个全局的变量，相对于浏览器的全局变量，通过这个变量的值来判断应该如何显示这个导航菜单．于是也便有了本文．我想到的解决方法有两种：１．利用cookies或session，在每个页面加载时写一个coo...

[html]<script language="javascript"> function AllAreaExcel(ID) {var oXL = new ActiveXObject("Excel.Application"); var oWB = oXL.Workbooks.Add(); var oSheet = oWB.ActiveSheet; var sel=document.body.createT...

相信大家平时都有这样的经历：页面上有一个链接指向服务器一个Word文件，当客户端机器有安装Office时，点击链接将调用Word打开浏览；当客户端机器没有安装Office时，点击链接将弹出保存对话框。总结一下即如果浏览器认识文件类型，就会自动打开；如果不认识，则会提示客户保存。可是有时候我们希望不管什么类型文件，都不要打开，直接让客户端保存。要达到这个要求，对于保存在服务器硬盘上的文件就得利用ASPUpload组件的SendBinary方法来实现，而对于保存在数据库中的文件则只须打开记录集，然后将二进制数据直接输出到客户端即可，不过要告诉浏览器文件的MIME类型、文件名称和文件大小。1.服务器...

关闭窗口时保存数据的办法<SCRIPT language="javascript"> 　　function IfWindowClosed() 　　{　　 　　　　var win = null; 　　　　try 　　　　{ 　　　　　　window.opener.name = "ss"; 　　　　　　if ( window.opener.name != "ss" ) 　　　　　　{&nb...

<%'名称：asp通用采集函数冗余版，要精品版的有心人自己改'作者：柳永法'日期：2007-6-23Function getHTTPPage(Path)    t = GetBody(Path)    getHTTPPage = BytesToBstr(t, "GB2312")End FunctionFunction GetBody(url)    On Error Re...

'=================================================='过程名：SaveRemoteFile'作  用：保存远程的文件到本地'参  数：LocalFileName ------ 本地文件名'参  数：RemoteFileUrl ------ 远程文件URL'==================================================Function SaveRemoteFile(LocalFileName,Remo...

'================================================    '函数名：ReSaveRemoteFile    '作  用：查找文件保存替换    '参  数：Str   ----原字符串    '参  数：url   ----当然网站URL   ...