一个查看局域网在线IP的vbs脚本
实现代码如下:strSubNet = "192.168.1." Set objFSO= CreateObject("Scripting.FileSystemObject") Set objTS = objfso.CreateTextFile("e:\PingResult.txt") For i =
实现代码如下:strSubNet = "192.168.1." Set objFSO= CreateObject("Scripting.FileSystemObject") Set objTS = objfso.CreateTextFile("e:\PingResult.txt") For i =
下面介绍使用方法: 1. strstr: 返回一个从被判断字符开始到结束的字符串,如果没有返回值,则不包含 实现代码如下: 2. stristr: 它和strstr的使用方法完全一样.唯一的区别是stristr不区分大小写. 3. strpos: 返回boolean值.FALSE和TRUE不用多说.
我们用到的表结构如下:三张表的关系为:现有的测试数据为:我们需要的结果是:实现代码如下:DECLARE @strSQL VARCHAR(8000) SET @strSQL = 'SELECT t.STUNAME [姓名]' SELECT @strSQL = @strSQL + ',SUM(CASE
注意:下面的所有函数都没有用正则。 以上为取出第一个匹配的三个函数,实现相同的目的 function str_cut($str ,$start, $end) {//取出第一个匹配,效率最高,先分割再替换 $content = strstr( $str, $start ); $content = su
注意:下面的所有函数都没有用正则。 以上为取出第一个匹配的三个函数,实现相同的目的 实现代码如下:function str_cut($str ,$start, $end) {//取出第一个匹配,效率最高,先分割再替换$content = strstr( $str, $start );$content
strIcons = "1"//允许笑脸转换strSmile="1"//同上ImgName="em"picurl="/images/emot/"function UBBCode(content,html){content=content.replace("\\r","");content=conte
//Author: Unknow //把编码转换成 gb2312编码function UrlEncode(str){var i, c, ret="", strSpecial="!\"#$%?@[\]^`{|}~%";for(i = 0; i = 0x4e00){c = parseInt(z[str.
"DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"set conn=server.createobject("ADODB.CONNECTION")conn.open connstrset rs=server.createobject("ad