【news】ニュース速報運用情報779【ν】
>>320
まじでスクリプトってほどじゃないよ。
寝てる間とかにレベルアップしてくれるってだけで、他のことできないから。
Set Shell = CreateObject("WScript.Shell")
Shell.SendKeys "{TAB}"
WScript.Sleep 2000
For i = 1 To 10
Shell.SendKeys "test"
Shell.SendKeys "{ENTER}"
WScript.Sleep 8000
Shell.SendKeys "+{ENTER}"
WScript.Sleep 900000
next
Set Shell = Nothing
これを適当にkakikomi.vbsとかの名前で保存して、JANEのツール→設定→コマンドで
コマンド名｢自動レベルアップ｣にして実行するコマンドのところに｢wscript "D:\Jane Style\kakikomi.vbs"｣でパスを入力。
メモ欄をJANEの下に固定で表示させて、メモ1の名前のところに!ninjaでコテハン記憶にチェック。
あとは書き込みテストスレとかで、スレ表示欄のところで右クリックして自動レベルアップを実行すればおｋ。
最初のShell.SendKeys "{TAB}"でメモ欄にフォーカスが移って、シフトENTERで約15分おきに書き込んでる。
メモ欄はツールバー固定でメモ1じゃないとだめだから。
まじでスクリプトってほどじゃないよ。
寝てる間とかにレベルアップしてくれるってだけで、他のことできないから。
Set Shell = CreateObject("WScript.Shell")
Shell.SendKeys "{TAB}"
WScript.Sleep 2000
For i = 1 To 10
Shell.SendKeys "test"
Shell.SendKeys "{ENTER}"
WScript.Sleep 8000
Shell.SendKeys "+{ENTER}"
WScript.Sleep 900000
next
Set Shell = Nothing
これを適当にkakikomi.vbsとかの名前で保存して、JANEのツール→設定→コマンドで
コマンド名｢自動レベルアップ｣にして実行するコマンドのところに｢wscript "D:\Jane Style\kakikomi.vbs"｣でパスを入力。
メモ欄をJANEの下に固定で表示させて、メモ1の名前のところに!ninjaでコテハン記憶にチェック。
あとは書き込みテストスレとかで、スレ表示欄のところで右クリックして自動レベルアップを実行すればおｋ。
最初のShell.SendKeys "{TAB}"でメモ欄にフォーカスが移って、シフトENTERで約15分おきに書き込んでる。
メモ欄はツールバー固定でメモ1じゃないとだめだから。
|
|
|