X



VBScriptについて必死に話し合うスレ [無断転載禁止]©2ch.net
■ このスレッドは過去ログ倉庫に格納されています
0414デフォルトの名無しさん
垢版 |
2018/02/07(水) 21:39:04.33ID:4MElfpHe
他人にやらせようとしてるくせに何言ってんだこいつ
0415ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 21:42:36.36ID:isOebZIS
>>414
やってから言いなよ
この問題解いたら圧倒的な充実感に満たされて
文句言う気もなくすから
0416デフォルトの名無しさん
垢版 |
2018/02/07(水) 21:45:35.31ID:4MElfpHe
お前のコードを出せ理論は使いどころ間違ってない?
0417ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 21:48:25.89ID:isOebZIS
>>416
それとこれとは話がちがうだろ
ちーがーうーだーろー
0418ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 21:48:54.76ID:isOebZIS
問ー題ー解ーいーてー
0419デフォルトの名無しさん
垢版 |
2018/02/07(水) 21:59:45.69ID:4MElfpHe
仮に完璧なコード出したところで、糞どうでもいいようなレスしてはいおしまいなんだよね
レスは必ず付けるんだよ、なぜならこいつにとってはレスバトルでの敗北を意味するから
0420ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 22:04:47.95ID:isOebZIS
>>419
完璧なコード出してから言いなよ
言い訳ばかりで見苦しいよ、やらない理由を考えるより
できる方法を考えよう、前に進もう
0421デフォルトの名無しさん
垢版 |
2018/02/07(水) 22:26:17.85ID:4MElfpHe
手前で勝手にやってろってんだよ
お前のコード出せは「俺様に意見するな」に過ぎない
0422ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 22:30:07.49ID:isOebZIS
>>421
一緒にやろうよ、どうしてそんなに強情なのさ
0423デフォルトの名無しさん
垢版 |
2018/02/07(水) 22:36:06.12ID:4MElfpHe
延々と繰り返して持久戦に持ち込むつもりかな
これぞピッコロ
成長などするわけない
0424ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 22:51:08.66ID:isOebZIS
>>423
人のこと言える立場じゃないじゃん、完璧なコード出してないくせに
0425ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 22:52:49.62ID:isOebZIS
完璧なコード出してくれたらポポももっと成長しなきゃって思えるけど
出してないじゃん
0427ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 22:59:41.97ID:isOebZIS
>>426
解けることは炭鉱の人が示したよ、VBScriptで解けるよ
じゃあ炭鉱の人とは別の解を示してよ
単純だって言うくらいならできるでしょ
見栄張ってないことを証明して
0428デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:01:19.52ID:4MElfpHe
>>424
言ったそばからそれかよ
そろそろ取り巻きを装って発狂しねえかな
0429デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:06:59.24ID:4MElfpHe
意見をすればコード出せ
コードを出せばあっそ、よかったね

こいつの頭の中など見え透いてる
0431ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:10:40.12ID:isOebZIS
>>429
静かにして、いま集中してるから
0432ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:11:35.76ID:isOebZIS
>>430
それだけじゃないけどとりあえず別解示して
0433デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:14:11.64ID:4MElfpHe
>>431
取りあえず何かレスしないと気が済まない?
だったらお前がまず黙っててみろよ
0434ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:15:49.85ID:isOebZIS
>>433
いまポポが集中してるところでしょうが!!
0435デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:16:51.98ID:4MElfpHe
>>390に対して>>394だもんね
舐めくさってないかこのバカは
0436ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:20:42.00ID:isOebZIS
>>435
でもさあよくあるじゃん
是非うちで働きませんかと誘っておいて
出向いていったら弊社を志望した動機を教えてくださいって手合い
てめえが誘ってきたんだろうがという状況ですよ
なかなかおもしろいと思うんだよね
ユーモア理解してもらえると思ったんだけど
0437ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:21:26.34ID:isOebZIS
炭鉱夫のおっさんはわかってくれたと思うんだけど
0440ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:39:49.72ID:isOebZIS
>>439
ユーモアを理解せずコードも出せないお前の方がどうしようもないクズだよ
0441ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:41:14.85ID:isOebZIS
>>438
そういえばラピュタに出てくる親方も炭鉱夫じゃん
片山さんのことをラピュタのおっさんと呼ぶべきか
親方と呼ぶべきか迷うよね、まずそこから議論しよう
0442ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/07(水) 23:44:46.27ID:isOebZIS
>>426の人は単純な計算やんと関西弁まで使って大見栄きったんだから
別解示すことくらい朝飯前だと思うんで朝ごはんのおかずにしようと思うから
別解示してほしいの
0443デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:50:15.53ID:4MElfpHe
>>440
手前の不届きをユーモアだとかほんとクズだよね
これぞピッコロ、反省などできるわけありません
0444デフォルトの名無しさん
垢版 |
2018/02/07(水) 23:52:48.31ID:4MElfpHe
さらには意見されたことが許せないのでいつも通りのコード出せ
なりふり構っている余裕などありません
0445ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/08(木) 00:03:08.30ID:F3iRrrRx
コード書けない人頑張ってるな
0446ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/08(木) 00:04:13.81ID:F3iRrrRx
でもちょっと静かにして欲しい寝てる人もいるんで時間考えて
頑張りたい気持ちはわかるから
0447ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/08(木) 00:04:47.85ID:F3iRrrRx
彼をこのスレの頑張り屋さんと呼ぶことにしようか
0448デフォルトの名無しさん
垢版 |
2018/02/08(木) 00:10:43.45ID:VokglfxL
寝てる人間がスレ見てうるさいなんて思うわけないだろ
そんな舐め腐った態度でコードを提示してくれるお人好しなんてまずいないよ
0449デフォルトの名無しさん
垢版 |
2018/02/08(木) 00:18:38.91ID:VokglfxL
そろそろ護衛してくれる取り巻きさんたち出てきてもいい頃じゃないの?
0451デフォルトの名無しさん
垢版 |
2018/02/08(木) 08:33:58.67ID:SUrbUNKP
>>442
一番単純で素直な方法はなもう示されてるじゃないか。何故別解が欲しいのか?
お前は何の考えもなく、何か刺激を受けるコードに出会いたいだけだろ。

自分の考えを言葉にすることもできない無能が偉そうな事を言うな
0453デフォルトの名無しさん
垢版 |
2018/02/08(木) 08:49:51.44ID:XHvZ2cZH
暗黒面に堕ち、ダース・ピラフ卿となったピラフには死を
0456デフォルトの名無しさん
垢版 |
2018/02/08(木) 23:03:45.85ID:tnu1egt/
ははぁ。
「100bitのビット列を生成する。パターンは2^100通り」
「その中で、『1が10連続するパターンに一度でもマッチする』のは何通りか」
というお題だな。

そういう意味でコテのおっさん達は失格。

おっさん達の人格がアレとしてこのお題、ちょっと難しい。
強引にやれば解けるのは自明だけど。
元のブログの著者が「知り合いの数学者に『エレガントに』解いてもらった」てのが分からないなぁ。
紙上でサクッと出せるもんなんだろうか…。俺は思いつかない。
0457ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/08(木) 23:12:40.74ID:F3iRrrRx
エロティックに解いて欲しい
0460ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/09(金) 06:57:53.58ID:mo3G8y2t
>>458
こわっ
0461ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/14(水) 23:24:30.53ID:tnmvc1jI
ぶんぶんはろーぶいびーえす
0462デフォルトの名無しさん
垢版 |
2018/02/14(水) 23:42:53.08ID:DFNYs9as
ばーか
0463ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/14(水) 23:59:49.15ID:tnmvc1jI
>>462
これ、Rubyでよろ

エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd
0465デフォルトの名無しさん
垢版 |
2018/02/15(木) 00:10:32.37ID:HvtjjqnS
>>463
ばーか
0466ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 07:28:13.33ID:R43pB1Wi
>>464
あざーす片山さんあざーす
0467ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 07:29:06.24ID:R43pB1Wi
>>465
ギブか?おーん?
0468デフォルトの名無しさん
垢版 |
2018/02/15(木) 19:20:55.22ID:zgZp0zKl
Rubyはスレ違いだろ?
VBSにこだわらず好き放題やりたいならそういうすれ立てろよ
0469ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 20:54:55.14ID:R43pB1Wi
じゃあなんですか、スレ違いの発言しちゃいけないとでも言うんですか
0470ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 20:56:59.25ID:R43pB1Wi
Rubyというメガネを通してVBScriptを見ることで初めて見えるものってあると思う
そういうのを大切にしていきたい
0472ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 21:59:15.18ID:R43pB1Wi
サバサバしてる方が良いわけ?
それベッドの上でも言える?
そこんとこよく考えて発言していただきたい
0473デフォルトの名無しさん
垢版 |
2018/02/15(木) 22:03:58.95ID:HvtjjqnS
>ピラフは、VBからはじめたので、Cのポインタのプログラムは、
> 組めないですが、まぁ、CASLのLEAとLDで組むようなものでしょうか。
>たとえば、自分が、マンガを読むとき、マンガの棚には、目的のマンガの本が
> あります。
> 現実は、あまくないです。マンガは、ないので、本屋にいって金で買い増す。
>さらに、さがせば、ポインタのポインタのようなもの・。
> 自分が辞書でことばの意味を調べることに似ていますが、
>ピラフは、20代でマンガをかったのは、10冊もないでしょう。
>クソバカ片山を辞書でひいても、のっていません。
>そんなのは、あたりまえで、ピラフは、辞書は、ひいていません。
>
>それでわ。
0474デフォルトの名無しさん
垢版 |
2018/02/15(木) 22:11:00.15ID:cI/nZB+a
>>472
ここはベッドの上でもないしピラフが好き勝手に振る舞えるところでもないよ(他の人なら可)
0475ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 22:13:12.55ID:R43pB1Wi
>>473
なにこの怪文書
大丈夫なの? お薬飲んだ?
0476ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 22:13:29.64ID:R43pB1Wi
>>474
はいNG
0478デフォルトの名無しさん
垢版 |
2018/02/15(木) 22:31:40.17ID:HvtjjqnS
>天才白白のおめざめですぅー!!
> 今週は、なんとか代休とれそうですぅ!!
>それまで、こつこつゲーム制作ですぅ!!
> 今日は、ザコ編隊飛行のアニメパターンと
>美少女CGの完成がメインですぅ!!
>どんなのができるというわけなのかなぁー!!
>まようというわけなのかなぁー!!
> 人間ねぼけようかなぁー!!
>
>うわぁーーい!!
>
>           ______ _______
>           /          __ ____)
>     V     / でわですぅ!!   / ////  
> v( ^ー^)v <____________________)
>  | 白白 |
>  O   O
0479ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/15(木) 22:40:49.77ID:R43pB1Wi
>>478
カワイイ(//ω//)
0480デフォルトの名無しさん
垢版 |
2018/02/15(木) 22:57:12.97ID:HvtjjqnS
>Rubyistの人いるー?
>
>エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
>http://note.mu/issei_y/n/n882e9f77e8bd
>
>これどう?このお題Rubyならどう解く?
0481デフォルトの名無しさん
垢版 |
2018/02/16(金) 04:37:34.73ID:UeJm4Cbf
「交通事故」でも過労死 裁判所が画期的な和解勧告
http://news.yahoo.co.jp/byline/konnoharuki/20180209-00081434/
いよいよ「働き方改革」が法案審議に
http://business.nikkeibp.co.jp/atcl/report/16/021900010/012500060/
「ルール違反の残業には罰則を」安倍政権が成立を目指す「働き方改革関連法」を事前予習!
http://headlines.yahoo.co.jp/hl?a=20180125-00010003-abema-bus_all
長時間労働の是正へ「特別チーム」 厚労省、全国に設置
http://headlines.yahoo.co.jp/hl?a=20180125-00000010-asahi-soci
週休三日制のメリット、デメリットを考える
http://dime.jp/genre/476977/
「週休3日制」で社員から悲鳴? 一方で支持された「気分で出勤制度」とは
http://dot.asahi.com/aera/2016032300229.html?page=2
残業時間を自動記録!iOS向けアプリ「残業証拠レコーダー」リリース
GPSで自動記録、弁護士監修で証拠能力高く
http://news.livedoor.com/lite/article_detail/13125505/
0482デフォルトの名無しさん
垢版 |
2018/02/16(金) 14:19:30.97ID:zn59WJDb
再起動したときにメールを送信するものを作っています
http://www.atmarkit.co.jp/ait/articles/0405/22/news017.html
これを参考に以下にようにしてみたのですが
★転送においてサーバーに接続できませんでした。
と表示されます
★[安全性の低いアプリの許可:有効] をgmail上で設定しています
問題点がありましたらご指摘ください

Set oMsg = CreateObject("CDO.Message")
oMsg.From = "hoge@gmail.com"
oMsg.To = "hoge@gmail.com"
oMsg.Subject = "Test"
oMsg.TextBody = "テストメッセージです" & vbCrLf & Now
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing";) = 2
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver";) = _
"smtp.gmail.com"
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport";) = 465
oMsg.Configuration.Fields.Update
oMsg.Send
0483デフォルトの名無しさん
垢版 |
2018/02/16(金) 14:21:11.14ID:zn59WJDb
再起動したときにメールを送信するものを作っています
http://www.atmarkit.co.jp/ait/articles/0405/22/news017.html
これを参考に以下にようにしてみたのですが
★転送においてサーバーに接続できませんでした。
と表示されます
★[安全性の低いアプリの許可:有効] をgmail上で設定しています
問題点がありましたらご指摘ください

Set oMsg = CreateObject("CDO.Message")
oMsg.From = "hoge@gmail.com"
oMsg.To = "hoge@gmail.com"
oMsg.Subject = "Test"
oMsg.TextBody = "テストメッセージです" & vbCrLf & Now
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing";) = 2
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver";) = _
"smtp.gmail.com"
oMsg.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport";) = 465
oMsg.Configuration.Fields.Update
oMsg.Send
0484ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/16(金) 21:59:16.25ID:PUEkZrZs
>>483
認証の情報が必要なんじゃないかと

↓こちらでどう?

VBScriptのCDO.MessageでGmailアカウントを使用したメール送信
http://itmemo.net-luck.com/vbscript-mail/
0485デフォルトの名無しさん
垢版 |
2018/02/17(土) 08:56:07.63ID:WaYsCacy
>>484
ありがとうございます
この方法でメールを送ることはできました
あとは自分でPC起動時に自動で実行できるかテストしてみます
ありがとうございました
0487ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/21(水) 22:45:09.17ID:DKFUidIG
ご査収ください

Sub Bubblesort(ary, fst, lst)
  If fst < lst Then
    Call MoveLast(ary, fst, lst)
    Call Bubblesort(ary, fst, lst - 1)
  End If
End Sub

Sub MoveLast(ary, fst, lst)
  If fst < lst Then
    Call MoveLast(ary, fst, lst - 1)
    Call Exchange(ary(lst - 1), a(lst))
  End If
End Sub

Sub Exchange(a, b)
  If a > b Then
    Dim t
    t = a
    a = b
    b = t
  End If
End Sub
0488デフォルトの名無しさん
垢版 |
2018/02/22(木) 08:02:06.00ID:fzcPxoTK
vbs単体でストップウォッチみたいなの作るのって不可能?
msgboxじゃ処理止まるしなあ。
複数ファイルを非同期で走らせるとか、hta使うかしないと無理かな。
powershell では作れそうだが。
0489デフォルトの名無しさん
垢版 |
2018/02/22(木) 09:16:34.62ID:f/Ljiqe+
開始の時刻を記録して
入力があった時刻を記録して
差を計算すれば良いような
何をやりたいのかよくわからんが
0491デフォルトの名無しさん
垢版 |
2018/02/22(木) 18:07:56.06ID:fzcPxoTK
>>489
時間計測は出来るけど、それを例えば1秒毎に表示を更新してカウントダウンみたいなのをやる方法が分からなくて。

>>490
ポップアップってのがあるのか。けど閉じたり開いたりするのはちょっとうざったいなあ
0493デフォルトの名無しさん
垢版 |
2018/02/22(木) 19:00:38.20ID:2+xwAIXD
>>492
それじゃ単なる時計だよ
ストップウォッチだからスタートはいいとしてストップボタン(ボタンでなくてもいいけど)をどうするかが問題
標準だとHTAが無難だと思う
0494デフォルトの名無しさん
垢版 |
2018/02/22(木) 20:58:27.59ID:45CkAVud
>>492
なるほど、もう少し詳しく教えてください。
ストップウォッチと書いたけれど、それでやりたいことは実装できそう。

vbsダブルクリックからコンソールに出力はどうすれば?
0498デフォルトの名無しさん
垢版 |
2018/02/22(木) 21:19:32.19ID:XPN6kdE8
>>494
一行更新は出来ないね
後カウントダウンは出来るけど、キー入力できないので停止が出来ない
何がしたいかはっきりしないのでなんとも言えないけど、GUI欲しいなら素直にhtaで書いた方がいいと思う
0499片山博文MZ ◆T6xkBnTXz7B0
垢版 |
2018/02/22(木) 21:21:39.78ID:bw7NPixR
行更新できないのか。。。すまぬ。cscriptがちょっと悪さしてるのかな?
0500デフォルトの名無しさん
垢版 |
2018/02/22(木) 21:49:27.75ID:XPN6kdE8
>>499
何だろうね
echoってwritelineと同じかもと思ってstdout.writeでやってみたけど、横に繋がるだけで一行更新は出来ないみたい
0501デフォルトの名無しさん
垢版 |
2018/02/22(木) 21:54:14.07ID:45CkAVud
みなさんありがとうございます。

具体的に言うと、測定機器があってその出力結果の処理に既にvbsを使っています(ドラッグ&ドロップが凄く便利)。
でその前の測定のときに時間を計測する必要があるのですが、いつもスマホのタイマーやストップウォッチを使っているので、そのvbsに機能を付加できないかと思った次第です。

htaもいいのですがファイルが2つになるので、できれば一つで実現出来ないかなと。
0504デフォルトの名無しさん
垢版 |
2018/02/22(木) 22:12:30.09ID:XPN6kdE8
>>501
複数行出てもいいならこんな感じでいいんじゃないのかな

Const Cdt = 5
Dim Tm,T1
If MsgBox("カウントダウンを開始します。",vbOKCancel+vbInformation) <> vbOK Then WScript.Quit
Tm = Timer
Do
T1 = Cdt - (Timer - Tm)
WScript.Echo Round(T1,1)
If T1 <= 0 Then Exit Do
WScript.Sleep 50
Loop
0505デフォルトの名無しさん
垢版 |
2018/02/22(木) 22:20:03.32ID:K6gwUVsb
Ruby でも、ストップウォッチは困る

Rubyから、Selenium WebDriver で、わざわざ、ブラウザを起動して、
jQuery で操作してるのは、漏れぐらいかw

何をやっているのか、よく分からない
0506片山博文MZ ◆T6xkBnTXz7B0
垢版 |
2018/02/22(木) 22:26:02.75ID:bw7NPixR
vbCRで行更新は問題なかったが、WScript.Echoが最後に改行する問題があるようだ。

WScript.Echo "aa" & vbCR & "ab"
0507片山博文MZ ◆T6xkBnTXz7B0
垢版 |
2018/02/22(木) 22:31:01.12ID:fAW7dU6s
これでOK。

Dim fso, conout
Set fso = CreateObject("Scripting.FileSystemObject")
Set conout = fso.CreateTextFile("CONOUT$")
conout.Write vbCr & "TEST1"
conout.Write vbCr & "TEST2"
conout.Close
0508ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/22(木) 23:10:06.13ID:YcYRar81
>>499
FSOならイケたような

Const StdOut = 1

Dim FileSystem
Set FileSystem = CreateObject("Scripting.FileSystemObject")

Dim Stream
Set Stream = FileSystem.GetStandardStream(StdOut)

Call Stream.Write(vbCr & "hoge")
Call Stream.Write(vbCr & "fuga")
0509ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/22(木) 23:12:27.36ID:YcYRar81
Call WScript.StdOut.Write(vbCr & "hoge")
Call WScript.StdOut.Write(vbCr & "fuga")
これで普通にできたわワロス
0510ミスターポポ ◆9Jro6YFwm650
垢版 |
2018/02/22(木) 23:13:05.69ID:YcYRar81
>>505
じゃあこれ、Rubyでよろ

エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd
0511デフォルトの名無しさん
垢版 |
2018/02/22(木) 23:40:40.27ID:pWXFDnT3
>>510
ばーか
0513デフォルトの名無しさん
垢版 |
2018/02/23(金) 07:17:30.02ID:rFyc7Zoy
いやみなさん参考になりました。
cscriptからの実行で最低限の欲しい機能は実装できそうです。
それ以上望むときはhtaなど使ってみます。
どうもありがとうございました。
■ このスレッドは過去ログ倉庫に格納されています

ニューススポーツなんでも実況