VB程序员博客

//已经实现在同一个文件中记录当前时间，并记录对网站的ping记录情况。
//现在需要第一次循环记录在com1.txt文件中，第二次文件记录在com2.txt文件中，依次类推，请问该如何做？
for i = 1 to 10 '10为重复的次数
WScript.Sleep(1000*60*60) '每60分钟一次
Set objShell = CreateObject("Wscript.Shell")
'objShell.Run("%windir%system32cmd"&" /c "& "date/t "&">>com.txt"), 0, TRUE
objShell.Run("%comspec% /c date/t "&">>com.txt"), 0, TRUE
objShell.Run("%comspec% /c time/t "&">>com.txt"), 0, TRUE
objShell.Run("%comspec% /c ping www.sina.com -n 10 "&">>com.txt"), 0, TRUE
objShell.Run("%comspec% /c ping www.tom.com -n 10 "&">>com.txt"), 0, TRUE
next

同上

标签: , 字符串, 整数, 转换