VBSで便利なプログラムを作れスレ 2

220(2): 2018/11/10(土)18:11 ID:v8e4FGYB(1) AAS
テキストファイル内を置換するプログラムを作ったのはいいが、文字化けしておかしなことになる。
置換する前は当たり前だが、文字化けしてない状態で、
置換した後は文字化けする。
置換処理の後に、保存前にエンコードを設定しないといけないのか？

221: 2018/11/10(土)18:27 ID:VEtl387f(1/7) AAS
>>220
自演乙

222(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)18:40 ID:GxjHn4EZ(1/2) AAS
>>220
編集前のテキストファイルと、VBSファイルが、UTF-8かSJISかを確認してね。

223(1): 2018/11/10(土)18:43 ID:VEtl387f(2/7) AAS
>>222
自演乙

224(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:08 ID:GxjHn4EZ(2/2) AAS
>>223
ロボット乙。

225(1): 2018/11/10(土)19:10 ID:VEtl387f(3/7) AAS
>>224
自演乙

226(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:19 ID:zzsAm3V1(1/5) AAS
>>225
ロボット乙。

227(1): 2018/11/10(土)19:23 ID:VEtl387f(4/7) AAS
>>226
自演乙

228(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:25 ID:zzsAm3V1(2/5) AAS
>>227
ロボット乙。

229(1): 2018/11/10(土)19:28 ID:VEtl387f(5/7) AAS
>>228
自演乙

230(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:31 ID:zzsAm3V1(3/5) AAS
>>229
ロボット乙。

231(1): 2018/11/10(土)19:33 ID:VEtl387f(6/7) AAS
>>230
自演乙

232(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:33 ID:zzsAm3V1(4/5) AAS
>>231
ロボット乙。

233(1): 2018/11/10(土)19:36 ID:VEtl387f(7/7) AAS
>>232
自演乙

234: さまよえる蟻人間 ◆T6xkBnTXz7B0 2018/11/10(土)19:38 ID:zzsAm3V1(5/5) AAS
>>233
こいつ、自演連呼ロボット。以下、無視すべし。

235(1): 2018/11/18(日)16:20 ID:nI1thq8a(1/7) AAS
AA省

236(1): 2018/11/18(日)17:58 ID:YervSdnc(1/8) AAS
>>235
自演乙

237(1): 2018/11/18(日)18:54 ID:nI1thq8a(2/7) AAS
>>236
荒らすなクズ

238(1): 2018/11/18(日)19:01 ID:YervSdnc(2/8) AAS
ピラフの命の輝きを見よ!!
外部ﾘﾝｸ:gist.github.com
外部ﾘﾝｸ:gist.github.com
外部ﾘﾝｸ:gist.github.com

>>237
自演乙

239(1): 2018/11/18(日)19:03 ID:nI1thq8a(3/7) AAS
>>238
全部404じゃん
404って存在しないって意味だよ
頭大丈夫？

240(1): 2018/11/18(日)19:06 ID:YervSdnc(3/8) AAS
>>239
逃亡乙

241(1): 2018/11/18(日)19:07 ID:nI1thq8a(4/7) AAS
>>240
意味わかんない
存在しないGitHubのページ貼って意味わかんない

242: 2018/11/18(日)19:07 ID:YervSdnc(4/8) AAS
AA省

243: 2018/11/18(日)19:08 ID:nI1thq8a(5/7) AAS
この人がピラフって人？

244: 2018/11/18(日)19:08 ID:YervSdnc(5/8) AAS
>>241
自演乙

245(1): 2018/11/18(日)19:08 ID:nI1thq8a(6/7) AAS
頭おかしい糖質なのかな

246: 2018/11/18(日)19:09 ID:YervSdnc(6/8) AAS
>>1=>>245
糖質乙

247(2): 2018/11/18(日)19:11 ID:nI1thq8a(7/7) AAS
存在しないGitHubのページを貼る
殺害予告をする
自演乙
糖質乙

これ本物のキチガイだよ

248: 2018/11/18(日)19:14 ID:YervSdnc(7/8) AAS
>>247
GitHubを放棄したピラフ乙

249: 2018/11/18(日)19:15 ID:YervSdnc(8/8) AAS
AA省

250(1): [age] 2018/11/19(月)23:09 ID:aopkboQu(1) AAS
荒らすなクズ

251: 2018/11/19(月)23:11 ID:jF+466MR(1) AAS
>>250
ピラフの自演乙

252: 2018/11/20(火)21:38 ID:9NuM4Bsa(1/2) AAS
AA省

253: 2018/11/20(火)21:39 ID:9NuM4Bsa(2/2) AAS
AA省

254: 2018/12/05(水)23:26 ID:IanfsrKA(1) AAS
AA省

255: 2018/12/05(水)23:36 ID:gvgIujf8(1) AAS
しつこすぎ
バカじゃねーの？

256(1): 2018/12/06(木)21:22 ID:HLPPFLjR(1) AAS
AA省

257(1): 2018/12/06(木)22:02 ID:1kNHcRfc(1) AAS
>>256
しつこすぎ
バカじゃねーの？

258(1): 2018/12/10(月)21:38 ID:t5aeyEfy(1) AAS
AA省

259: 2018/12/10(月)22:11 ID:3PrfDrwc(1) AAS
>>258
しつこすぎ
バカじゃねーの？

260(3): 2018/12/16(日)01:38 ID:gn/FiBbt(1) AAS
ソート済みのランダムな数列があるとします

(0, 15, 30, 46, 61, 76, 112, 148, 183, 219, 255)

この中から任意の数値の近似値を得たいのですが
アルゴリズムを教えてください

できるだけ高速なアルゴリズムがよいです
どうぞよろしくお願いいたします

261: 2018/12/16(日)09:31 ID:H/Oi8nrG(1/9) AAS
>>260
自演乙

262(5): さまよえる蟻人間 ◆T6xkBnTXz7B0 [age] 2018/12/16(日)11:27 ID:HKNcszmI(1) AAS
差の絶対値が最小になるものを選べばいい。

263: 2018/12/16(日)11:53 ID:H/Oi8nrG(2/9) AAS
>>262
自演乙

264(3): 2018/12/16(日)11:57 ID:/fF8nF6N(1/4) AAS
>>262
では差の絶対値が最小のものを選ぶ高速なアルゴリズムを教えてください

265: 2018/12/16(日)12:01 ID:H/Oi8nrG(3/9) AAS
>>264
自演乙

266(5): さまよえる蟻人間 ◆T6xkBnTXz7B0 [age] 2018/12/16(日)16:22 ID:NQzKS8Ci(1) AAS
MinValue = 9999999 ' とりあえず大きな整数
For I = 0 To Cnt - 1
Diff = A(I) - N
Abso = Diff * Diff
If Abso < MinValue Then
MinValue = Abso
End If
省3

267(5): 2018/12/16(日)16:39 ID:/fF8nF6N(2/4) AAS
自己解決しました

268(3): 2018/12/16(日)16:39 ID:/fF8nF6N(3/4) AAS
>>266
ありがとうございます

269: 2018/12/16(日)17:06 ID:H/Oi8nrG(4/9) AAS
>>266
自演失敗乙

270: 2018/12/16(日)17:06 ID:H/Oi8nrG(5/9) AAS
>>267
>>268
自演乙

271(4): 2018/12/16(日)17:34 ID:2P/btQ9u(1) AAS
えーバイナリサーチとかしないの？

272(2): 2018/12/16(日)19:18 ID:/fF8nF6N(4/4) AAS
>>271
バイナリサーチしますか？
お願いできますか？

273(1): 2018/12/16(日)20:20 ID:Ux2imWCY(1/4) AAS
AA省

274: 2018/12/16(日)20:25 ID:H/Oi8nrG(6/9) AAS
>>271
>>272
自演乙

275(1): 2018/12/16(日)20:26 ID:H/Oi8nrG(7/9) AAS
>>273
自演乙

276(1): 2018/12/16(日)20:31 ID:Ux2imWCY(2/4) AAS
>>275
わがはいは、バイなり

277(1): 2018/12/16(日)20:32 ID:Ux2imWCY(3/4) AAS
男も女も好きなり
だからバイなり

278: 2018/12/16(日)20:40 ID:H/Oi8nrG(8/9) AAS
>>276
>>277
自演乙

279: 2018/12/16(日)20:48 ID:Ux2imWCY(4/4) AAS
自演なり？
えんなり？
えなり？
簡単じゃないか

280: 2018/12/16(日)20:57 ID:H/Oi8nrG(9/9) AAS
AA省

281: 2018/12/17(月)15:43 ID:eFbtkFte(1/5) AAS
Dim targetURL
targetURL = InputBox("目的のURLを入力してください。" ,"InputURL", CopyedURL)
MsgBox targetURL '←ここではURLは"="も含め正常に出ている
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "hoge.bat "&""&targetURL&"", 1, True

〜〜〜〜〜〜〜〜〜〜
省3

282(1): さまよえる蟻人間 ◆T6xkBnTXz7B0 [age] 2018/12/17(月)15:49 ID:nqXdFhQr(1/5) AAS
%を二重化する。

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

あと 571 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.026s