‘建立Shell对象
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
‘启动telnet，注意要保证telnet.exe程序所在的路径如c:\winnt\system32在path环境变量中
sh.Run "telnet.exe"
WScript.Sleep 1000
‘向telnet发送我们平时录入的命令
sh.SendKeys "open 192.168.10.120"
WScript.Sleep 1000
sh.SendKeys "{ENTER}"
WScript.Sleep 1000
sh.SendKeys "n{ENTER}"[……]
在批处理中，set的功能有点繁杂：设置变量、显示环境变量的名及值、做算术运算、等待用户的输入、字符串截取、替换字符串，是我们常用的命令之一。
在字符串截取方面，新手因为没能注意到偏移量的问题，很容易提取到错误的字符串，因此，特开此帖，详细解释 set 截取字符的用法。
我们先来看一个例子：
set str=123456789
现在，我需要提取变量 str 中的第一个字符，那么，该怎么写命令呢？
set var=%str:~1,1%？我想，这很可能是很多粗懂set用法的新手们的第一反应，实际上，这条语句提取到的是字符"2"，并不是我们想要的"1"，也就是说，set var=%str:~1,1% 提取到的是字符串第二位上的字符，而不是第一位上的，这是什么原因呢？
原来，set 命令从左到右做字符截取的时候，是以整个字[……]
QQ设置方法：
1. 使用你想作为通讯的QQ号码登录到http://wp.qq.com/
2. 选择您这次需要生成的代码类型：选择一种
完全公开（推荐商家，客服等用户使用，代码中显示QQ号码，易于推广）
安全加密（推荐博主，论坛用户等使用，代码中不显示QQ号码）
可以在下面的图片留言： 中设置自己想显示的话
在线状态风格： 可更改风格
3. 复制代码并将其粘贴到你的博客或者网站上
4. 预览效果见右图
MSN设置方法：
1. 使用你想作为通讯的MSN登录到：即（网络设置 ）http://settings.messenger.live.com/Applications/CreateHtml.aspx
2. 允许网络上的人查看您是否联机并给您发送消息–à保存
3. 选择“创建 HTML”，选择“状态[……]
孰能不知，本现实
大千世界，随地开花，有用就采，无用何栽。
现实世界，人心难测，责任推托，原告甚冤。
小小社会，某史最臊，见其不揭，狂咬狂叫。
每逢正事，饭桌才说，他少我多，开始劝说。
拍马屁，推责任，无正气，旁门左道说别人。
[……]
TortoiseSVN
A Subversion client for Windows
Stefan Küng
Lübbe Onken
Simon Large
2005/01/17 19:09:21
二〇〇五年四月 Daan译
Table of Contents
Chapter 4. 日常操作指南… 4
4.1. 使用 TortoiseSVN.. 4
4.2. 认证… 5
4.3. 导入数据到仓库Importing Data Into A Repository. 5
4.3.1. 仓库规划Repository Layout 5
4.3.2. 导入Import 7
4.3.3. 特殊文件Special Files. 8
4.3.4. 参考项目Referenced Projects. 9
4.4. 取出工作副本Checking Out A Worki[……]
1、将文件checkout到本地目录
svn checkout path（path是服务器上的目录）
例如：svn checkout svn://192.168.1.1/pro/domain
简写：svn co
2、往版本库中添加新的文件
svn add file
例如：svn add test.php(添加test.php)
svn add *.php(添加当前目录下所有的php文件)
3、将改动的文件提交到版本库
svn commit -m "LogMessage" [-N] [–no-unlock] PATH(如果选择了保持锁，就使用–no-unlock开关)
例如：svn c[……]
From： http://www.svn8.com/svnjs/20081216/1713.html
这只是个说明，你不按说明来办事也不会怎么样，svn照样工作得很好。
branches：分枝
当多个人合作（Sally和John）时，可能有这样的情况出现：John突然有个想法，跟原先的设计不太一致，可能是功能的添加或者日志格式的改进等等，总而言之，这个想法可能需要花一段时间来完成，而这个过程中，John的一些操作可能会影响Sally的工作，John从现有的状态单独出一个project的话，又不能及时得到Sally对已有代码做的修正，而且独立出来的话，John的尝试成功时，跟原来的合并也存在困难。这时最好的实践方法是使用branches。John建立一个自己的branch，然后在里面实验，必要的时候从Sally的trunk里取得更新，或者将自己的阶段成果汇集到trunk中。（[……]
360隐私保护器监测出QQ查看文件 （TechWeb截图）
【TechWeb消息】9月27日消息，360推出个人隐私保护工具——360隐私保护器，专门曝光“窥私”软件。
据悉，此次发布的360隐私保护器第一版，目前仅支持用户投诉最多、覆盖量最大的即时通讯软件QQ（TM暂不支持）。
经体验发现，360隐私保护器直指QQ侵犯用户隐私。五分钟左右，共监测出170个文件或目录被QQ查看过，显示其中153项可能涉及到隐私。
360安全中心负责人表示，近期接到大量用户投诉，称某聊天软件在未经用户许可的情况下偷窥用户个人隐私文件和数据，经验证，某些客户端软件，的确会在后台密集扫描用户硬盘，并悄悄查看与自身功能毫不相关的文件，如用户浏览历史、网银文件、下载信息、视频文件等等。许多用户由此担心这些软件会在用户不知情的情况下窃取个人隐私数据。
360公司总裁齐向东表示：“我们[……]
Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim i As Integer
Dim sum As Integer, strpj As Integer
For i = 1 To 10
suiji = Int(100 * Rnd + 1)
Print suiji
a(i) = suiji
sum = sum + a(i)
Next i
Print ,
Text1.Text = sum
End Sub
[……]
CODE SEGMENT
ASSUME CS:CODE
MAIN: MOV AH,1
INT 21H
MOV BL,AL
INT 21H
MOV CL,AL
INT 21H
MOV CH,AL
MOV AH,2
 [……]
code segment
assume cs:code
main:mov ah,1
int 21h
MOV BL,AL
MOV AH,2
MOV DL,13
INT 21H
MOV DL,10
INT 21H
cmp BL,41h
&#[……]
data segment
buf db 100,101 dup(0)
buf1 db ‘qing shu ru’,13,10,'(ge shu zai 100 yi nei)=’,’$’
data ends
code segment
assume ds:data,cs:code
main:mov dx,data
mov ds,dx
lea dx,[buf1]
mov ah,9
int 21h
l[……]
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24hdata ends
code segment
assume cs:code,ds:data
main: mov ax,data
mov ds,ax
lea dx,[int1]
mov ah,9
int 21h
 [……]
；设变量int1和int2的定义如下
；int1 ‘935797238’
；int2 ‘843758912’
；编写程序段把int1和int2中以字符串形式存放的两个长整数相加，结果仍然以同样的形式放会变量int1中，不计溢出！
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24h
data ends
code segment
assume cs:code,ds:data
main: mov ax,data
mov ds,ax
&#[……]
data segment
buf db ‘THE ASCII CODE OF[‘,’$’
buf1 db ‘] IS ‘,’$’
buf2 db 13,10,’$’
data ends
code segment
assume cs:code,ds:data
main:mov ax,data
mov ds,ax
lea dx,[buf]
mov ah,9;输入提示
int 21h
mov ah,1;输入
int 21h
mov ah,0
mov bl,10h
div bl
mov bx,a[……]
玩趣儿
最新评语