Jane Style (Windows版) Part291 (850ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

120(2): 警備員[Lv.36] 08/16(土)22:31 ID:p0/2J/9K0(1) AAS
MonaTicket_delete.vbs

' INIファイルを読み込む
Ini = CreateObject("Scripting.FileSystemObject").OpenTextFile("Jane2ch.ini", 1).ReadAll

' MonaTicket=の後ろの25文字を削除する正規表現を設定
Set RE = New RegExp
RE.Pattern = "(MonaTicket=.*?)(.{25})"

' 置換を実行
Ini = RE.Replace(Ini, "$1")

' INIファイルに書き戻す
CreateObject("Scripting.FileSystemObject").OpenTextFile("Jane2ch.ini", 2, True).Write Ini

Jane2ch.iniのある場所に置いて実行。改良があればどうぞ

---

126: 警備員[Lv.16] 08/16(土)22:58 ID:M/PfXu6P0(32/36) AAS
>>120
そのソースをもとにCopilotにPowerShellのコードに書き直してもらった

---

841(1): 警備員[Lv.6] 08/23(土)23:04 ID:saAGI6DX0(1) AAS
オレは>>120の最後にjane起動を追加した

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.024s