作者chweng ()
看板EZsoft
标题Re: [请问] 请问有没有可以随机(乱数?)指定的软体
时间Thu Oct 23 18:18:09 2008
其实这满简单的，顺手写了一下：
---------->8----------沿线剪下，存为 random.js---------->8----------
try {
fso = new ActiveXObject('Scripting.FileSystemObject');
nfo = fso.OpenTextFile(WScript.Arguments.Item(0), 1, true, 0);
subject = nfo.ReadLine();
content = nfo.ReadLine().split(', ');
nfo.Close();
WScript.Echo(subject + "\r\n\r\n" + //
content[parseInt(Math.random() * content.length)]);
WScript.Quit();
} catch (e) {
WScript.Echo('没有指定档案');
WScript.Quit();
}
--------------------------------------------------------------------
问题档案要另外做，格式举例如下：
---------->8----------沿线剪下，存为 dinner.txt---------->8----------
今晚想吃什麽？
蓝蓝路, 啃得鸭, Mos 叭嘎, 鸿门宴, 三井宴
---------------------------------------------------------------------
嗯…然後要使用的时候，把 dinner.txt 拖拉至 random.js 上面，就会显示结果了。
你也可以建立很多问题档案，到时候需要哪一个就拉哪一个就可以了。
p.s. 问题档案的档名、以及所有相关程式及档案，请勿放在太奇怪的资料夹下，
然後本程式没有任何防呆，所以请自行确认输入的内容无误，
否则可能会发生预期之外的错误。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.165.33.54
1F：推 yinjing:XD 蛮有趣的 10/23 19:36
2F：推 yuyubuy:真的非常感谢您 >___< 10/23 20:13
3F：推 executor123:还真实用哩XDDDDD 10/23 20:16