VBScriptについて必死に話し合うスレ [無断転載禁止]©2ch.net

**デフォルトの名無しさん** · 2017/06/28(水) 20:52:02.68

ピラフ逃亡中?

**デフォルトの名無しさん** · 2018/02/23(金) 07:17:30.02

いやみなさん参考になりました。
cscriptからの実行で最低限の欲しい機能は実装できそうです。
それ以上望むときはhtaなど使ってみます。
どうもありがとうございました。

**デフォルトの名無しさん** · 2018/02/23(金) 07:21:34.16

>>512
本人がタイマーって書いてるだろ
オマエこそ絡んでくるな

**デフォルトの名無しさん** · 2018/02/23(金) 09:08:03.36

>>499
ごめんなさい
vbsedit上で試してた…
cmdでやったら普通にいけました

**デフォルトの名無しさん** · 2018/02/23(金) 14:08:48.49

VBSで非同期ってできるんだっけ？

**デフォルトの名無しさん** · 2018/02/23(金) 17:23:16.42

>>516
他のvbs呼び出し時に指定できるはず

**デフォルトの名無しさん** · 2018/02/23(金) 22:24:35.02

じゃVBSでwebsocketはできる？

と、むちゃぶりをしてみる

**デフォルトの名無しさん** · 2018/02/24(土) 14:14:40.12

>>518
winsock ocxはCOMだから使えるだろ

**デフォルトの名無しさん** · 2018/02/27(火) 00:14:14.65

>>519
ocx は基本 VBScript からは使えない。

**デフォルトの名無しさん** · 2018/02/27(火) 08:27:28.58

そうなの?

**デフォルトの名無しさん** · 2018/02/27(火) 18:28:38.01

>>520
VBScript から WinSock を使おうとするとオブジェクトは作れても上手く動かない。
ocx は画面の部品だから VBScript から使えなくても仕方がない。
また、使えたとしても VBScript から操るのはライセンス違反にあたるんだよなぁ。
ググれば分かるよ。

**デフォルトの名無しさん** · 2018/02/28(水) 08:44:15.01

>>522
Wscript.CreateObjectでインスタンスを作ると使えるらしいが。
mswinsock.ocxの単体配布はライセンス違反だがvbのダミーアプリを作って配布は大丈夫なのでは?

**デフォルトの名無しさん** · 2018/02/28(水) 21:16:35.24

>>523
技術的、ライセンス（単体配布ではなくデザインライセンス）的にダメな理由は大体以下。
http://nonsoft.la.coocan.jp/Chinamini/20100001/20100305.html
https://stackoverflow.com/questions/6348907/vbscript-jscript-networking-connect-either-udp-or-tcp
https://support.microsoft.com/ja-jp/help/318597/you-receive-an-error-message-you-do-not-have-a-license-to-use-this-con

よって、VB6.0 の開発ライセンスを持っていて、コマンドとして作って、それを VBScript から Exec する分には合法だと思うよ。
「Mswinsck.ocx の COMオブジェクトをコードから直接覗く行為」≒「開発行為、もしくはスクリプトからの直接使用」が駄目だと解釈したけどね。

ちなみに、PowerShell なら好きなポートから TCP し放題。
あーもうこっちでいいやと思った。

**デフォルトの名無しさん** · 2018/02/28(水) 21:38:28.95

あ、Mswinsck.ocx をラップしたような COM を作ってる人は世界にいっぱいいる。
それでいいんじゃないかな。

**デフォルトの名無しさん** · 2018/03/01(木) 08:30:04.02

>>524
>ちなみに、PowerShell なら好きなポートから TCP し放題。
でもセキュリティがお面倒なんでそ?

**デフォルトの名無しさん** · 2018/03/13(火) 19:47:35.20

みなさん、教えてください

VBScript逆引き大全500の極意
という本を買いました
vbsからエクセルを操作するやり方が
たくさん出ていて買ってよかったです

そこで疑問が
エクセル操作は、この本に出てる
ことしかできないのでしょうか？

それとも、できることはもっと
あるけど本では一部しか載ってない
のでしょうか？

**デフォルトの名無しさん** · 2018/03/14(水) 07:35:33.72

>>527
もっと出来るね
DLLいじる以外はVBAとほとんど同じ事ができるよう

**527** · 2018/03/14(水) 12:19:12.70

ありがとうございます
「 excel.application やりたいこと」
で検索してみます

**デフォルトの名無しさん** · 2018/03/15(木) 06:43:28.50

いまさらVBScriptを使おうとする理由はなんなんだ？

**デフォルトの名無しさん** · 2018/03/15(木) 07:04:42.56

代替手段がない

**デフォルトの名無しさん** · 2018/03/15(木) 07:07:39.93

VBScript以外の言語を使う人は結局イキってるだけ

**デフォルトの名無しさん** · 2018/03/15(木) 10:44:58.29

俺もVBScript単体またはVBScriptとバッチファイルの併用じゃないとできない事が多い

**デフォルトの名無しさん** · 2018/03/15(木) 10:56:24.90

PowerShellのセキュリティ制限が緩かったらVbscriptもbatも絶滅してたかもね

**デフォルトの名無しさん** · 2018/03/15(木) 12:48:51.81

おっさんばっかで草

**527** · 2018/03/15(木) 13:06:55.99

仕事用に、htaで簡単な押しボタン式ツールを
作ってみんなに使ってもらってるんです
いつまで使えるか不安ですが

**デフォルトの名無しさん** · 2018/03/15(木) 22:14:28.96

>>536
WPFに移りはなれ。あれはいいぞ。

**デフォルトの名無しさん** · 2018/03/15(木) 22:43:05.65

もうwshスレも落ちてるんだな、ここも早く楽になれよｗ

**527** · 2018/03/15(木) 23:27:40.71

WPF？
グーグル先生に聞きましたが
よくわかりませんでした

HTAとVBSって、ホント人気ないですね
会社でちょろっとしたツールを
作るには最適だと思うんですが

**デフォルトの名無しさん** · 2018/03/15(木) 23:39:48.66

きいてないやろ

**デフォルトの名無しさん** · 2018/03/16(金) 07:27:53.84

VBSの貧弱な機能に絶望してPowerShellを勉強してみたが
=じゃなくて-eqだとか、大昔のUNIXに載ってたB-shellかよと再絶望した
VBSを捨てて一から設計したスクリプト環境がこれではゲイツも浮かばれんわ

**デフォルトの名無しさん** · 2018/03/16(金) 08:22:04.56

>>541
理由はあったみたいだけど、不等号の表現は失敗だと思う。直観で分かりにくいよな。

**デフォルトの名無しさん** · 2018/03/16(金) 08:35:46.99

>>539
wpfはグーグル先生じゃなくてかずき大先生だろ?

**デフォルトの名無しさん** · 2018/03/16(金) 23:05:27.60

>>542
別に = の代わりに -eq 程度は FORTRAN の .EQ. FORTRAN eq

**デフォルトの名無しさん** · 2018/03/17(土) 07:13:49.84

シェルスクリプト、PowerShell、VBS の次のレベルは、Ruby

Windows でも、ファイル・テキスト処理に問題ない

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 14:24:29.50

>>545
じゃあこれ、Rubyでよろ

エレガントな解法、エレファントな解法～モンテカルロ法を添えて～
https://note.mu/issei_y/n/n882e9f77e8bd

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 14:24:53.79

>>534
じゃあこれ、PowerShellでよろ

エレガントな解法、エレファントな解法～モンテカルロ法を添えて～
https://note.mu/issei_y/n/n882e9f77e8bd

**デフォルトの名無しさん** · 2018/03/17(土) 16:15:19.01

>>546,547
ばーか

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 18:59:07.51

できないの？おーん？

**片山博文MZ** ◆T6xkBnTXz7B0 · 2018/03/17(土) 19:02:13.67

ピラフつまらない。コレクターじゃあるまいし。

**デフォルトの名無しさん** · 2018/03/17(土) 19:26:12.97

Rubyなら>>455にあるやろ
というかただ別言語に書き下すだけで解いたことになるんだろうか
工夫の余地もほとんどないし
https://pastebin.com/gbLdzrqq

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 20:18:45.56

>>550
ピラフにはイギリス人の血が混じっているので収集癖があります
いわば大英博物館もピラフに流れている血のおかげで建っていると言っても過言ではないわけです

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 20:21:33.98

>>551
それがビューティフルだと思って書いたわけ？
なにも考えず書き写すだけじゃ意味ないよね
もっと工夫できるよね、ちゃんとやって

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 20:22:40.74

君たちの潜在能力はそんなものじゃない
もっと工夫できるし、もっとビューティフルなコードに辿り着ける
もっとやれるよ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 20:30:34.59

言語の特徴もそう、Rubyらしいプログラム、PowerShellらしいプログラムがある
Rubyの特徴っていうのは便利な関数がたくさん用意されていて
簡単な文法がたくさん用意されていてラムダ式も簡単に書くことができて
ストリームの処理もお手の物でPowerShellはとにかく頑張ってる
そういう言語の特徴をとらえた上でその言語らしいコードを書くのが
スタイリッシュだと思うしビューティフルでブリティッシュだと思う

**ピラフ** ◆9Jro6YFwm650 · 2018/03/17(土) 23:58:43.82

それじゃあ勝負しましょうよ
Cドライブ以下（サブディレクトリ含む）のすべてのファイルの
ファイル名とファイルサイズをテキストファイルに出力するの
PowerShellとVBScriptでどっちが速いか勝負しましょうよ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 00:00:13.02

ピラフがプロジェクトマネージャやるから

>>550
VBScriptのコードよろしくお願いします

>>551
PowerShellのコードよろしくお願いします

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 00:04:05.17

　∧,,∧
（=・ω・）　にゃん♪
（,, ｕｕﾉ

**デフォルトの名無しさん** · 2018/03/18(日) 03:04:57.01

Ruby で書いた。
2ch 以下のフォルダを、再帰的に走査して、ファイル名・サイズ(KB)を表示する

# . で始まる、directory, file を除く
Dir.glob('C:/Users/Owner/Documents/2ch/**/*') do |file|
stat = File.stat file
size = stat.size / 1024
if size < 1
size = 1
elsif size >= 1000
# ここだけ、size は、3桁区切りの文字列になる！
size = size.to_s.gsub(/(\d)(?=(\d{3})+(?!\d))/, '\1,')
end
puts "#{file} : #{size} KB"
end

**デフォルトの名無しさん** · 2018/03/18(日) 08:31:16.41

>>552
ピラフはキリギリスの血が混じっていているのか
只者ではないと思っていたが昆虫から進化していたのか

**デフォルトの名無しさん** · 2018/03/18(日) 09:07:16.57

>>555
うんちブリブリブリティッシュ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 10:06:50.54

>>559
やるじゃん、こういうのサクッと書けるのがRubyの強みだよね

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 10:09:38.26

>>560
オメーのその早とちりなところピラフ嫌いじゃない

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 10:09:50.98

>>561
IQがひどいと思いました

**デフォルトの名無しさん** · 2018/03/18(日) 10:17:14.00

またこいつ全レス始めてるよｗｗ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 10:20:44.35

はいNG

**デフォルトの名無しさん** · 2018/03/18(日) 10:24:16.41

ピラフは糖質だから仕方ない

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 10:27:58.62

なんだじゃあしょうがないな

**デフォルトの名無しさん** · 2018/03/18(日) 10:45:03.99

許せるかどうかはまた別の話だろ

**片山博文MZ** ◆T6xkBnTXz7B0 · 2018/03/18(日) 11:43:10.23

>>557
https://friendpaste.com/6WXpiP9RzhHUWuT5vuMkoR

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 12:05:03.33

>>570
あざーす片山さんあざーす！

**デフォルトの名無しさん** · 2018/03/18(日) 13:05:21.68

>>557
こんなんでいいの?工夫もクソも無いけど
ls 'C:\Users\Owner\Documents\' -rec -file | select Name,Length | Export-Csv .\hoge.txt -e UTF8 -not

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 13:10:14.80

>>572
ありがとうございますー！

**デフォルトの名無しさん** · 2018/03/18(日) 14:11:51.76

>>563
ピラフは焼き鳥か
ということはレプティリアン
キモいわ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/18(日) 14:19:56.76

>>574
ちょっと待てピラフキモいのか？
ピラフキモくないと思ってたから
ピラフキモいみたいな言われ方すると
ピラフ傷つくんですけど、ところで焼き鳥って美味しいよね
ときどき無性に食べたくなる、ねぎまが最高だよ

**デフォルトの名無しさん** · 2018/03/18(日) 20:23:21.36

あっそ、よかったね

**デフォルトの名無しさん** · 2018/03/19(月) 06:59:21.48

Ruby で、順列を表示する、関数を作った

class MyPermutation
def initialize (number)
@number = number
@results = Array.new @number
@ary = (1..@number).to_a
end

def next_number (ary)
if ary.length == 1
@results[-1] = ary[0]
puts @results.join ', '
else
ary.length.times do |i|
clone = ary.clone # コピー
@results[@number - ary.length] = clone[i]
clone.delete_at i # 要素を削除
next_number clone # 再帰
end
end
end

def print
next_number @ary
end
end

obj = MyPermutation.new 3
obj.print

**ピラフ** ◆9Jro6YFwm650 · 2018/03/19(月) 07:05:46.36

>>577
これはすばらしい

**デフォルトの名無しさん** · 2018/03/19(月) 07:08:01.89

>>578
ばーか

**デフォルトの名無しさん** · 2018/03/19(月) 08:26:38.32

>>575
ピラフがキモいのじゃなくて
キモいのがピラフ

**デフォルトの名無しさん** · 2018/03/19(月) 12:21:18.48

キモイのがピラフで
もっとキモイのがピラフだ

**デフォルトの名無しさん** · 2018/03/20(火) 02:02:29.80

>>546-547
Ruby で作った。
chunk で、数字が切り替わるごとに、グルーピングする。
0 か1 が、10回以上続くものだけを集める

prng = Random.new
cnt = 0

100.times do |idx|
results = 100.times.map { |i| prng.rand 2 }
.chunk { |num| num }
.select { |num, ary| ary.length >= 10 }

cnt += 1 if results.length >= 1
end

puts cnt

**デフォルトの名無しさん** · 2018/03/20(火) 06:06:36.55

“なりすまし万引きＧメン”を再逮捕　女児の弱みにつけ込みわいせつ行為　奈良県警2018.3.19 19:13

　弱みにつけ込み、女児にわいせつな行為をしたとして、奈良県警郡山署は１９日、強制わいせつ容疑で、東京都日野市高幡、会社員、藤井裕久被告（４８）＝強要罪で起訴＝を再逮捕した。容疑を否認している。

　再逮捕容疑は昨年１２月１７日午後３時４５分ごろ、大阪市天王寺区の小学６年生の女児（１２）に対し、女児の自宅玄関前で首筋に両手を回して抱きつき、背中をなで回すなどのわいせつ行為をしたとしている。

　同署によると、藤井容疑者は同区の中古本販売店で、少女向けの本棚に陳列されている本と本の間に千円札１枚をはさみ、女児が持ち帰る様子を観察。店外に出たところで身分証明書を求め、さらに住所や電話番号を聞いた上で、女児の自宅まで押しかけて犯行に及んでいた。

　藤井容疑者は今年２月、同県大和郡山市の中学１年生の女子生徒（１３）に対しても、同様の手口で名前などを聞いたとして強要容疑で逮捕されていた。同署は余罪を調べている。

**ピラフ** ◆9Jro6YFwm650 · 2018/03/20(火) 21:53:18.73

>>582
やるじゃん！！！

**582** · 2018/03/20(火) 23:52:21.50

>>582
修正

results という結果配列も必要ない。
Enumerator#size で、Enumerator から直接、要素数を取れる

prng = Random.new
cnt = 0

100.times do |idx|
size = 100.times.map { |i| prng.rand 2 }
.chunk { |num| num }
.select { |num, ary| ary.length >= 10 }
.size

cnt += 1 if size >= 1
end

puts cnt

**デフォルトの名無しさん** · 2018/03/21(水) 09:17:50.16

何を得意になってるんだよ(笑)

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 09:43:08.08

>>586
じゃあオメーできんのかよ？おーん？

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 09:43:36.79

悔しかったらVBScriptで書いてみろよー

**デフォルトの名無しさん** · 2018/03/21(水) 09:56:18.99

>>587,588
ばーか

**デフォルトの名無しさん** · 2018/03/21(水) 10:01:30.90

うんこくさいとおもったらピラフだった

**デフォルトの名無しさん** · 2018/03/21(水) 10:07:14.84

>>588
VBSじゃ出来ないって言ってたのはお前だろ
ほんとバカだな

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 10:21:20.67

>>591
じゃあVBScriptでできるんですかー？証明できるんですかー？おーん？

**デフォルトの名無しさん** · 2018/03/21(水) 10:43:54.12

お友達582が出てきてくれてさぞ安心してんだろうな

おーん？(笑)

**デフォルトの名無しさん** · 2018/03/21(水) 10:52:31.11

コードを出してもらっても、その内容には一切の言及なし

おーん？(笑)

**582** · 2018/03/21(水) 11:05:38.73

ピラフ大王の実力は、すごいからな

漏れは、かなり分析したから、
骨身にしみて、よく知ってるw

**デフォルトの名無しさん** · 2018/03/21(水) 11:39:06.78

ピラフの舎弟かね？
じゃあマイ＆シュウだな

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:03:37.15

>>594
VBScriptでできないんですかー？おーんおーんおーん？

**582** · 2018/03/21(水) 12:04:48.71

ピラフ大王のソースコードは、芸術性が高い

もし、大王が「たのしいRuby 第5版、2016」を読んだら、
スクリプトにかけては、天下無双になる！

**デフォルトの名無しさん** · 2018/03/21(水) 12:12:04.08

>>597
これぞ統合失調症
出来ないって言ってたのはお前だよな、と何回ループさせれば気がすむのかな

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:15:37.32

>>598
えへへー、その壺も売ってください

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:16:40.99

>>599
じゃあお前はVBScriptでできると思ってるわけ？
思ってないわけ？そこんとこハッキリさせようよ
思ってないんだったらピラフに同意することになるし
思ってるんだったら証明して見せろよ

**デフォルトの名無しさん** · 2018/03/21(水) 12:23:06.03

どっちを選択しても俺様の勝利、としたいだけだろ(笑)
見え透いてるんだよ

**デフォルトの名無しさん** · 2018/03/21(水) 12:25:08.19

まさかと思うけどこいつホントにVBSじゃできないと思ってるのか？

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:28:13.97

>>603
じゃあやってみろよ！

**デフォルトの名無しさん** · 2018/03/21(水) 12:49:57.29

教えを乞う側の振る舞いじゃないよな
立場をわきまえろよ
お前の指図など受けるわけないだろう

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:51:06.05

できないのな？

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:52:58.61

結局できないんじゃん、偉そうなことばっか言ってるくせに結局できないんじゃん
身の程を弁えて発言して欲しいよ、最初からピラフが言ってたじゃんVBScriptでは
できないことはないだろうけれども難しい状況にありますと

**デフォルトの名無しさん** · 2018/03/21(水) 12:58:22.11

368 名前：ピラフ ◆9Jro6YFwm650 [] 投稿日：2018/02/05(月) 20:22:56.26 ID:jcw1NCuo [3/5]
絶対VBScriptじゃ解けないよ

絶対解けないと断言しちゃってるよね
ピラフほんとうんこ

**デフォルトの名無しさん** · 2018/03/21(水) 12:58:59.41

ピラフくさいとおもったらうんこだった

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 12:59:54.48

>>608
お前もできなかったじゃん
「出来ないって言ってたのはお前だ、俺はできるんだ」と
偉そうに言ってたお前でさえ結局できなかったじゃん
絶対VBScriptじゃ解けないと言ったピラフの目は正しかったことになりますよね

**デフォルトの名無しさん** · 2018/03/21(水) 13:10:12.32

こいつほんとうんこｗ
つい今

最初からピラフが言ってたじゃんVBScriptでは
できないことはないだろうけれども難しい状況にありますと

って自分で言ったこともうわすれてるｗｗ

**ピラフ** ◆9Jro6YFwm650 · 2018/03/21(水) 13:19:02.47

>>611
で、お前はできるの？できないの？
はっきりしろよ！（怒号）