-
vbscript的骨灰级写法计算1到100的和
所属栏目：[Asp教程] 日期：2016-12-03 热度：65
这篇日志完全是看了一篇日志后的启发，原文为：邪恶的eval和new Function。 很少使用new Array的方式来定义数组，没想到new Array有这么一个妙用，通过new Array(n)我们可以创建n个空元素，同时也就在n个元素中间存在n-1个空白，通过join,我们可以将一些东[详细]
-
使用脚本调用系统的关机对话框实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：193
以前有介绍如何使用命令行调用系统的关机对话框： 具体方法：开始／运行： 复制代码 代码如下: rundll32.exe shell32.dll #60 但是，上述方法会存在一问题，XP下无法正常使用该方法进行关机（感谢网友沐烨 发现该问题）。问题原因可能是：正常情况下，关机[详细]
-
获取外网IP并发送到指定邮箱的vbs代码[已测]
所属栏目：[Asp教程] 日期：2016-12-03 热度：75
复制代码 代码如下: ''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 热度：138
为了解决这类问题，我使用Visual Basic Scripting设计了一个脚本，可以自动达到这个目标。在本脚本中，自动压缩所有文件。为了避免将脚本自己也压缩进去，使用了一些判断。 复制代码 代码如下: call main() Sub main() Dim fs '文件系统。 Dim f 'folder Di[详细]
-
Win2003里用命令行刷新硬件列表，以扫描硬件改动的实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：188
如果是想搜索新硬件，还真不知道该用什么命令。系统的PNP可以自动搜索到新硬件，所以估计也没必要手动刷新搜索。 如果是想查看设备的变动，倒是可以用命令行来实现。 方法一、使用WMIC（WMI命令行） 使用WMIC需要管理员权限，第一次运行会进行安装和配置。[详细]
-
用VBScript实现解压缩目录中的所有文件(Zip)
所属栏目：[Asp教程] 日期：2016-12-03 热度：138
复制代码 代码如下: 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 热度：161
复制代码 代码如下: 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 热度：73
复制代码 代码如下: 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 热度：61
一直以来，我都是用 New RegExp 来创建正则表达式对象的： Set regex = New RegExp然而最新才发现 VBS 的正则表达式对象也可以这样创建： Set regex = CreateObject("VBScript.RegExp")貌似我看过的 VBScript 书籍没有一本介绍过这种写法，当然，书上没写的[详细]
-
VBS实现将字符串写入剪切板的实现代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：129
函数代码: 复制代码 代码如下: Sub CopyString(s) Set forms=WScript.CreateObject("forms.form.1") Set textbox=forms.Controls.Add("forms.textbox.1").Object With textbox .multiline=True .text=s .selstart=0 .sellength=Len(.text) .copy End With E[详细]
-
ASP/VBScript中CHR(0)的由来以及带来的安全问题分析
所属栏目：[Asp教程] 日期：2016-12-03 热度：120
该字符标识着字符串的结束，也称作null-terminated，这个给脚本编程尤其是ASP编程带来了一定的麻烦，很多人可能会问为什么要保留这个特殊字符，我们可以追溯到编写操作系统的语言之一C语言，学过C/C++的童鞋可能知道，在字符串中标识一个字符串结束靠的就是[详细]
-
重庆铁塔公司成立 三大运营商将实现资源共享
所属栏目：[Asp教程] 日期：2016-11-24 热度：189
10月24日，中国铁塔股份有限公司重庆市分公司（下称重庆铁塔公司）在两江新区正式挂牌成立。这也是中国铁塔公司在国内设立的第3家省级分公司。 重庆铁塔公司下设9个区域性分公司。按照发展计划，该公司将通过专业化、市场化的模式，开展通信基础设施的建设[详细]
-
中国铁塔江西分公司昨揭牌 三大运营商不再自建基站避免浪费
所属栏目：[Asp教程] 日期：2016-11-24 热度：127
10月26日，中国铁塔股份有限公司江西省分公司在南昌正式揭牌成立。今后移动、联通、电信三家的基站等通信基础设施建设，都将陆续交由该公司负责，以避免三家运营商通信设施重复建设。 本报讯 江南都市报记者廖济堂报道：10月26日，中国铁塔股份有限公司江[详细]
-
赵泽良:依法治网,全面践行习总书记网络安全观
所属栏目：[Asp教程] 日期：2016-11-24 热度：121
編者按：習總書記深刻認識網絡空間發展規律，提出了沒有網絡安全就沒有國家安全、沒有信息化就沒有現代化的重要論斷，明確了從網絡大國走向網絡強國的宏偉目標，形成了具有中國設計、中國智慧、中國特色的網絡治理和安全觀，蘊含了網絡強國建設的基本脈絡[详细]
-
中国网络空间法治化将加速前行
所属栏目：[Asp教程] 日期：2016-11-24 热度：78
中国IDC圈10月28日金秋十月，以依法治国为主题的党的十八届四中全会为法治中国的新华章定下了一个明确的基调。而由中央网络安全和信息化领导小组办公室举办的学习宣传党的十八届四中全会精神，全面推进网络空间法治化系列座谈会，则将法治化作为了中国互联[详细]
-
中国“芯”服务器保障信息安全 效能达国际水平
所属栏目：[Asp教程] 日期：2016-11-24 热度：54
中国IDC圈10月28日报道：记者日前从知情人士处获悉，中国已掌握服务器行业的绝大部分关键技术与生产工艺，第一批自主可控可信服务器正在中国有关政务部门使用，这进一步缩小国内外在 数据链技术方面的信息安全差距。 据知情人士透露，目前中国央企曙光集团[详细]
-
小米回应印空军“禁用令”：将建北京以外数据中心
所属栏目：[Asp教程] 日期：2016-11-24 热度：96
中国IDC圈10月29日报道，针对印度空军因安全原因禁止使用中国小米手机的命令，小米27日做出回应。路透社称，小米表示，将为印度用户建设北京以外的数据中心。今年年初开始，小米已开始将非中国用户的数据从北京的数据中心移往新加坡和美国的亚马逊云计算服[详细]
-
天地图建设全球大数据中心
所属栏目：[Asp教程] 日期：2016-11-24 热度：180
中国IDC圈10月29日报道，由国家测绘地理信息局主办的天地图中国行活动26日在北京启动。记者在采访中获悉，国家地理信息公共服务平台天地图建设有了新进展：天地图大数据中心已经在天津滨海新区未来科技城启动，预计2015年将建成具有1000台服务器规模的天地[详细]
-
光环新网前三季度业绩同比增40.35%
所属栏目：[Asp教程] 日期：2016-11-24 热度：174
中国IDC圈10月29日报道，光环新网10月26日晚间发布2014 年第三季度报告，2014年1-9月公司的营业收入为31，580.09万元，较去年同期增长45.78%；其中2014年第三季度，公司的营业收入为11，524.04万元，增长52.35%.2014年1-9月公司营业利润为8，098.76万元，[详细]
-
鹏博士业绩增速略有放缓
所属栏目：[Asp教程] 日期：2016-11-24 热度：131
中国IDC圈10月29日报道，鹏博士业绩增速相比上半年略有放缓，低于市场预期。 鹏博士公司发布2014年三季报，1-9月份实现营收51.37亿元，较上年同期增长21.5%；实现归属于母公司所有者的净利润4.22亿元，较上年同期增长31.34%. 公司前三季度业绩相比上半年营[详细]
-
重庆计划三年打造500亿元数据服务业
所属栏目：[Asp教程] 日期：2016-11-24 热度：131
中国IDC圈9月22日报道：[ 运用大数据技术对海量数据进行分析处理，蕴藏着巨大的增值红利，在未来的二三十年，大数据信息进出口将成为世界贸易的主要标的物 ] 最近几年，重庆强力推进港口、航空、铁路通道建设，形成三个保税区，进出口贸易增速领跑全国，其[详细]
-
宽带独家接入 业主无法选择(图)
所属栏目：[Asp教程] 日期：2016-11-24 热度：64
中国IDC圈9月22日报道：金隅悦城秀悦园 编辑同志： 我是东丽区津滨大道与跃进路交口金隅悦城秀悦园的业主。今年入住后，我发现家里只能安装中国电信的宽带，与其他运营商相比，同样的带宽不但价格高，而且能够选择的带宽种类也少。我们想安装其它运营商的[详细]
-
世纪互联与做空机构缠斗一周 股价下跌27%
所属栏目：[Asp教程] 日期：2016-11-24 热度：84
中国IDC圈9月22日报道：继500彩票、天合化工后，中国互联网基础设施服务提供商世纪互联成为又一个国外做空机构的做空对象。 在一周左右的时间里，世纪互联与做空机构进行了两回合的缠斗。尽管世纪互联迅速回应指控，但9月8日至今，其股价仍然下跌了27%左右[详细]
-
转型屡屡失败 四海股份再赌云计算
所属栏目：[Asp教程] 日期：2016-11-24 热度：124
中国IDC圈9月23日报道：自上市以来四海股份已经历了四次转型，然而在频繁的转型后公司仍然未能找到合适的主业。在主营不给力的情况下，公司近日再次打起了转型的念头，而转型的方向则是云计算。 四海股份日前披露公告称，公司将投资2亿元在包头设立一家全[详细]
-
2015版《中国IDC行业资讯大全》开启收录
所属栏目：[Asp教程] 日期：2016-11-24 热度：161
在数据中心，云计算以及移动互联网风起云涌的当下，IDC市场也随之发生了巨大的变革。已经逐渐从传统模式转向了云端。企业转型更迭的速度也日趋频繁。在这种情况下，用户，消费者和IDC服务商之间，迫切的需要一个为彼此能够顺畅沟通而搭建的平台，以此来共[详细]
