[過去ﾛｸﾞ] Jane Style (Windows版) Part291 (1002ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

837: 警備員[Lv.15] 08/23(土)22:22 ID:PhJkvPgH0(1/3) AAS
ワイこれ
Option Explicit

Dim shell, fso, tsIn, tsOut, iniText, re
Const ForReading = 1, ForWriting = 2

'── 0. WshShell オブジェクト生成 ──
Set shell = CreateObject("WScript.Shell")

'── 1. Jane2ch.exe を強制終了（エラーは無視） ──
On Error Resume Next
shell.Run "taskkill /F /IM Jane2ch.exe /T", 0, True
On Error GoTo 0
省7

---

838: 警備員[Lv.15] 08/23(土)22:23 ID:PhJkvPgH0(2/3) AAS
'── 3. 正規表現で値をクリア ──
Set re = New RegExp
With re
.Global = True
.IgnoreCase = True
.Multiline = True

' WrtCookie, WrtAgreementKey, WrtMonaKey を「キー=」だけに
.Pattern = "^(Wrt(?:Cookie|AgreementKey|MonaKey))=.*$"
iniText = .Replace(iniText, "$1=")

' WrtMonaStatus を 2 にリセット
省11

---

839: 警備員[Lv.15] 08/23(土)22:26 ID:PhJkvPgH0(3/3) AAS
2025acorn_delete.vbsに保存して毎週日曜にタスク実行でもすればおｋ

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.037s