-
Python 两个列表的差集、并集和交集实现代码
所属栏目：[Asp教程] 日期：2016-12-04 热度：133
①差集 方法一： if __name__ == '__main__':a_list = [{'a' : 1}, {'b' : 2}, {'c' : 3}, {'d' : 4}, {'e' : 5}]b_list = [{'a' : 1}, {'b' : 2}]ret_list = []for item in a_list:if item not in b_list:ret_list.append(item)for item in b_list:if ite[详细]
-
python中range()与xrange()用法分析
所属栏目：[Asp教程] 日期：2016-12-04 热度：123
本文实例讲述了python中range()与xrange()用法。分享给大家供大家参考，具体如下： 据说range比xrange开销要大，原因是range会直接生成一个list对象，而xrange每次调用返回其中的一个值（参考:http://www.jb51.net/article/50072.htm）。于是好奇做了个小[详细]
-
python if not in 多条件判断代码
所属栏目：[Asp教程] 日期：2016-12-04 热度：79
百度作业帮提问： python if not in 多条件 判断怎么写 s = ['1','2'] 判断条件 sta = "12345" 正常的是这样的, if "1" not in sta and "2" not in sta: print sta 这要是知道条件的还行， 要是判断条件有很多 这种方法肯定就不行了？ 怎么用一个公式 满足[详细]
-
关于vbs 生成静态页面过程中出现的问题
所属栏目：[Asp教程] 日期：2016-12-03 热度：71
vbs是否能够实现如下的：访问某个aspx页面，然后把服务器返回的页面以filestream 的形式保存为html格式，如果可以实现，应该如何来用代码来实现呢？ 先用InternetExplorer.Application打开http://xxx.xxx.xxx/xxx.aspx，然后保存oIE.document.body.outerHTM[详细]
-
dim函数第三个参数设置截取字符的长度问题
所属栏目：[Asp教程] 日期：2016-12-03 热度：59
dim函数的第三个参数，也就是截取字符的长度，我在设置这个的时候，出了些问题:response.write mid(up_address,a(i),a(i+1)-1) “lt;br /gt;”像我上面这样写的时候，它就会报错，提示无效的过程调用或参数, response.write mid(up_address,a(i),a(i+1)+1)[详细]
-
VBS实现将Excel表格保存为txt文本
所属栏目：[Asp教程] 日期：2016-12-03 热度：80
希望能够找到个能给excel表另存为TXT的VBS代码，虽然另存为可以选择，但还是需要直接VBS执行这一步另存为TXT格式的，应该如何写代码呢？ 有装Excel的话，就会比较简单，下面的是通用的不装Office也可以运行的，如下: VBScript code: 复制代码 代码如下: Set[详细]
-
vbs解决处理TXT文本数据相关问题实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：75
有个小问题，如下： 现有文本文件1.txt，内容如下： 数值_1出现频度12647 数值_2出现频度10000 数值_3出现频度12608 数值_4出现频度8712 数值_5出现频度10658 数值_6出现频度8472 数值_7出现频度11232 数值_8出现频度8648 数值_9出现频度9264 数值_10出现频[详细]
-
了解VBE VBE则是编译后(加密)的VBS代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：75
一、vbe与vb VBE跟VBS差不多，都是VB脚本代码文件，但他们也有不同： VBS是明文代码，就是说可以直接使用记事本编辑； VBE则是编译后（加密）的VBS代码，使用记事本打开不能直接看到源代码。（有些例外） 加密工具有很多，其中常用的是 Microsoft Script En[详细]
-
VBS加密14法你会几种 VBS加密免杀浅谈
所属栏目：[Asp教程] 日期：2016-12-03 热度：124
手机打字实在在麻烦，所以一些比较简单或太复杂的代码我就不直接提供实例了。 1、不是方法的方法－－加注释 加一些规则无用不含特征码的注释。代码略 2、大小写混编 利用VBS忽略大小写 3、 分行与同行混用 利用冒号（:）连接多行代码为一行 4、一行分多行[详细]
-
VBS基础教程
所属栏目：[Asp教程] 日期：2016-12-03 热度：75
VBScript(Microsoft Visual Basic Script Editon).，微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言. Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言,[详细]
-
获取远程机器共享目录的物理路径的代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：191
第一：依靠135端口，用wmi。像下边的脚本是得到共享目录ttt的物理目录。 复制代码 代码如下: strPath ="192.168.1.55ttt" strPath = Replace(strPath, "", "") arrPath = Split(strPath, "") strComputer = arrPath(0) strShare = arrPath(1) Set ob[详细]
-
EXE2BAT(EXE转BAT)的vbs脚本
所属栏目：[Asp教程] 日期：2016-12-03 热度：146
exe2bat的脚本 复制代码 代码如下: fp=wscript.arguments(0) fn=right(fp,len(fp)-instrrev(fp,"")) with createobject("adodb.stream") .type=1:.open:.loadfromfile fp:str=.read:sl=lenb(str) end with sll=sl mod 65536:slh=sl65536 with createobject([详细]
-
vbscript的骨灰级写法计算1到100的和
所属栏目：[Asp教程] 日期：2016-12-03 热度：53
这篇日志完全是看了一篇日志后的启发，原文为：邪恶的eval和new Function。 很少使用new Array的方式来定义数组，没想到new Array有这么一个妙用，通过new Array(n)我们可以创建n个空元素，同时也就在n个元素中间存在n-1个空白，通过join,我们可以将一些东[详细]
-
使用脚本调用系统的关机对话框实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：108
以前有介绍如何使用命令行调用系统的关机对话框： 具体方法：开始／运行： 复制代码 代码如下: rundll32.exe shell32.dll #60 但是，上述方法会存在一问题，XP下无法正常使用该方法进行关机（感谢网友沐烨 发现该问题）。问题原因可能是：正常情况下，关机[详细]
-
获取外网IP并发送到指定邮箱的vbs代码[已测]
所属栏目：[Asp教程] 日期：2016-12-03 热度：57
复制代码 代码如下: ''getIP set http=createobject("Microsoft.XMLHTTP") ipp="http://www.ip138.com/ip2city.asp" http.open "get",ipp,false http.send ss=bytes2BSTR(Http.responsebody) intStrA = InStr(1,ss,"[",1)+1 sss=mid(ss,intStrA) intStrB =[详细]
-
使用脚本自动压缩指定目标下的所有文件的代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：113
为了解决这类问题，我使用Visual Basic Scripting设计了一个脚本，可以自动达到这个目标。在本脚本中，自动压缩所有文件。为了避免将脚本自己也压缩进去，使用了一些判断。 复制代码 代码如下: call main() Sub main() Dim fs '文件系统。 Dim f 'folder Di[详细]
-
Win2003里用命令行刷新硬件列表，以扫描硬件改动的实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：142
如果是想搜索新硬件，还真不知道该用什么命令。系统的PNP可以自动搜索到新硬件，所以估计也没必要手动刷新搜索。 如果是想查看设备的变动，倒是可以用命令行来实现。 方法一、使用WMIC（WMI命令行） 使用WMIC需要管理员权限，第一次运行会进行安装和配置。[详细]
-
用VBScript实现解压缩目录中的所有文件(Zip)
所属栏目：[Asp教程] 日期：2016-12-03 热度：77
复制代码 代码如下: On Error Resume Next Dim objFSO,sourcepath,targetpath Function GetZipFile(path) Dim file,folder,sfolder,subfolder,files If Not objFSO.FolderExists(path) Then Msgbox "目标文件夹不存在！" Else objFSO.CreateFolder targetp[详细]
-
VBScript压缩单个文件为zip格式
所属栏目：[Asp教程] 日期：2016-12-03 热度：183
复制代码 代码如下: On Error Resume Next Dim fso,fp,oApp,targetfile Set fso=CreateObject("Scripting.FileSystemObject") targetfile="D:tmp.zip" Set fp=fso.OpenTextFile(targetfile,2,True) fp.Write Chr(80) Chr(75) Chr(5) Chr(6) String(18,0)[详细]
-
用VBScript实现压缩目录中的所有文件(Zip)
所属栏目：[Asp教程] 日期：2016-12-03 热度：192
复制代码 代码如下: On Error Resume Next Dim objFSO,sourcepath,targetpath,targetfile Function GetSourceFile(path) Dim file,folder,sfolder,subfolder,files If Not objFSO.FolderExists(path) Then Msgbox "目标文件夹不存在！" Else objFSO.Create[详细]
-
VBS创建正则表达式对象的两种方法
所属栏目：[Asp教程] 日期：2016-12-03 热度：115
一直以来，我都是用 New RegExp 来创建正则表达式对象的： Set regex = New RegExp然而最新才发现 VBS 的正则表达式对象也可以这样创建： Set regex = CreateObject("VBScript.RegExp")貌似我看过的 VBScript 书籍没有一本介绍过这种写法，当然，书上没写的[详细]
-
ASP/VBScript中CHR(0)的由来以及带来的安全问题分析
所属栏目：[Asp教程] 日期：2016-12-03 热度：149
该字符标识着字符串的结束，也称作null-terminated，这个给脚本编程尤其是ASP编程带来了一定的麻烦，很多人可能会问为什么要保留这个特殊字符，我们可以追溯到编写操作系统的语言之一C语言，学过C/C++的童鞋可能知道，在字符串中标识一个字符串结束靠的就是[详细]
-
世纪互联与互联网络信息中心战略合作
所属栏目：[Asp教程] 日期：2016-11-23 热度：78
2014年10月2日，世纪互联（VNET）董事长陈升与中国互联网络信息中心（CNNIC）负责人李晓东教授在北京共同签署了战略合作框架协议。根据战略合作协议的规定，双方将依托国家域名全球服务平台，本着资源共享、优势互补、合作共赢、共同发展的原则，就互联网[详细]
-
廊坊等地将承接北京地区数据中心需求
所属栏目：[Asp教程] 日期：2016-11-23 热度：50
中国IDC圈10月8日报道，近日，记者从北京市数据中心产业发展布局工作会上获悉，北京市数据中心产业做出新布局，该市将结合京津冀一体化战略，推动数据中心产业转移。未来，廊坊等地将承接更多的北京地区数据中心的需求。 据了解，今年7月，北京市政府正式[详细]
-
中国IDC圈独家探营：香江科技
所属栏目：[Asp教程] 日期：2016-11-23 热度：65
香江科技镇江总部1号门远景 香江科技镇江总部1号门近景 香江科技镇江总部2号门 香江科技云动力研发中心 香江科技云动力研发中心全景 香江科技成立于1999年，是国内知名的数据中心整体解决方案专家，公司坐落在江苏镇江新区金港大道84号，建筑面积66000平方[详细]
浙公网安备 33038102330475号