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

　　 ○＜"￣＼
　ﾁﾝﾎﾟ　|＿＿__）　°　(⌒─‐⌒)　　　 新スレです
　　　 ヽ(,,.´・ω・)/ 　ヽ（(・ω・`,,)）/　　　　 楽しく使ってね
　　　　（::. 　　　 ） 　　 （ 　　　 .::）　　　　　　 仲良く使ってね
　　⌒"⌒""⌒⌒⌒"⌒⌒⌒"⌒"⌒

ピラフ（桃白白）って昔はCでなんかやってたけど何でまたVBSなんかやろうと思ったわけ？

>>2
C言語って難しくない？文字列型がないし。
C言語使ってる人って変態だと思う。ピラフ変態じゃないからVBScriptやろうって思いました。

>>3
c言語ってプログラム言語としては最も簡単な部類に入るんだがなw

今さらVBScriptやるよりはJavascriptやる方が潰しが効くぞ。
おすすめは、node-webkit

先に言っておくがJavascriptはプログラム言語の中ではかなり難解な部類に入るwwww

脂飯ピラフには無理だろwww

>>5
せやなｗｗｗハハハｗｗｗ

Cは確かに難しいけど、C++ならどうだろ？
Cに比べるとずいぶん楽になったけど。

>>7
c++のstringはテンプレートが絡んで来るので

c++やるのならc#のがマシだな。

ピラフ=桃白白って、論破された場合の反応が一緒なので
そこが一番、同一人物と解りやすい部分たよな

まぁコードや普段の口調でも解るけど、必死になってる時が、
やはり一番地が出てるようで解りやすい

ピラフは憎めないキャラだなw

桃白白からピラフに、名前を変えたの？

前スレの993を読むと、
ピラフはリファクタリングを知らないようだな。
Eclipseのリファクタリングでも見れば？

漏れは最近、7-11の焼めしおにぎりをよく食べる。
うまいよ

ピラフ(=桃白白)って、上から目線な雰囲気さえ醸し出していれば
完全に言い負かされてる状況を誤魔化しきれると思いこんでるところがカワイイ

前スレの989でピラフが引用した内容とか、人のせいにして文句ばかりで
目的に向けて着実に行動できてないピラフこそが参考にしなくちゃならない内容なのに
焦ってくると相手を攻撃することだけに気が向いて、その内容が自分の方にこそ当てはまっていて
書けば余計惨めになる墓穴行為だということにまで頭が回らずに、
地球の裏側まで行きそうな勢いで墓穴掘りまくるところとか、見ててホクホクしちゃうw

>>12
でも結局自分のコード出さなかったじゃん。それでもう負け確定だよね。
他人のコードにいちゃもんつけるだけで終わった人間とコード書いて
堂々と提示して見せたピラフとの間には天と地ほどの差がある。
ピラフがお月様だとするならお前はただのスッポンさん。誰かの何かに
噛みつくしか能のない害獣。ピラフは夜空を彩るロマンスメイカー。

>>11
eclipseって何だ、日本語で書け。
西洋人気取ってんじゃねえ原始人が。はい論破。

コード書けない雑魚に限ってピラフに文句言ってくるからなー。
可哀想。クレーマーにからまれてるピラフ可哀想ー。

言い負かすって発想がもう雑魚丸出しだよね。
エンジニアならプログラムで勝負しようよ。僕のコードはこういう点で優れています。
私のコードはこういうメリットがあります。ピラフのコードはすべてにおいて凌駕しています。
とかさ、ピラフはそういうやりとりがしたいんだよ。

質問者「こういうコード教えてください」
ピラフ「はいどうぞ」
雑魚「ピラフのコードはダメだ」
ピラフ「じゃあ自分がいいと思うコードを自分で書いて出しなよ」
雑魚「ピラフはダメだ」
ピラフ「は？」

雑魚は、ピラフを否定することでしか自分を主張できない悲しいモンスター。

ピラフが時間をかけてお金をかけて丹精込めて作り上げた
秀逸なプログラムコードを剽窃するやつまで現れたからな。
ここは理研じゃないんですよ!STAP細胞はありまぁす!!

桃白白は、未だにコードを書くだけがプログラムを作る行為だと思ってるんだなw
チームで大きなものを作るようになると、下っ端の書いたコードを読んで問題点を抜粋し
下っ端の成長を促すために、勝手に直さず解決策を教えて下っ端に書き直させるなんてのも
「プログラムを作る」うちの一環だ。

ましてや桃白白は、下っ端とは言えプロの世界の人間と比べれば、もっと下に居るんだからさ。

「桃白白のコードはダメだ」しか言わない奴に、指摘に具体性がないって文句を言うまでは解らなくもないが、
「桃白白のコードは、ここがこういう理由でダメなので、こう直した方が良い」とまで具体的に指摘されたのなら、
その指摘に対して「この指摘はこういう理由で適切ではないと思う」ってまともな反論が出来るならまだしも、
それが出来ないのに詭弁と印象操作でまくし立てても、それが負け犬の遠吠えでしかないと見抜けないほど、
ム板の住人は甘くないよ。

>>18
またかよ。コード書かずにピラフを否定することばかりに終始する。それを雑魚というのだよ雑魚と。
お前のことだ雑魚。死ねよブサイク。

ジャンプ買ってきてって言っただろ、これジャンプじゃないよ!
俺は母が買ってきたものがジャンプじゃないことを厳しく指摘した。
雑魚が言ってるのはこういうこと。

自分で行け。
ピラフはお母さんじゃない。
甘える相手間違ってんじゃないか？

プログラム書くより他人にいちゃもんつける方が楽なのはたしかだがな。
それに満足したら堕落するだけ。

ピラフは自分でジャンプ買いにいくしワンピースで涙する。
ナルトはゴミ。

雑魚はコード書けないから指摘に反論しろとか言い出した。
バカじゃないかと思った。

>>20
ピラフがジャンプだと思って読んでいるのはコロコロコミックだ。
皆が指摘してもジャンプだと言い張る。

ピラフが言ってるのはこういうこと。

あるディレクトリの中のjpgファイルを名前順に取得して
縦一列に画像が並ぶHTMLファイルを出力したいです。
よろしくお願いしまあす！！

普通にFSOでできるだろ
「縦一列に画像が並ぶHTML」の書き方がわからないの？
ってかお前名前変えてもベテランなんだから丸投げすんな

>>23
別に許可なんてお願いしなくても良いんだよ？
誰の許しを貰うこともなく、勝手に作っちゃって大丈夫だから

まさか多少なりともプログラム掛ける奴が
この程度の仕様説明では、他人にプログラムを書かせる上では
不足に過ぎるってことに気付かないわけもないし
そうなると「自分でこういうことがしたいです。許可をお願いします。」って
ことなんだろうが、自分で作るなら許可なんて求める必要は無い

因みに、そういうのはHTMLよりXHTMLの方が作りやすいかも

>>24
できるんですか！じゃあお願いしまあす!!!

書いてみたよ！
ttp://pastebin.com/3aCVpW2E
ファイル作るの面倒だったのでリダイレクトしたり改変したりしてね！

>>27
グッジョブｂありがとうございます!
のちほど確認します。とりいそぎお礼申し上げまあす！

仕様はたった2行なのにちゃんと満たせていなかったわすまんね
そのままでは縦一列にならないので適当にstrImgTempleteの最後にでも<br>入れてね

>>25
君は前の課題が残ってるだろ。まだ前の課題を提出してないよね。
前の課題はmdbにタイトルと内容を登録して検索するってやつだよ。

君はピラフが書いたコードを初心者にとってはうんぬんと
批判していたけれど、コードは書けたのかな？風呂敷を広げる前に、
その風呂敷を畳むことができるかを考えるようにしないといけないね。

君のミスは想定を間違ったことにある。
君は何もわからないような初心者を想定して最初からさまざまな事態に対処しようとした。
開発はそれによって難航した。最初に書くべきはシンプルでわかりやすいコードだよ。
これはUNIX哲学の受け売りなんだけどね。

>>30
具体性のない難癖ならまだしも、具体性のある指摘は
コードそのものと同列の価値があるって事にまだ気付けてないの？
指摘された内容を理解するという課題を与えられてるのは、むしろ君の方なのだがな

そもそもコードで書いても、君は自分の書いた物に対して何処がどう改善されていて、
自分のコードの何処にどういう問題があったのか理解できないでしょ？
コードで書いて理解できるなら、クラスをネット上のサンプルからコピペしてきても
無駄を残したままにせずにもっとシンプルで分かりく整えるだろうからね

そう、君のミスは想定を間違ったことにある
君は自分がシンプルにというより楽して実力以上のものを提供するために
内容も理解できてないサンプルをそのまま使った使って対処しようとした
開発はそれによって迷走した
念頭に置くべきは、自分の作業をシンプルにすることではなく、コードの内容と使い勝手をシンプルにすることだよ
これは哲学以前の常識的な配慮ね

まずは、無知は恥じゃないが、無知を認めないことは恥どころか人間性の稚拙さだと知り
虚勢を張らずに己の実力に見合った態度が取れるようになるところから始めてみようか
難癖には反発するのも良し、しかし具体性のある指摘には、論拠を以て反論できるなら反論するも良いが
反論できないなら反発せずに素直に受け入れて自分の糧とする
それが出来なきゃ、いつまで経っても小馬鹿にされるだけの立場から卒業できないよ？
自分の至らなさを指摘されるのは悔しいかも知れないが、その悔しさを相手に突っかかることで紛らわすのではなく
自分を成長させる原動力にして、君自身が前スレ989で言っていた「行動する人」になれるように頑張ろう

>>31
で、コードは？
君は、初心者に配慮したすばらしいコードを書くべきだと思ってるんだよね。
それを出してもらえるかな？他人に乗っかってずるやってないでさ。

ピラフはとっくにコード出したよ。それがピラフが言うところの行動。
自分でこうするべきだと考えてそれをコードという形にして提示した。

君はどうかな？君はピラフのコードに文句言っただけだよね。
自分で考えたわけでもない。他人のコードについて否定的な意見を述べただけ。
ピラフのこと小馬鹿にしてるんだ。じゃあ君は大馬鹿だよね。

>>28
炒飯は自分でも簡単に作れるようなものを何でお題として出すんだ?

ピラフはコードコジキだからコードコジキを否定する理由が解らないのはこれからも変わらない
ピラフに構うだけムダだって分からないのはさすがに野暮

>>33
炒飯とピラフは違うものだよ。そんなの常識だよ。

>>34
乞食じゃないよ！ピラフ乞食じゃないよ!!
でもさ、冷静になって考えてみると世の中の人っていうのは
何らかの乞食かもわからんよね。大工さんはお家を立てる乞食さんだし、
会計士さんは帳簿を付ける乞食さんだよね。そういう意味ではピラフも
乞食なのかもわからんね。そういう意味ではね。

>>34
コードではなく言葉でなら、論破されてもしょげて雲隠れしないから、弄り続けられて面白いんだろ
部下としてなら、このレベルの奴に手を掛けるだけ無駄だって分からないのは野暮だが
玩具としてなら、この面白さが分からない方が方が野暮ってもんだ

君なら、抽象的な文句や難癖を付けるだけではなく具体的な指摘の出来る奴が、
実コード書けないわけは無いってことくらい分かるだろうが、
それでも奴がぐうの音も出ないコードを出さないでおくのはその為だよ

>>35
では、卑ラ腐という名を授けよう

>>38
え、やだ卑弥呼みたい

>>37
ピラフは君のことをコードを書けない雑魚だと思ってます。
いまのところね。プライドだけは一流だから自分が上だと思っている。
だけど、コードで勝つ自信がない。だから言葉で蔑んで満足する。
プライドが高い臆病者。ピラフには小学生のころに君のような知り合いがいました。

>>39
コード乞食の分際で余の付けた名前が気に入らないと申すのか

>>41
ふん、余だと？　はっ・・・あなたはまさか!?新さん!!!

前スレで桃白白は他人のコードへの意見とか問題点をうまく使えられないことがわかったからな。
ちゃんと伝えられる人にやきもち焼いてるんだよ。

>>40
> だけど、コードで勝つ自信がない。だから言葉で蔑んで満足する。
だとしたら、"今の君みたいにw"抽象的な罵倒を続けるだけで、具体的な指摘はしないだろうな
具体的な指摘ってのは、コードと同じくその内容が間違っていれば反論する余地を与えるものだからね

但し具体的な指摘は自分が間違っていれば反論する余地を与えるリスクと引き換えに
正しければ、相手は素直に認めるか、"今の君みたいにw"負け惜しみを言うかしか出来ない状態に追い込める

対して、抽象的な罵倒なら、印象操作しかできないので相手を言い負かすことは出来ないが
抽象的な罵倒自体は論じゃないから論破できないし、本筋の方を論破されても、
それとは全く別ベクトルである抽象的な罵倒は、嫉妬、コンプレックス、やきもちを原動力にいくらでも続けられる

問題の本質は、「最後に価値のある情報で相手を覆したのはどちらか」ってところにあり
コードは君も拘ってる通り「価値のある情報」の一つだが、価値のある情報はコードだけではなく
"今の君みたいなw"抽象的な罵倒に価値はないが、コードにしなくても具体性のある指摘は価値のある情報の一つ

しかし君は、その線引きを「価値があるか否か」ではなく「コードか否か」という詭弁にすり替えることで
言い逃れを構成し、負け惜しみを展開している状態で、そのすり替えが出来るだけの隙はワザと与えているもの

例えば一番最初に指摘した「DAO.DBEngineのインスタンス作成」については
　Class DataAccess内でPrivate DBEngineを宣言して、Class_Initializeで
　Set DBEngine = CreateObject("DAO.DBEngine.36")を行い、2箇所有るGetDBEngine()の関数を
　DBEngineの変数に置換し、Function GetDBEngine()プロシージャ全体を削除する
とまで書けば（本来はここまで書かなくても前の指摘の時点でw）、詭弁以外では「コードを書けないと思ってる」なんて言えなくなるが
上記も実コードではないので、詭弁でなら「おまえはコードは書けない」と言い張り続けるだけの余地はまだ残している

>>44
抽象的とか具体的とかそんなのどうでもいいの。
いいかい大事なことを言うよ、君コード書いてないよね？

言い訳考える暇あったらコード書けたんじゃない？

コードを書くっていうのは他人のコードにいちゃもんつけることじゃないの。
自分の考えをまとめて形にすることなの。

ピラフはコード書けとしか言えない馬鹿なんだな
馬鹿というか、下手だな。コードこじきならもっとうまくやりなよ

小学校の学級会かよここw

正直、反論するならそのコード書け　は正論だと思う
言うだけの人は仕様書だけ書く上流工程気取りだよな
ここには読みにくい仕様書を一生懸命読んでくれる下請けはいないよ自分で書くしかない

随分ハードルの高いスレだな
俺としては低レベルでもいいから、もっと誰もが気軽に好きなコードを貼り付けられるスレであってほしいんだが
↓こんな風に
ttp://peace.2ch.net/test/read.cgi/tech/1170492587/606
ttp://hello.2ch.net/test/read.cgi/i4004/1074389689/552

ここはピラフがその他大勢と繰り広げる丁々発止のやり取りを
生暖かく見守るスレだよ
コードなんて書かずにニヤニヤ見てようよ

>>47
先生、おしっこー

>>49
気軽に書いてええんやで

>>48
反論じゃなくコードの不備を指摘してるんだから文章でOK
コードの不備を指摘できるって事はその人はちゃんとコードが書ける人って事

仕様書とは違うからね

コードを読んで、コードの直し方をアドバイスするってことは
コードが書ける人というのはもちろんだが、それ以前にそれ自体が
コードを書いてるも同然の作業

>>53
>>54
違います。てにおはを指摘できる人間がみんな小説書けるわけじゃない。
想像力が欠如していてクリエイチブなことができないから瑣末なところに目くじら立てる
人間ができあがるんですぞ。ピラフがムックならそう言っているね。

言葉でコード書けるって言うんじゃなくて実際に書けばわかるじゃんｗ
コード書ける連呼してもコード書けないよ。バカじゃないの。

瑣末なところに目くじら立ててみるか

>>55
× てにおは
○ てにをは

だからその指摘を頑張って読んで直してくれる下請けはここにはいないって

>>55-58
多分コードは書けるんだと思うよ
ただ、彼らの書いたコードだって
誰にも文句のつけようが無い完璧なものになるとは限らない。

奴らは自分がケチつけられる立場にはなりたくないから
意地でもコードは書かないだろうね。
ただの卑怯な雑魚だよ

>>59
そうだよね。
臆病な自尊心と、尊大な羞恥心の為せる業だよ。

他人のコードをバカにすることで自分のハードルをあげて
そのハードルを越えられなくなってるんだから、なんかもう切なくなるよ。
何やってんだって思うよね。

もっと女子を見習ってほしい。女子は他人にかわいいと言うことで
たとえ自分がかわいくなくても問題ないという状況を作りだして
自己主張をなめらかに行っていくんだよ。他人をあげることって
じつは自分の主張を通すことにつながるんだよね。

だから、お前らはもっとピラフを褒めるべきだ。
それによって得するのはお前らだから。お前らのために言っているんだ。

ピラフはもっと褒められてしかるべきだと思うし、
ピラフの乙女パワーでこのスレをよくしたいと思っています。

ゴタクのうまいコードこじき
こじきに構う好き者

お互いが何をどれだけ熱弁しようとも相容れない不毛なやりとりが多くを占めるのがVBA、VBSすれ。

> 誰にも文句のつけようが無い完璧なもの
本筋では敵わないからって、なんとかハードルを上げて
印象操作だけでも相手を貶めようとしてるのは桃白白じゃんw

「完璧じゃない」「完璧じゃない」って文句言ってる奴がいるならまだしも
具体的に改善策を提示しているのだから、その自分が指摘した部分さえ直したものが書けるなら
言ってるだけのことはやれる奴ってことになる

奴等はコード書けないんだって言い張り続けるのが苦しくなってきたから、そこは認めて
別方向で攻めようとしたようだけど、自演までして用意したその新たな方向の詭弁が
こうもあっさり破綻に追い込まれるようでは、コード書けるってことを認めない方が良かったかもな

コードは書けると認めてしまい、その代償として得るはずだった新たな方向の詭弁は失策に終り
現在、何一つ言い返せてない状態に陥ってるわけだから


因みに、時々名無しで書いてるのはバレてるから
このスレでは>>13-14とかを名無しで書いており、>>13-14自体は自演をしたかったわけでは
無いようだが、コテを記憶させておかずに自演に備えてることはバレちゃってる

>>63
君、コード書いてないよね？
他人の宿題について文句言っても先生は
君が宿題出したとは認めないよ。
他人を批判したら自分が認められると思っているのかな？
世の中そんなに甘くないよ。

君、コード書いてないよね？
これよくない？
京大に匹敵する必殺の言葉だわｗ

コードを書くっていうのは京大を卒業するくらい難しいことなのかもわからんね。

>>63

えーと、で、そのコードはいつ書くの？
結局書けないのね？

確たる根拠もなしに自演扱いで済ませようとしてるみたいだけど
それこそ詭弁じゃないかな？

>>55見て前スレでも瑣末なところに目くじら立ててる人間いたな〜と思ってスレ読み返してたんだけど

> 273 自分：山片mz[sage] 投稿日：2014/05/18(日) 17:20:50.14 ID:Wf7TEvca [2/9]
> じゃ完全版な
>
> Dim str
> Do Until WScript.StdIn.AtEndOfStream = True
> 　str = WScript.StdIn.ReadLine
> 　WScript.StdOut.WriteLine StrReverse(str)
> Loop
>
> インデントを全角スペースにしてみました

↑に対する

> 340 名前：桃白白 ◆9Jro6YFwm650 [] 投稿日：2014/05/26(月) 00:18:00.43 ID:mmlPEY/l [2/14]
> >>335
> 変数宣言がいらないし、Booolean型を条件文で値と比較する必要がない。
> にわか以前のいちかわが書いたとしか思えない途方もない初心者丸出しコード。
> 桃白白を誰だと思ってるんだと言わざるお得ません。はいごきげんよう。

↑これだったｗ

VBSでペイントみたいな簡易お絵かきツールって作れますか？
とりあえず背景と線の2色でよくてマウスでフリーハンド線が書けて何かしらの形式でファイルに保存ができればよいです
VBSでなくても、Windows7,8で標準で動作してコンパイル不要（スクリプト言語で？）なものならよいです

HTML5、IE8 9 10、java script、hta、
あたりで検索して出来るか判断できるんじゃないかな
標準というか標準的なになるかもだけど

VBSでやりたいならrunでpaintを走らせるのが早いし楽
ペイントみたいなではなくペイントになるけど

>>69
html5とjavascriptで作れるけどIEは未だ対応してないので標準で動作はしないな。
ChromeとかFirefoxなら出来る。

>>67
えっと、、、、、バレてるから (￣ー￣)ﾆﾔﾘｯ

複数人に反論されたことないからパニクってるだけだろw

>>73
で、コードは？

VBS非力すぎてやばいのは
ちょっと触ればわかるだろ？
素直に.net環境で開発したほうが楽だぞ

その点、桃白白は複数人に論破されて、フルボッコにされるのは日常チャ飯事だよなw

今流行ってる言語なら
やりたいコードはぐぐれば大体でてくるし
教えたいおじさんだらけで乞食もやりほうだいなのになぁ

>>77
せやなｗｗｗｗピラフもう慣れっこやでｗｗｗｗｗんなわけあるかバカが!

WindowsのタスクスケジューラーでPowerShellのスクリプトを実行する際には「パス」に注意
ttp://www.atmarkit.co.jp/ait/articles/1412/03/news125.html

>>78
非常に残念な事に教えたいおじさんはコードが書けないのです

本人はおじさんではなく女だって言ってるけどね

ピラフが言う「コード」って単なるVBSの文字列の事なんだよな
片や他方（一部除く）が言う「コード」って言語問わずプログラムのロジックを指してるんだよね

話が合わないのも当然

>>82
>>83

VBScriptってロジックを示すのに最適なんだよね
だからピラフはVBScriptが好きなんだなって思いました

ロジックを示すことができるのはソースコードのみだ
これはかの有名なあの人がいった言葉です

ピラフいま困ってることがあるので教えてください
やさしくお願いします

配列αは、
0番目に記号があります
1番目に数値があります

配列βは、
Aを記号順に保持します

β(α("A",10), α("A", 20), α("B", 10))

こういうイメージです

そこで質問です

βの要素について記号ごとに件数を出力し、
数値の合計を出力したいです

A
データ数:2件
合計:30

B
データ数:1件
合計:10

こういうイメージです

質問では簡略化のために配列を使っていますが、実際には
DBからデータを引っ張ってきます

実際のデータ量は数千万です
フリーザの戦闘力を余裕で凌ぐレベルです

メモリにすべて読み取ることができないので
逐次的に処理できればと思っています

どうやればいいのでしょうか？
VBScriptのソースコードでロジックを教えてくださいお願いします

>>85
select α記号, count(*) as データ数, sum(α数値) as 合計 from βテーブル group by α記号

>>86
SQLは触れないのですよ。
プロジェクトの方針で集計関数を使わずに
プログラムで処理しましょう。というお達しを
上流工程の方からいただいています。

他方のほうがさしてるのはロジックではなくてロジックへの指摘でしょう
ロジックまで書いてない

>>85
つ Scripting.Dictionary

>>87
なにゆえ、VBScriptの様な高貴な言語に集計などという賎民のやるような
泥臭い仕事をさせるのだ？

>>87
そのような腐った思想を持つ上流にまともなプロジェクトは出来ぬ。
ピラフよお前が頭となって謀反を起こすのじゃ〜

>>89
数千万のデータをメモリ上に貯めれないし
Scripting.Dictionaryは格納数が10万以上になると計算量がn^2になるから無理

>>91
そうか、よし、ピラフの乱起こしてやるのじゃー！あほか!なにけしかけてくれてんねん。
ピラフくびになるわ!そんなことしたら。ピラフは今後とも文鎮のようにお仕事頑張りたい。

記号の種類が10万種類もありそうなの？
記号の種類はどのくらいなの

>>93
お前の脳内カンパニーだからクビになったら、脳内妄想で作ればええじゃないの

それとも実在する会社がVBScriptでSQLにも頼らずに数千万件のデータを処理しろと言ってるんか？
ピラフが勤めるにふさわしいクレイジーな会社だなwww

>>94
記号の種類が数千万です。
VBScriptソースコードのほどよろしくお願いします。

>>95
貴様、我輩に向かってお前とは何事じゃ!
世の中はクレイジーにあふれています。

>>96
データが数千万、記号の種類が数千万
集計にならんやんけ〜w

前スレで無職って言ってたけど仕事見つかったのか、よかったね

>>98
記号の種類が数千万なので、レコード数はそれ以上っすよ。
集計にはなるっしょ。おっさんなにいうてんねん。

>>99
じつはお仕事してるっていうのは嘘なの。みんなには内緒だよ(ささやき声)

>>100
その数千万の集計の目的はなんじゃ。
口を割らねば割るまで拷問をするぞwww

>>102
記号ごとの値をもとめるのが目的ですぞ。
その後にも処理があるけど、それは質問と関係がないから割愛。
集計の目的も質問と関係ないんだけどね、認識を共有することも
大事だなと思っていいました。

>>103
お前の星では数千万の記号が存在するのか？

>>104
便宜上記号と表現しただけなのでそこにこだわりをもたれてもピラフ困っちゃう

便宜上数千万と表現しただけの可能性。

>>106
数千万にはこだわりもってもらわないとピラフ困ゆー

数千万でも億千万でも百億マンでもいんだけど、ピラフが教えていただきたいのは
メモリに収まらないほどのデータをどのように処理するのかってことなのさ。
sqlとかdictionaryとかドシート丸出しのアドバイスはいらない。
ピラフはプロフェッショナルな質問をしています。

数千万のデータの集計をDBを使わずに効率よくやろうってことは
DBの再実装みたいなことになるのではないか

そうするとDBを使うのと変わらなくなるんだが
DBを使ってはいけない理由はなんだい？
今のままだとおそらく劣化DBみたいな実装しか出てこないよ

>>109
DBの何を実装するんでっか？あんさん何言うてはんの？
SQLを変えられない理由ならすでに言っただろ。
動き出した運命の歯車はもはや誰にも止められない。
ピラフを助けられるのは君しかいない。

>>107
その規模なら素直にデータベースを使えよ(w
Oracleには手が出せなくてもAccessなら何とか妥協できるだろうに

>>111
ピラフの一存でDBを導入できるほどの権力と裁量権をピラフが
有しているならば、ピラフはSQLで集計関数を使ってるよ。
件数と合計をもとめるだけでAccess使わないとできませんなんてそんなの
ありえないだろ。ピラフがプロジェクトマネージャだったらそんなやつ即刻打ち首獄門にするわ。

>>112
Windowsと同じMicrosoft製品なんだし、上司の説得くらい頑張ってやってみろよ(w
ウチの会社では一部署20〜30人位の勤務時間管理にAccessを使わせてくれたぞ
一つのファイルを同時に何人もLAN経由で使う上でExcelより好都合だからな

>>113
ピラフの上司は10人、フロアには1000人います。
これが君とピラフの違いかな(勝ち組)

合計と件数を求めるためにデータベースから取得したデータを
Accessに投入したい。使わせてくれないんだったら、Accessがなければ集計も
できない無能な ID:cHA5imNW が腹を切る。これでいけると思うか？無理だろ。

マジで無理なの？足し算するだけじゃん。できるでしょ？
ちゃんと考えてよ。このままじゃピラフの首が危ないんですけど!?

DBに保持してあるデータをすでに特定のSQLでデータを取り出してある状態という想定なのね
SQLで取ってきたデータは数千万件分もどうやって保存されてんの？ファイル？

それともSQLがVBS上に書かれているのにそれを変えることすらできないってこと？

>>116
データを一件ずつ取得してそれを処理して
最終的にはDBに書き出すんだけど、書き出すとこの処理は
今回の質問とは関係ないっすね。

>>117
SQLを変える気はねえっす。

お前らちゃんと質問読んでるか？

β(α("A",10), α("A", 20), α("B", 10))

これを処理して

A
データ数:2件
合計:30

B
データ数:1件
合計:10

こう出力するにはどうすればいいのかVBScriptのコードで教えてくれって
のが質問だぞ

DBがどうとか難しいところはピラフが裏でこっそりやるから
集計するところだけお前らやれ。やれるだろ。

ナイーブに実装（sqlとかdictionaryとかドシート丸出しの）して長時間かかるのを許容するか
開発費をかけて少しでも時間を短くするか
DBを導入して導入費用で済ませるか

てかDB自体はあるんだったらなおさらいったん新しいDB作って入れなおしてSQLで取ってこればいい
これVBSで書けばいいの？

>>120
その話は >>114 で否定したつもりだったんだけどなあ。
お前なんか頭悪そうだな。

いいや、もういいです。ピラフ自分でやります。

記号でソートされて取得されるんだから切れ目見つけるだけだろうが。
お前らただのコーダーか？

ソートされて取得されるワロタ

>>124

質問の前提に書いただろ。

> >>84
> 配列βは、
> Aを記号順に保持します

お前は何もわかってなかったのか？

いつも思うんだがピラフの馬鹿扱いの巧さは辟易に値するな

あとあれだな、最終的にはピラフ株式会社独自のDSLで実装するからな。
ピラフが聞いたのはロジックだった。本番で動かすコード書かせるわけないだろ。
人と会話するときは想像力を働かせなさい。ピラフ株式会社と言ったけど
本当は全然違う会社名だからね。本当の名前を出したら問題になるから隠しただけで。
ピラフはマジで君たちが知恵遅れなんじゃないかと心配になってきた。

>>125
まじだAとαは置いておいても分かってなかったわ
入力はちゃんと読まなきゃだめね

>>123
記号順でソートされたデータが取り出せるんだったら簡単じゃんけw

>>129
ありがとうございます！
ではVBScriptでコード書いてください。できたら教えてください。
よろしくお願いします。

>>130
Read βテーブル

while βテーブル <> EOF

　　データ数 = 0
　　合計 = 0

　　oldα記号 = α記号

　　while oldα記号 = α記号 and βテーブル <> EOF
　　　　データ数 = データ数 + 1
　　　　合計 = 合計 + α数値

　　　　Read βテーブル
　　end while

　　Write oldα記号, データ数, 合計
end while

kill ピラフ

>>131
ありがとうございます！
ピラフ教えてもらったコードをもとに頑張ってみます！
ありがとうございます！

>>132
ピラフはブレーク処理知らんのんけ?

最後の一行が一番重要なのだw

百万が1M、1億が100M。
仮にデータが、1個100byteなら10GBだから、
1度にすべてのデータをメモリに読み込むと、スワップ領域が必須

だから、データを100分割でもして読み込めばよい

それか、データを一件ずつ取得して足すだけなら、
数千万種類の記号がソート済みなら、
同じ記号が続く間は足していき、次の記号に切り替わったら、
ファイルかDBに書き込む

データも100件ずつとか、
固定サイズの小さいバッファに読み込んで、
足したら読み込んだデータを捨てて、
次のデータをバッファに読み込む

要するにすべてのデータをまとめて、メモリに読み込まず、
バッファに読み込むだけの話

>>134
どやって100分割して読み込むの？

キーがAで始まるもの、Bで始まるものなど、
バッファに入るサイズで、適当に100分割すれば？

結局、IOでサイズ指定して、バッファを使うだけでしょ？
1行ずつ・1byteずつ、
勝手にライブラリがバッファ処理するだけでしょ？

プログラマーはバッファについて、何も考える必要はない。
BufferedIOなどのライブラリはないの？

>>136
適当にっていわれてもSQL変えることできないって設定わすれたの？
ピラフまだ覚えてるんですけど。
BufferedIOってなに？VBScriptにそんなのないよね。

バッファリングの意味が無いような気がするな
何のためにバッファリングが必要なのかという
ところの理由付けが弱い

簡略化のために配列で説明してしまったのが敗因だな。
逆に伝わり辛くなっただけだわ。
「DBからは、記号と数値の列を記号の正順でソートした結果が取得できる。」
とか>>85に書いておくだけで良かったのに。
誤解を招かせるのが目的なら、別に良いんだけどね。

>>139
じゃあ誤解が解けたところでお聞きするけど、
どうやったらいいですか？VBScriptのソースコードで教えてください。

>>131で良いんじゃないの？きちんと見ていないけど。

>>141
バカかお前は、他人の成果丸パクリしてんじゃねえ。
同じもの出されてもピラフは得るものがなにもありません。
別のものを考えてくださいよ。真のプログラマならできるでしょう。

>>141
最後のピラフ抹消だけで良いかもw

>>143
ぇ？それひどくない？

インアウトに応じて組むのが普通だよなあ、、

>>144
オブジェクト指向的に書くと、こうだな
objピラフ.die(1000)

ピラフ 1,000回シネ。

ところで何でVBScriptで数千万のデータを処理せんとあかんのんじゃ？
効率悪すぎだろ

>>146
>>127で言っただろ。
いまどきハンガリアンはねーべよ。

>>147
そやね、ピラフのインスタンスが複数で来ても迷惑だから
こやね

ピラフ die: 10000

少し増やした。しかもSmalltalk風

>>148
ピラフもう帰る。

>>149
お前は自分の星へ帰れよw

>>134
> 1度にすべてのデータをメモリに読み込むと、スワップ領域が必須

働いてメモリー 16GB 位の PC 買えよ
ここのレベルならその方が早い

煽りは既に締め切られております。

>>151は煽りじゃないだろ
スキルがないやつはそもそも問題解決の方法を間違ってる
このケースの場合メモリ積むのが唯一解だ

>>153
ピラフ、このアフォの相手してやれ
暇やろw

ピラフの質問は不完全なエスパー問題で
むやみに食いついたやつを叩く戦法なんだよ
質問の不備を叩いていこうじゃないか
普通は小出しにしてきた時点で話にならないだろ

>>155
会話の中で話が進展していくのは会話としてごく普通のことですよ。
それを否定するっていうのは会話に慣れてないってこと。
会話に慣れてないってことは友だちが少ないってこと。
友だちが少ないってことは周囲の人間との距離の取り方がわからないってこと。
周囲の人間との距離の取り方がわからないってことは家族とうまく関係を築けなかったってこと。
つまり、君はホモですね。これが論理学。

ピラフはプログラムでも理論でも、正解を導き出すことには無能だが
間違ってることを、さも正しいことかのようにイメージ操作する術だけは非常に優秀

ただ、そんな術は社会に出てもなんの役にも立たないどころか、
匿名じゃない場でやらかしたら、自分の評価を下げるだけだが

>>157
匿名じゃない場でピラフピラフ言ってたら
トルコ人だと思われるよ。君の評価上がっちゃうね。
もしその時が来たらピラフに感謝すること忘れるなよ。
ところで、ピラフとチャーハンは違う物なんだって。
ピラフ、チャーハンしか食べたことないから一緒にピラフ食べに行く？

>>154
ピラフ一緒に行く？

>>155
一緒にピラフる？

ピラフ可愛いな…

炒飯の方が好き

そもそも、VBSは32,64ビットのどちら？

もしOSが32ビットなら、仮想アドレス空間は4GBで、
仮にOS(カーネル)が1GBを使っているなら、
プログラムで使えるのは、残りの3GB

3GB以上のデータが、DBから渡って来ると、エラーになるのか？
それとも自動的にバッファのサイズに、
データを分割してくれるのか？

例えば、バッファのサイズが1GBなら、
DBが1GBを送った所で、処理待ちになり、
それらをプログラムで処理すると、
バッファにある処理済みのデータを削除して、
また次のデータを送ってくれるとか？

そんなんサーバカーソルかクライアントカーソルかで違うし
ギガバイトをメモリーにぶちこむ何てクレイジー

ピラフ、アフォの相手してやれ

>>164
お前が相手すればいいじゃん
お前にはちょうどいいレベルの話題だぞ

>>165
おまえピラフなのか

>>166
お前はウーロンかw

>>167
あんなじさまじゃない

みんなstackoverflow日本語版に行ったな
のろまの桃白白も急げ

>>169
結局は、日本語版の余りのレベルの低さに英語サイトへ行くと。

STAPoverflowと揶揄されるようになるのも時間の問題だなwww

>>169
　　 ＿＿　　 ＿
　 ／♯＃＼　/･_)　よーし
（ｿ♯＃♯＃Ｙ ／
　(_)――-(_)′

いくら同一人物と見抜かれてるとは言え、
別名を名乗るなら、ピラフが桃白白宛てのレスに反応しちゃダメだよw

>>172
隠してるわけじゃないからなあ
隠してることにして欲しい？じゃあピラフは桃白白じゃありません
ホントは桃白白だけどね

Windows7

MySendKyes.vbs
------------
MsgBox "a"
Wsh.CreateObject("WScript.Shell").SendKeys "{TAB}"
If Err.Number <> 0 Then
MsgBox Err
WScript.Exit
EndIf
MsgBox "z"
-------------

単体の実行は問題なくタブが打たれるのですが、
ホットキー(Shift+Ctrl+T、Ctrl+Alt+T、Shift+Alt+T)で実行すると動いてくれません。
ホットキーで実行する方法があったら教えてください。

>>174
ほっときのコードは?

>>173
最初は隠してたけど、隠しきれずに早いうちに完全にバレて自分でも認めてたもんな

>>176
ピラフが隠してたことにしないとよほど都合が悪いようだな。
そりゃそうだよね、見抜いたなんて言っちゃってたもんね。
じゃあいいよ、ピラフは隠してました。
ほんとは隠してないけどね。

VBScriptとJScriptでパフォーマンステストしてみた。

コードは、以下の通り
---- VBScript ----
WScript.Echo "start"
stime = Timer()
For i = 1 To 100000000
Next
WScript.Echo Timer() - stime

---- JScript ----
WScript.Echo("start");
stime = new Date().getTime()/1000;
for (i = 0 ; i < 100000000; i++){
}
WScript.Echo(new Date().getTime()/1000 - stime);


### WScript/CScript
VBScript　14秒
JScript　25秒　　　←遅すぎ

### HTA(mshta)
VBScript　14秒
JScript　0.9秒　　　←速すぎw

### Google Chrome
JavaScript　0.3秒

ブラウザ上のJavaScriptの最適化が進んでいて思いのほか速いど
WScript/CScriptに比べて若干制限はあるがHTA/JScriptでやるのが良いんじゃないの画面も付けれるし

---- VBScript.hta ----
<html>
<head>
<script language="VBScript">
Window.alert("start")
stime = Timer()
For i = 1 To 100000000
Next
Window.alert(Timer() - stime)
</script>
</head>
<body>
</body>
</html>

---- JScript.hta ----
<html>
<head>
<script language="JScript">
alert("start")
stime = new Date().getTime()/1000;
for (i = 0 ; i < 100000000; i++){
}
alert(new Date().getTime()/1000 - stime);
</script>
</head>
<body>
</body>
</html>

ピラフよ、もうVBScriptの時代は終わったのだwww

>>180
Option Explicitのない言語なんてクソ食らえじゃー

>>178
WSHだとJScriptは逆に遅いのか

ttp://peace.2ch.net/test/read.cgi/tech/1378978504/53

桃と同一人物じゃなかったのかよ
主張は統一させとけよ

http://peace.2ch.net/test/read.cgi/tech/1391694526/807

807 名前：桃白白 ◆9Jro6YFwm650 [] 投稿日：2014/10/05(日) 19:33:29.43 ID:d2HSvfAw
>>805
効いてる効いてるｗ
Option Explicitは記憶力がなくタイプミスを犯す鈍臭い木偶の坊が使うものだ。
桃白白はプログラムの隅々まで完全に記憶してるし一流ピアニストも顔負けの
超精密なタイピングができるからね。Option Explicitなんて書いたことにあ。

どうよ？
https://friendpaste.com/iT455gp8Hy3t1IvEn3nIu

>>183
いつの話してんねん。先に進もうよ。ピラフは先に行って待ってる。

>>181
Option Explicit付けてもOn Error Rsume Nextすると変数定義が無くてもスルーされる糞言語だぞwww

>>175
＞ほっときのコードは?
少し考えましたが何を指すのかわかりませんでした。

ホットキーに割り当てたキーは
(Shift+Ctrl+T、Ctrl+Alt+T、Shift+Alt+T)
の三種を試しました

>>182
WSHが出た頃はVBの天下だったからな。当時はJScriptなんてオマケでしかなかった。
それが今じゃ、ブラウザ側ではJavaScriptの天下だからなぁ。

>>186
ほっとき、ホットキー

>(Shift+Ctrl+T、Ctrl+Alt+T、Shift+Alt+T)

+^{TAB}、^%{TAB}、+%{TAB}
こうじゃないんか?

と言うか、マニュアルくらい見よう
http://msdn.microsoft.com/ja-jp/library/cc364423.aspx

ちゃんとホットキー記号で書いて動いてないのならワカラネ

>>188
それはSendKeysのパラメタですよね。
VBSから「タブ」を送る記載は　"{TAB}"　と書いてます。
単体の実行なら動きます。

「タブ」でなく「あ」を送ろうとした場合でも、
VBSファイルをホットキーで実行すると動ないんです。

>>190
VBSファイルのショートカットファイルのショートカットキー起動のこと?
問題なく動くが

ショートカットファイルのショートカットキーってデスクトップ（かその下層フォルダ）に置いておかないと効かないんじゃなかったか
デスクトップに置いてないんじゃない？

ついでにCとC#でやってみた

---- c# ----
var start = Stopwatch.StartNew();
for (int i = 0; i < 100000000; ++i)
{
}
Console.WriteLine((double)(start.ElapsedMilliseconds) / 1000);

---- c ----　
最適化するとループがなくなるので最適化なし

DWORD start = timeGetTime();
for (int i = 0; i < 100000000 ; ++i) {
}
DWORD end = timeGetTime();
printf("%f\n", (double)(end - start) / 1000);


c#　0.498秒
c　0.427秒

Google v8 速すぎw
もう、全部JavaScriptで良いんじゃないの

空のループじゃベンチマークに不適当だがw

>>192
C直下の作業フォルダから C:\Users\<User Name>\ShortCut
を作って放り込んだら動きました！これは絶対気づきませんでした。
これで捗ります。ありがとうございました！

>>191
ありがとうございました。

ホットキーを設定したショートカットファイルを移動したりしちゃだめなんですね。
レジストリの掃除から始めないとだめみたいです。

>>181
JavaScript には strict があるぞ

>>178
空ループでパフォーマンスとか意味ないだろ
前スレでバブルソート（笑）で比較してたけどJavaScriptの方が速かったぞ

VBSでSendKeysするとVBSがアクティブになって
目的のアプリを.activateしなきゃいけないから
ホットキーをマウスに登録してやるのは
他のアプリで誤って押した時にマズイ事になる可能性があるから、やめた
WScript.CreateObject("WScript.Shell")が遅いですし。

>>198
>>194
そりゃそうだなw
ベンチマーク用の定番コードってなんかあるんかな

どっちにしてもブラウザ上のJavaScriptが最速だろうな
WindowsでのスクリプトPGは、hta/JavaScriptが良さそうだ

文字列と文字数を受け取って文字列を指定した文字数ごとに区切って
配列を返すStringDivideメソッドを作ってください。
StringDivide("abc", 2) -> Array("ab", "c")

2つの値を受け取って小さい方を返すMinメソッドを作ってください。
Min(1, 2) -> 1

Minメソッドを使って、2つの値を受け取って大きい方を返すMaxメソッドを作ってください。
Max(1, 2) -> 2

Maxメソッドを使って、3つの値を受け取って一番大きいものを返すMaxTripleメソッドを作ってください。
Max(1, 2, 3) -> 3

VBScriptのソースコードを書いてください、ピラフ困っています。よろしくお願いします。

>>201
自分で考えなさい(^○^)

JavaScriptにはminもmaxもあるしどちらも引数を2個以上指定できる
もしかしてピラフってVBScriptのダメな所を世間に知らしめようと活動してるのか？

>>201
string divide
文字列の格差

by google翻訳

ダメな所を世間に知らしめようとしているのではなく
ダメな所をフォローしたり、適材適所で他と使い分けたりするだけの能が無いだけ

>>202
いやだ、ピラフは絶対に教えてもらいたい

>>203
ここはJavaScriptのスレじゃない

>>204
あ？

>>205
ここはVBScriptのスレだ
とにかくVBScriptのプログラムを書きまくり必死に話し合うスレだ

>>201
できたよー
ttps://friendpaste.com/1NzAOY5XbZZLoGOmWCAhoD

>>207
ワロタ(^○^)

俺ならScriptControlよりもwsf化だな
ファイル全体では>>207よりやや複雑になるというか、wsfのXMLタグ分の行数が増えるが
タグを除いた実コード自体はもっとスッキリする上に<script language="JScript"></script>部分を
折りたたんでおけば、普通にVBSだけのwsfと変わらないように扱える

まあそれもmaxなどの関数部分以外をどうしてもVBSで作りたい場合の話で
そうでなければ全部をJSで作っちゃうけど

>>208
笑うな！おもしろくない!!

>>207
　　　　　　　　 　＿＿＿_
　　　　　　　　／　　 　 　＼
　　　　　 　／　　─　 　 ─＼
　　　　　／　　　　⌒　　⌒　　＼ 　　　　ハハッワロス
　　　　　|　 　　 　 ,ﾉ(､_, )ヽ　 　 |
　　 　　 ＼　　 　　 ﾄｪｪｪｲ　 　／
　　 　 　 ／　　　_　ヽニｿ,　 く

>>209
ここはVBScriptのスレなんだよ？
VBScriptが好きなピラフに嫉妬爆発させてVBScriptを否定しようとするのやめなよ。
そういうのってかっこ悪いよ。

>>211
ピラフよ、>>201 のコードなんてお前は簡単に作れるだろ
何で聞いてるの？

それともマジで作れないアフォなんかwww

>>212
ピラフアフォなんよ。教えてほしいんよ。

>>213
自分がアフォだと認めるんだなw
でも教えないww

Max(x, y) = Min(x * -1, y * -1) * -1
MaxTriple(x, y, z) = Max(Max(x, y), z)

>>214
認めるんよ。教えてほしいんよ。

>>216
>>215

>>217
なんだおら！

会話に飢えてるのが見えすぎ

>>219
えへへ・・・ピラフさびしがり屋さんだからさ
クリスマスイブはみんなで楽しくすごしたいじゃん？

>>220
クリスマスなんてどこにあるんだ？

>>221
ピラフがサンタさんやってあげるんよ。
25日なったらピラフがクリスマスおめでとーと言うからありがとーと言ってくれればいいんよ。

ピラフは独身？
何歳？
どういう容姿？

>>223
設定の方で良いなら、過去ログ読めば解るよ

実際の方については隠してるけど、発言内容から推して知るべしって感じだなw

ピラフ、メリークリスマス
イブ

愛してるぞ♪

>>224
人間自分と似た人を好きになるらしいし、ピラフの設定もあたらずとも遠からず
あたりだと思うんだよね。じゃあ逆に聞くけど、そちらの容姿はどんな感じ？
封神演義で言うと誰？　ワンピースでもいいよ。

CreateShortcut
で
objCut.TargetPath="""G:\Program Files\Google\Chrome\Application\chrome.exe"" --user-data-dir=""Z:\ChromeData\2"""
ってするとエラーになるんですが回避方法ありませんか？

Z: ドライブは RAM ディスクで、起動するたびにデータをコピーして使います。
ショートカットを自動で正しく作成できないとChromeがクラッシュして再インストールしないといけないので
VBSに限らず、ショートカットの自動作成ができる方法を教えてください。

>>227
何でCreateShortcut部分のコードを全部貼らないんだ？

>>228
必要ないかと思って

Set objCut=objShl.CreateShortcut(objFs.BuildPath(objShl.SpecialFolders("Desktop"),"chrome new" & ".lnk")) ' デスクトップ上にショートカットを作成

某記事で紹介されてるやつを "chrome new" & ".lnk" ってファイル名に変えただけ。
うまくいったらアカウントごとのショートカットを作る予定。

>>229
>某記事で紹介されてるやつを "chrome new" & ".lnk" ってファイル名に変えただけ。

wwwwwwwww

某記事まるごと晒せば誰か答えてくれるかもね

>>227
"""、""
などダブルクォーテーションが連続するのはおかしいのでは？

項目を区切るカンマが抜けているのでは？
"","〜","〜" とか

>>232
ダブルクォーテーション自身は連続するダブルクォーテーションで表現するってあちこちのブログで紹介されてた。
で、代入したいのは引数付きコマンド文字列なので単なる文字列です。

いろいろ試した結果、どうやらドライブ名＋パス名が二つあるとエラーになるような感じ。

長すぎるのがダメなのかと思ったら”aaa...”って長い文字列はフルパスが自動的に補われておっけーだった。


ショートカットが作れないならEXECで起動するかバッチファイルでやる手もあるしそれでもいっかな。
アフィニティマスクも設定したいしそっちのほうがいいかも。

obj="""〜""〜""〜""" → ""〜"〜"〜""

'"〜"〜"〜"'
VBSではこういうように、
シングルクォーテーションで囲えないのか？

objCut.TargetPath="G:\Program Files\Google\Chrome\Application\chrome.exe"
objCut.Arguments="--user-data-dir=""Z:\ChromeData\2"""

こうじゃねっすか？

　　　　　 ∩＿＿＿∩
　　　　　 | ノ　＼　　／ヽ　　　　クリスマスおめでとー!
　　　　　/　　●　　　● |　　　　いちゃいちゃすんな！
　　　　 |　　　　( _●_)　 ミ
　　　　彡､　　　|∪|　　､｀＼
　　　/　＿＿　 ヽノ　/´>　 ) ))
￣￣(＿＿＿）￣￣�� (_／ﾄﾞﾝ!!￣￣￣￣＼
　　　　　　　　　　　　　　＿＿＿＿＿　　　　 ＼
　　　　　　　　　　　　　｜＼＿＿＿＿＼　　　　＼
　　　　　　　　 　　　　　|　｜======== |
　　　　　　　　　　　　＿|　 |oo======= |
　　　　　　　　　　　　|＼＼|＿___＿______|＼

>>234
VBSは　”　だけですね

>>235
なるほど
ttp://support.microsoft.com/kb/242297/ja

>>236
メリクリとリス

>>235
できますたありがとう。

ダブルクォーテーションは自動で補ってくれるんですね。

すみません質問です
VBSでIEを使用してYahooメールで受信したメールを開きたいのですが
昔はメールの一覧がリンクだった為、簡単にクリックで表示できたのですが
新しいシステムになってから開くことができません。
開く方法を教えてください。

なんでIEを介す必要があるの？
普通に受信すれば良いだけでは？

え？

>>239
YahooメールAPIってのがあるみたいだけどね

　　　　　　　　　　　 　　 　 ,_/）_
　　　　　　　　　　　　　　 （∴∴）
　　　　　　　　　　　　r"￣￣￣￣"ヽ
　　　　　　　　　　　（ ___________________）
　　　　　　　　　 　r ´ 　　　　　　　　｀ヽ
　　　　　　　　＜（___________________________）＞
　　　　　　　　　　/ 　　　　＼　　　 ／＼
　　　　　　　　　/　　　　　● ,,.　　.,, ●　ヽ
　　　　　　　　　|. 　　　　　　（__人__）　　　|　　あけおめことよろ
　　　　　　　 　ﾐﾐ､､,,,,,,__,,,,,,,,,,,,,,_,,,,,,,,,,,､､-ﾐ
　　　　　　　┗━彡ミﾐ彡ﾐ　　 ミ彡ミﾐ彡━┛
　　　　　　　 　ﾐミ彡ﾐ .＼　　　.／ﾐ彡ミﾐミ
　　　　　　　　彡ミﾐﾐ　　 .＼／　　　.ミﾐ彡
　　　　　　　　ﾐ丿.┃　　 .　●　　　 .┃ヾﾐ
　　　　　　　　　　 ┗━━┛┗━━┛

早漏…

>>244
いや、超遅漏だ
今頃2014年が明けたことに気づいてる

掲示板サイトをベータ公開中です。

完全無料で、スレッドの作成や匿名での投稿も可能です
お気軽にお試しください。

http://fluid.twolineprj.com/twoline/entry

>>246
無料でもメールアドレスとかIPアドレスとか知られるのはいやだ。
メニューがわかりにくいし、子画面が開くのがいやらしいし。なんかやだ。

ピラフって、なんだかいじめたくなるキャラな、、

>>248
これピラフ
http://trendy.nikkeibp.co.jp/article/column/20080821/1017834/03_px300.jpg


ところで、ピラフ完全に閃いたんだけどさ、
2つの配列を結合するメソッドConcatがあったとするじゃん。

Function Concat(A, B)
　　Dim C
　　ReDim C(UBound(A) + UBound(B) + 1)
　　Copy C, A, 0
　　Copy C, B, UBound(A) + 1
　　Concat = C
End Function

Sub Copy(S, D, I)
　　Dim E
　　For Each E In D
　　　　S(I) = E
　　　　I = I + 1
　　Next
End Sub

そしたら、配列に値を追加するメソッドAppendはあっさり実装できるんだよね。

Function Append(A, Value)
　　Append = Concat(A, Array(Value))
End Function

これってすごくない？

許可なく他人の画像使うと著作権や肖像権違反だよ。

ピラフって41歳か

>>251
写真見てもらったらわかると思うけど、ピラフまだ20代だよ。

>>252
美紀ちゃんは41歳だけど

>>253
40代に見えないよね。これが奇跡の世代か。
ピラフ職場で50代のババアだと思ってた人が30代の人でびっくりしたことがある。
世の中不思議だよね。

>>254
美人だが40に見えるぞw

>>249
引数AをReDim Preserveすれば、
Copy C, A, 0
を省略できる

特にAとBの要素数比において、Aの方が大きい場合程、その影響は大きく
AとBの要素数が同じくらいなら、処理速度は2倍差くらいのものだが
Appendの場合はBの要素数は1つなので、基本的にAの方が大きいわけで
10^9要素のAに値を一つ追加する場合だと、処理時間は10000倍以上もの差になる

実際に試してみたが、10^8要素配列への追加だと、>>249は 1分02秒 で、前述の方法は 0.0057 秒

引数Aの参照先変数を書き換えたくない場合は、ByVal Aにすれば良いし、それでも>>249より遙かに速い

それに、多要素配列同士の結合は、そう何度も実行することは無いだろうが
配列への値追加は、何度も繰り返して行われる可能性があるので、Concatの使い回しはせずに
効率化に徹した方が実用的
AppendからConcatを実行した場合は、UBound(B)の結果は0だと解ってるんだから無駄だし
1要素しか無いものに対してループ回すのも無駄で、現要素数+1にReDim Preserveして、
末尾にValueを代入するだけにした方がシンプルかつ効率的

自分が作った関数の汎用性をアピールしたかったのかもしれないが、実用性を無視してまでアレにもコレにもと
無理矢理使い回そうとすると、むしろ弊害を生んで、考えの足りなさをアピールする結果になるので注意な



なんて書くと、また他人のコードへの文句しか言えないとか、詭弁と屁理屈で発狂するのかな？

ピラフとキュニスしたい

>>257
キュニスしたら子どもできちゃうよお!!
ところで、キュニスってなんですか？(真顔)

オキュニス！！

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　＿＿＿_
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　／　　 　 　＼
　　　　　　　　　　　　　　　　　　　　　　　　　　 　／　　─　 　 ─＼
　　　　　　　　　　　　　　　　　　　　　　　　　　／ 　　 （●）　（●）　＼
　　　　　　　　　　　　　　　　　　　　　　　　　　|　 　　 　 （__人__）　 　 |
　　　　　　　　　　　　　　　　　　　　　　　 　　 ＼　　 　　 ｀ ⌒´ 　 ,／
　　　　　　　　　　　　　　　　　　　　　　　　　　 /　　　　　　　　　::::i　＼
　　　　　　　　　　　　　　　　　　　　　　　　　　/　　/　　　　　　　::::|＿/
　　　　　　　　　　　　　　　　　　　　　　　　　　＼／　　　　 　 　 　::|
　　　　　　　　　　　　　　　　　　　　　　　　　　　 |　　　　　　　　::::|　 ｷｭﾑ
　　　　　　　　　　　　　　　　　　　　　　　　　　　 i　　　　　＼　::::/　ｷｭﾑ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　＼　　　 　|::／
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 |＼＿／/
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ＼＿／

ピラフあけおめこ

>>261
あどうも、ご丁寧に、こちらこそおまんこ。

>>256
速度厨の寝言は聞き飽きた。ピラフがいまさらそんなことで発狂するわけがない。

┌┴┐┌┴┐┌┴┐　-┼-　￣Ｔフ￣Ｔフ　＿＿　/ /
　　_ノ　　　_ノ　　　_ノ ヽ／|　　　 ﾉ 　　 ﾉ 　　　　　 。。
　　　　　　　　　 　 /＼＿＿_／ヽ
　　　　　　　　　／ﾉヽ　　　　　　 ヽ、
　　　　　　 　　/　⌒''ヽ,,,)ii(,,,ｒ'''''' :::ﾍ
　　　　　　　　 | ﾝ（○）,ﾝ　<､（○）<::|　　|｀ヽ､
　　　　　　　 　|　 ｀⌒,,ﾉ(､_, )ヽ⌒´ ::l　　|::::ヽl
.　　　　　　　　ヽ　ヽ iｌ´ﾄｪｪｪｲ｀ｌi　ｒ ;/　 .|:::::ｉ |
　　　　　　　　／ヽ　 !ｌ |,ｒ-ｒ-| ｌ! 　 /ヽ　 |:::::ｌ |
　　　　　　　/　　|^|ヽ､ ｀ﾆﾆ´一／|^|｀,ｒ-|:「￣
　　　　　　 /　　 | .|　　 　 　 　 　 | .|　,Ｕ(ﾆ ､)ヽ
　　　　　　/　 　 | .|　　 　 　 　 　 | .|人(_(ﾆ､ﾉﾉ

速度厨ｗ

数％とかの速度差で大騒ぎするような奴なら速度厨って言われても仕方ないかもだけど
あそこまで無駄なことやってるのを指摘するのは、速度どうこう以前の問題だろw

そもそも VBScript に速度が問題になるようなことやらさせるなよ

>>267
それ、詭弁として良く言われるけど間違いね

正しくは

「VBScript に速度の追求が必要なことをやらさせるなよ」

であって、速度を追求するには不適切なVBSでも
無駄に遅くなるようなことを極力避けようとするのは当然のことであり
コストが掛りすぎない範囲では、遅い方より速い方を選ぶとは有効なことだ

レーシングカーでなく乗用車でも、法定、安全、コストなどとの兼ね合いを満たした上では
加速性の良さも無意味とは扱われないのと同じでね
軽自動車でさえ、その出力制限の範囲でスムーズな加速が出来るように工夫されてる

極限を追求できるところまでには達せないなら完全に無視するなんてのは、愚かな発想だ

>>268
速度が必要ないのに、Append のために別の Concat 作るとかバカなの？

コンテキスト抜きで速度を問題にするような無駄な議論は極力避けようとしないのな

やらさせるなよｗ

>>271
タイプミスでいちゃもんつけるのはダサいと思う

処理効率のよい方法を選ぶ人がいれば
簡潔さを好む人がいて
包丁もって叫んでる人もいる。
でも、みんなに共通することがあって、みんなVBScriptが好きなんだよ。
これってすてきなことだよね。VBScriptでみんなが繋がってるんだよ。
ドッキングだよ。ピラフみんなに勇気もらったから、告白してくる。
ピラフあなたとドッキングしたいって。

>>273
お前、鼻が青くないか?

>>274
どういう意味？

青鼻のピラフ

鼻なくない？
http://blog-imgs-45.fc2.com/x/3/3/x333/20100818183734369.jpg

>>277
これ
http://onepiecemaana.img.jugem.jp/20110314_1862863.jpg

>>278
チョッパーかわいいよねチョッパー

告白まだー？昼から正装して待ってるんだけど

>>280
なにしてんねんアホｗ

>>281
そんなに喜ぶなよ

>>269
なんで、Append のために別の Concat 作るなんて愚かな発想になるんだ？

>>249のAppendを

Sub Append(A, Value)
　　ReDim Preserve A(UBound(A) + 1)
　　A(UBound(A)) = Value
End Sub

にしてやれば良いってだけの話だろ？
（関数形式にしたり、UBound(A) + 1を変数に取ったりはご自由に）

自分で勝手に指摘とは違うバカな発想をして、その発想をバカ呼ばわりとか
君は一人コントで笑いでも取りたいのか？w

「俺の作ったFunction Concat()は、Appendの実装にも使えるんだぜ」って自慢をするために
Appendの実装には向かないConcatを、Appendの実装に無理に使うのは愚かしいってだけで
Appendの実装には向くConcatを別に作れなんて誰も言っていない

「既存の配列に別の配列や値を追加する」って字面で見ると、似たような処理に見えるけど
追加するのが単一の値の場合、効率化出来る部分というか、追加するのが配列の場合と比べて
必要ない処理が多いので、同系列の処理として考えずに別個のものとして扱った方が
処理効率はもちろん、簡潔さも向上するって話だ

Appendの中の行数で見れば1行増えてるが、外部関数を呼ばずに内部だけで完結しているって本質を見れば
処理内容は遙かに追いやすく、効率だけでなく簡潔さも向上しているからね

効率の良いAppendを実装するのに、既存のConcatと同等の別コードが必要ってなら
簡潔さを求めるために効率化はあえて無視して既存のConcatを使い回すのもアリだろうけど、
使い回さないことで効率も簡潔さも両方を向上させられるなら、それを否定する理由は無いだろう
因みに、悔し紛れで、説明が長いだの長文だのというところに食って掛かるのはよしてねw

正論だけどウザい。
一部のアホ以外は言わなくても分かってるから、
いちいち論破する必要ない。

>>249の要約
Append()は要素数1のConcat()と同等である

>>283の要約
>>249よりも良いAppend()を実装出来る
↑そもそもそんな話じゃねーし、正論とは言わんなこれ。

話が明後日の方向きすぎて耳がキーンなるわｗ

>>283
別の Append 作るのはバカだって書いてるのに、〜すればいいじゃんとか明後日のレスされてもな w

被った...
しかも、明後日まで被るとは w
結婚しようか？

あらやだｗ

イチャイチャすんな!!

被ってないことに気付かない程のアフォが被ってる偶然w

本質を見抜けず間違った要約して、その要約が明後日の方向いてるって
自身の理解力が明後日の方向いてると暴露してるだけなんだけどね。

なんの脈略もなくふと思い出してお前ら使ってるかな知ってるかな知らないなら便利な使い道あるだろうしお前らに教えてやろう。と思ったんだけど、なんだっけ？俺、何を呟こうとしたんだっけ？
そう、Twitter的にボソッと呟いて「へぇー、こんなのあるんだ、覚えとこ。サンクス」みたいなレスがつくんかなーとか思ってたんだけど、なんだっけ？俺、何を呟こうとしたんだっけ？

>>290-291
悔しくて夜中まで考えたレスがこれとか、笑える

http://dic.nicovideo.jp/oekaki/193011.png

>294
正直その手の台詞コラージュ画像は嫌いなんだが

働きたくないわけじゃないんだよな
楽しい仕事がしたい

>>295
でもピラフのことは嫌いじゃないでしょ？
つまり、>>295はピラフのことが好き。
ピラフはコラ画像が好き。
論理学的には>>295はコラ画像が好きというのが
>>295の主張の眼目であるってことに結論付けざるおえないよね。はい論破。

>>297
＞結論つけざるおえない
日本語で

>>298
日本語でなんですか？は？

>>57

#include <stdio.h>
みたいなことできる関数なんだっけ

関数ではなくwsfの<script>要素
src=""で、インクルードするファイルを指定する

どうしても関数でやりたい場合は、相手をwscにする必要があったような気がする

>>301
ファイル読み込んでevalするとかか?
>>302のやり方が正解だと思うが

ヘルプに載ってる

ごめん関数じゃなかった。ステートメントだった。
VBS Include でグググったらたくさん出てきた。

Execute file.ReadAll
ExecuteGlobal file.ReadAll

292でお伝えしたかった事はこれです。
知らなかったみんな、仲良く使ってね！

使い道は.ini的な設定値の外出しとかfunctionを単品整理するとか、便利ですね！（棒

おっけ。寝る。

OpenTextFileで開いたSJISのテキストストリームから trim(split(○×.ReadLine"/") 使ってファイルパス切り出すと
'ソ'とか'十'の0x5c含むダメ文字でちょん切れる場合とちょん切れない処理結果が混在するんだが
何が原因だろう？

本当はSJISファイルなんて使いたくないんだけど

vbscriptは無実
7z.exe が犯人だったわ
結果がバラける原因はまだ不明だけど

SJIS使いたくないんならUnicode使えばいいじゃん

みなさんこんばんわ。ピラフのお時間です。
以下のことを確認するVBScriptのコードをよろしくお願いいたします。

ある監獄にA、B、Cという3人の囚人がいて、それぞれ独房に入れられている。
罪状はいずれも似たりよったりで、近々3人まとめて処刑される予定になっている。
ところが恩赦が出て3人のうち1人だけ助かることになったという。
誰が恩赦になるかは明かされておらず、
それぞれの囚人が「私は助かるのか?」と聞いても看守は答えない。

囚人Aは一計を案じ、看守に向かってこう頼んだ。
「私以外の2人のうち少なくとも1人は死刑になるはずだ。
その者の名前が知りたい。私のことじゃないんだから教えてくれてもよいだろう?」
すると看守は「Bは死刑になる」と教えてくれた。
それを聞いた囚人Aは「これで助かる確率が1/3から1/2に上がった」
とひそかに喜んだ。果たして囚人Aが喜んだのは正しいか?

プログラムで証明させるなら、3囚人問題ではなくモンティ・ホール問題の方にしろよw
選び直しの無い3囚人問題では、証明するまでもないし、証明の仕方も単純すぎで面白くない

というか、ピラフは、3囚人問題やモンティ・ホール問題の本質を理解してるのか？

>>311
ふふっ、ピラフが理解してるわけないでしょうが！
ピラフをなんだと思ってるんだ!!
是非VBScriptで本質コーディングのほどよろしくお願いいたします。

>>310
プログラムで試すならモンテカルロだよね
証明はしてない
https://friendpaste.com/2mT12ZAo99a2KfnZbA2nUx
で答えとしては看守の気分次第で変わる

VBSで高階関数ってないんだよね
Evalでごまかした

本質って何だろう？条件付確率みたいな話？

Aが助かる確率は1/3、33%(端数割愛)のまま

元は、A、B、C共に33%
Aが看守に尋ねてBが詩形になるという答えが返ってくると
Bの助かる確率が0%になり、その分はCに廻ってCの助かる確率が66%になる
Aが助かる確率は変動しない

モンティ・ホールの場合、最初に選んだ扉（囚人Aに相当）がアタリな確率が33%で
モンティが開けたハズレ扉の分が、残った扉に廻り、その扉がアタリな確率が66%になるから
選び直しをした方がアタリを引く確率は高い

Ａ Ｂ Ｃ の扉があり、それぞれのアタリが以下の3パターンで、最初に選らんがのがＡの扉の場合
○××ならモンティはハズレなBかCの扉を開き、そのままだとアタリ、選び直しをするとどっちにしろハズレ
×○×ならモンティはA以外でハズレなCの扉を開き、そのままだとハズレ、選び直してBにするとアタリ
××○ならモンティはA以外でハズレなBの扉を開き、そのままだとハズレ、選び直してCにするとアタリ

と、選び直しをしないとアタリを引くのは一番上の1つだけで、選び直しをすると、中と下の2パターンでアタリを引ける
故に、選び直しをしないとアタリの確率は3パターン中1つで33%、選び直しをするとアタリの確率は3パターン中2つで66%

選び直しが出来ない囚人は、上記の「選び直しをしない」ケースと同じで看守の回答の前後で確率は変動しない

>>313
ありがとうございます！！！
とり急ぎお礼まで！！！！！

>>315
囚人の問題に関しては、その3パターンでは説明しきれない
看守がBが死刑だと言うと条件が足りない

<看守がBが死刑だと言うと条件が足りない
>看守がBが死刑だと言うという条件が足りない

残った2つの扉のうち、　ハズレな方の扉を、　モンティが開ける　行為が
A以外の2人の囚人うち、　死刑になる者を、　看守が明かす　ことに該当していて
その条件が既に含まれていることに気付いてないのか？

まぁこの問題は「直感で正しいと思える解答と、論理的に正しい解答が異なる問題」の適例と
言われるくらいで、錯覚しやすい罠がちりばめられてるから注意しよう

モンティ・ホール問題と3人囚人問題は、条件とその結果の確率のところまでは全く同じで

扉=囚人、ハズレ=処刑、アタリ=恩赦、司会者（モンティ）=看守
プレイヤーが最初に選んだ扉=囚人A
プレイヤーが最初に選んだ扉以外でハズレの扉を司会者が開く=囚人A以外で死刑になる者を看守が明かす

にそれぞれ対応しており、アタリおよび恩赦の確率も

1/3=33%：プレイヤーが最初に選んだ扉=囚人A
0/3=. 0%：司会者が開いたハズレ扉=看守が明かした死刑者
2/3=66%：残ったドア=囚人B,Cのうち死刑と宣言されていない者

となる

違うのはその確率から導き出される最終結論だけで
モンティ・ホール問題は、「選び直した方が33%→66%に確率が上がるので、選び直しをするべき」で
3人囚人問題は、「BもしくはCの死刑が明かされても、Aが恩赦になる確率は33%のままで50%にはならない」

あくまでそれは看守がランダムに死刑になる囚人を言う場合の話
死刑になる囚人のうち必ず名簿の上にある方を答える　とかいう場合は結論が違う

この子、何勘違いしてるんだろう？

看守が何を言おうが言う前の確率は変わるわけがないって思い込んでるんでしょ

結局生きるか死ぬかだから50%でよくね(適当

この問題、2chとかで話題になる度に、正解を知っている者と、錯覚している者とで論争が起るよなw
まぁ、>>315,>>319の解に対して、1000人近い博士号保持者を、抗議をするまでに錯覚させた程の問題なので
一般人が錯覚するのも無理はないが、結局は抗議してた博士号保持者達も自分の誤りを認めることになるわけで
既に>>315,>>319が正解であることが証明されている問題なのだから、ケチを付けることに必死になるより
その解を理解することに注力した方が建設的だと思う

上記の解が成立するには、BCともに死刑になる（Aが恩赦になる）場合、「Bは死刑になる」と答える場合と「Cは死刑になる」と答える場合が等確率で起こらなければならない。
これ重要

>>324
たぶん勘違いや思い込みしてる部分があるから見直した方が良いよ

>>325
そこに偏りが出ると、なにがどう変化するかちゃんと解った上で言ってるの？
それとも苦し紛れで反論に使えそうな文をwikiから引張ってきただけ？

その部分の回答に偏りがあっても、Aが助かる確率が1/3という部分は変わらないんだよ

BC共に死刑になる場合に、B死刑とC死刑を等確率で答える場合と、
BC共に死刑になる場合は、必ずB死刑と答える場合とでは
1/3 × 1/2 ＋ 1/3 × 1/2 ＝ 1/3か
1/2 × 2/3 ＋ 0 × 1/3 ＝ 1/3かの違いだけだ

つまり、解法が違うだけで結論は同じ
wikiで等確率でなければ成立しないって言ってるのはベイズの定理による解法であって
結論のことでは無いんだよ

それが解っていれば、解法に対してケチを付けられても、結論に対する反論として使えないその文を
持ち出してはこないはずだが、たぶん勘違いや思い込みしてるんだろうね

ああ確かに誤解してたわ
Bが死刑だと言われた場合にAが助かる確率の話をしてた
この話なら必ずB死刑と答える場合は、確率が変わる

たしかにAが助かる確率のみなら看守の発言によらず33%のままだね

ちなみにベイズの定理による解＝結論になると思ってるんだけどそれも違うの？

ちなみに確率が変わるっていうのの認識は>>313の結果と同じ
これが間違ってるようであれば違ってる点を指摘してもらえると後学のためになりそう

BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Bは死刑になる」と答える場合は

恩赦　看守答　確率
A　　　B　　　　1/3
A　　　C　　　　0
B　　　C　　　　1/3
C　　　B　　　　1/3

となるので、看守がBと答えたときにAが助かる確率は(1/3)/(1/3+1/3)で1/2となる
こう思ってるので間違ってる点を指摘してください

>>330
合ってるよ
解法の途中経過としてはね

それが
1/2 × 2/3 ＋ 0 × 1/3
の最初の「1/2」に当たる中間解だ

但し、
> BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Bは死刑になる」と答える
という条件は提示されていないので、
等確率には成らずに偏る可能性を考慮するのは無意味じゃないが
それを考慮するなら、別方向に偏った場合やその発生率から、その範囲や平均値を出すのが確率論ってものなので
恣意的に違う結果が出るように偏ったケースだけの数値を出しても、意味はないんだけどね

「BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Cは死刑になる」と答える」
という条件を追加した上で、看守が「Bは死刑になる」と答えた場合だと
この回答によりCが助かることが決定するので、Aが助かる確率は0になるしね

で、それらを恣意的に偏らせずに平等に評価すると、Bが死刑と答えた場合に限ったAの助かる確率も、結局は1/3

え、じゃあやっぱり看守が言う確率が偏れば助かる確率も偏るんじゃん

>BC共に死刑になる場合に、B死刑とC死刑を等確率で答える場合と、
>BC共に死刑になる場合は、必ずB死刑と答える場合とでは
>1/3 × 1/2 ＋ 1/3 × 1/2 ＝ 1/3か
>1/2 × 2/3 ＋ 0 × 1/3 ＝ 1/3かの違いだけだ
の最後の行のそれぞれの値の意味を教えてほしい
1/2については>>330の最後の1/2ってことなんですよね

> BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Bは死刑になる」と答える
という偏りの上で、「Bは死刑になる」という回答の発生率は、3パターン中、AもしくはCが恩赦となる2パターンなので2/3であり
この回答の上でAが助かる確率は1/2

> BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Cは死刑になる」と答える
という逆の偏りも平等に考慮すると、この偏りでの「Bは死刑になる」という回答の発生率は1/3で
この偏り条件でこの回答が発生するとBが助かることが決定するので、Aが助かる確率は0

故に、助かる確率1/2というケースが2/3の確率で発生し、助かる確率0というケースが1/3の確率で発生するので
恣意的に一方に偏った場合だけを取りざたすなんて卑怯なことはせずに、偏りを考慮するにしても
逆の偏りとその発生率まで平等に評価すると、看守がBと答えた場合に限ったAの助かる確率も、結局は1/3という解に帰結する

逆の偏りを平等に評価するのではなく、逆の回答を平等に評価するというアプローチだと
> BCともに死刑になる（Aが恩赦になる）場合に看守が必ず「Bは死刑になる」と答える
という偏りの上で、「Bは死刑になる」という回答の発生率は2/3で、Aの助かる確率は1/2
「Cは死刑になる」という回答の発生率は1/3で、Aの助かる確率は0

こちらのアプローチでも結論は1/3


この問題では、三者の元の助かる確率は1/3ずつとさえ明記されていないので

　恩赦を決定する者の心理で考えれば、三者に差異がなければ
　リストで筆頭となるAを恩赦とする確率が一番高く、それぞれの恩赦率はA=5割、B=3割、C=2割程度なので
　元からAの助かる確率は1/2である

なんて詭弁さえ言うだけは言えるけど、こんな恣意的に恩赦率を偏らせるとか、見苦しいにも程があるって話でしょ？

それと同じく、この問題は詭弁ではケチを付ける余地を残しておきながら、ケチを付けた方が見苦しくなるような所にしか
その余地は残されておらず、正当に評価すれば結論は揺るがないからこそ有名なんだよ
正論で解を覆せるような問題だったら、そんなの有象無象とばかりにいくらでもあるので、ここまで有名になってない

VBScript使ってIPmessengerへメッセージ送れないですかね？
送る方にもIPmessengerを入れたら良いんだけど
送信元へはインストールしたくないです
Perlでやってるサンプルは見つけたんだけどVBScriptのサンプルが見つからなくて

Perlのipmsg依存部分(ipmsgインターフェース)は理解したけど、vbsでの実装方法(使用すべきclassなど)が分からないから教えろってこと？
それとも丸投げ？

Perlの理解が出来ない

>>335
> Perlでやってるサンプルは見つけた

で、お前らも探せと？
まあ、俺は Perl 嫌いだから、見ないけど w

>>337
じゃあipmsgのソース見た方が早いんじゃないか
何の言語で書かれてるか知らないけど、いろんな人が改造して公開してるし、オープンじゃなかったっけか

ipmsgのインターフェース部分を理解する
　↓
vbsでインターフェース要件を満たせるか調べる


送信側として必要な情報は、受信側のIPとポートだけだと思うから、ipmsgのやり取りの形式を理解する
　↓
その送信形式をvbsで実装が可能かを検討する

あ、ipmsgソースよりもPerlをちょっと勉強して、ipmsg依存部分を判断する方が早いかな？
まあ頑張って。

>>338
移植してくれ
とは頼まない
Perlを移植することがvbscriptにあったやり方とは思わない

まあサンプルが無いなら340のやり方しか無いだろうな
そもそもvbscript向きなのか？も疑問だな

こいつなに言ってるんだ？

バカ発言にはあきた

みつけたPerlのサンプルを示せば誰かが見てくれるかもしれないのに

以前、行の内容を、前後逆に並べるという話題があったけど、
画像の左右反転処理で、1行ずつ同じことをやっていた

他にも、ビッグ・リトルエンディアンの変換にも、
応用できそう


>>335
Ruby,Pythonはどうかね？

>>345
わざわざvbsなんだしipmsgもインストールしたくないんだからvbsなんじゃね
本人じゃないから知らんけど

>>346
vbsで出来ないか？と考えたら何が何でもvbsとなる思考ってステキ

>>345
windows標準で出来ないかな？って思っているので
PerlもRubyもPyhtonもやめておきたい

>>335 に
> VBScript使って
って書いてあるのに
> そもそもvbscript向きなのか？も疑問だな
とか、
> vbsで出来ないか？と考えたら何が何でもvbsとなる思考ってステキ
とか言う奴って...

ここって何のスレ？

>windows標準で出来ないかな？って思っているので
この意図を最初に書けばよかったんじゃね

WSHでUDP通信自体がwindows標準でできなさそうかも？
WSHで通信する方法はあるがVB6ランタイムが必要らしい

.NETフレームワークのオブジェクトがWSHからいくつか参照できるからUdpClientはどうかと思ったけどたぶんできない

ここでvbscript以外の相談にも乗ってくれるならありがたいが
スレチって騒がれそうだしな
まあwindowsで他のPCへメッセージ出したい
送信元へはソフトを入れたくないってだけだったが
とりあえず難しそうだな

送信元にソフトを入れたくないって、なんか悪用の臭いがするので
あまり深く関わらずに具体的な解決法とかはアドバイスしない方がいいかも

仮に今回の彼の目的が悪用じゃなかったとしても
ソフトのインストールが許可されてないPCから、ちょいとVBS書くだけで
外部に向けて情報を流出させられるって、悪用に対して有用すぎる方法だからな

vbs のスクリプトファイルを入れていいなら、同じフォルダに perl の exe と perl スクリプト入れるくらい構わないだろ。
別にインストーラを起動する必要なんてない。
IPmsg 入れていいなら、コマンドラインから送信できるインストール不要の適当なチャットソフト入れればいいんじゃないの。

他の PC へテキストを送信する機能は昔は標準機能にあったがセキュリティの問題で外された。

あと、自己正当化の見苦しい奴は嫌われたりからかわれたりする。

msgコマンドって無くなってるの？

Class Pilaf
　Private Me_Name
　Private Me_Birthday
End Class

Class Pilaf
　Private This_Name
　Private This_Birthday
End Class

Class Pilaf
　Private Self_Name
　Private Self_Birthday
End Class


どれがいいと思う？ピラフ的にはミーがかっこいいと思うんだよね。

なんで接頭辞がいるの？Privateってことを示したいってこと？
なら_Nameと_Brithdayにするわ

Class Pilaf
Private name_
Private birth_
Private sex_
End Class

vbscriptでプリンター出力は可能？

可能だよ
プリンター出力可能なActiveXを介せばね

ActiveXを介すなんて言うと特別なことのように聞こえるかもだが
FSOやDictionaryだってActiveXなわけで、それらを使うのと同じって話だ

まあ、359が何をどのようにプリンタ出力したいのかは分からないので
359の望み通りの出力が出来るActiveXが有るかは別問題だが、
無ければ作れば良いだけの話だし、無料の開発ツールで作れるからね

俺の場合、最初にそういうこと始めた十数年前には、Excelのインスタンスを非表示で作って
VBSからシートに印刷したい内容を書き出して印刷させてたりしたが
今はレシートプリンタの内蔵フォントを使った高速印刷がやりたくて
レシートプリンタの内蔵フォントや特殊制御が使える専用ActiveXを作って使ってる

ピラフいいこと思いついた！

　　　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 　 　 ／￣￣￣￣＜　　 マ
　　　　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ／ 　　　　　　　 ヽ
　　　　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 ／＼ 　　　　／´ 　 }　 　ジ
　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ／ _ _. 　　　　´,-‐-、〈
　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 ／ /´r:oヽ　　　 / o::ヽヾ ＼　 だ
　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 /　　{　0::::::}　　　 {::::::o::}　}　　}
　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 i 　　　ヽ::: ｿ　　　　ヾ:::::: ソ　 /　 お
　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 | 　　　i´　　 ﾍ　　 　　　iヽ..:　＼
　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ヽ　　 ヽ＿/　 ＼＿＿ノ:::::｀　 　）！
　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ヽ　　　　＼　　／　　　　　　 / ＿
　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ＼ 　　　 ｀-´　 　　　　　　￣
　　　　　　　　　　　　　　　　　　　　　　 　 　 　 　 　 　 　 ＞

　J(　´)Д(｀)し ＜マジだお！

ピラフの言う「いいこと」そのものが、実用上で良かった例しは一度も無いが
そこから発展した話題の中で、他の人がピラフを論破する上で出した情報やコードとかが
タメになったことは何度かあるので、皆が突っ込みたくなるような
幼稚で間違ったネタをピラフが投下するのも、そう悪い事じゃないような気がしてきた。

漏れもいいこと思いついた！

>>365
なあに？

>>365
なに思いついたん？

みんなー！初期化処理に時間がかかるスーパーヘビーなオブジェクトが
あったとするじゃん。仮にそのオブジェクトの名前をタイタニックとすると
こうなるじゃん。

Class Titanic
　Public Function Sail()
　End Function
End Class

ループの中でタイタニックオブジェクトのセイルメソッドを
繰り返し呼ばなくてはいけません。しかし、ループのたびに
タイタニックを作ってたらとても時間がかかります。

ループの外でタイタニックを作ってそのオブジェクトを
使いまわすことにします。しかし、ループが1回も回らなかったら
タイタニックを作るのにかかる時間が無駄になります。

ループする数をあらかじめ知ることができればよいのですが、
ハリウッドの原則を忠実に守っている素敵フレームワークを使っていて
ループの中で呼ばれる処理は実装できますが、何回呼ばれるかは
あらかじめ知ることができません。

みんなはこういうときどうする？

初めて使われるときに初期化する

それだけの単純な話だよなw

スーパーヘビー？wなオブジェクトをループ内で毎回初期化するには時間が掛るとしても
フラグ作ってそれが初めてか否かを判定するだけなら、ループ内で行ったところで
たかが知れてるというもの

100回判定しても10000回判定しても、昨今のPCなら体感的には0秒だ
億単位のループになって、初めて数秒くらいの体感できる時間になるが
億単位のループなら、その判定以外の処理の部分でも相当な時間が掛るはずだから
1時間の処理が1時間5秒になるなどで、判定に掛る時間だけを見れば体感できても
判定が加わったことにより増えた時間は結局体感できない程度の差にしかならないはず

遅延初期化とか言う名前まで付けられてる基本的な話

VBSでCDO.Messageを使ってemlファイルをいじってるんですがちょっと
教えていただけませんか？

添付ファイルを追加するのは
MessageObj.AddAttachment　パス・ファイル名

ですが、逆に添付ファイルを削除するのはどのようにしたらいいでしょうか？

>>372
.Attachments.Delete
とか
.Attachments.Items(n).Delete
とかじゃね、しらんけど

CDOとか未だ現役で使われるのかね

リモートのサーバに対して、コンピュータの管理から共有フォルダを作成するのと同様のスクリプトをおしえてください。
WMIをつかうのでしょうか？

バッチでいいんじゃね
http://itpro.nikkeibp.co.jp/article/COLUMN/20060725/244263/

>>375
コマンドラインはクライアントから設定できないだろ

>>374
もっと具体的に

やあ（´・ω・｀)

寝ろｗ

>>369
>>370
>>371
>>379

純粋オブジェクト指向型言語であるVBScriptで条件分岐使ったら
負けだと思うよ。

できたお。
https://friendpaste.com/2FviEh6jieAyYwfDZGNX2l

これはもうデザインパターンに追加するべきだと思うんだよね。
ファーストオンリーイニシャライズステートチェンジタイタニックパターンと
呼んで欲しい。考案したのはピラフ。どうしようピラフ歴史に名を刻んじゃいそう・・・！

初期のVBSはオブジェクト指向じゃない手続き型の言語だったよ、VBもね
それに今のバージョンでも『純粋』なオブジェクト指向じゃないよ

>>382
ピラフ新しいPC欲しい。
ところでさ、ピラフ社畜っぷりが半端ないから
毎日出勤時刻と退勤時刻を会社にご報告しなきゃいけないの。
そこでイベントログを参照してPCの起動時刻とPCの終了時刻を
出力するVBScriptのプログラムをよろしくお願い致します。
1週間前まで出力されるととても助かります。以上、よろしくお願いします。

なんで素直に「イベントログの参照の仕方を教えてください」って言わないんだろう？

出退勤の概念がある業務形態で、出退勤時刻を必要としていながら、タイムカードやタイムレコーダーの類も無く
手書きの出退勤時刻記録表さえ作らずに、個々で出退勤時刻の報告をしろなんて会社はまず無いし
勤務時間（始業時刻、終業時刻）は、それの記録を目的とするもので記録しなければならず
事実上、PCの起動時刻と終了時刻がそれとほぼ一致するとしても、それを以て出退勤の記録としてはいけないので
出勤時刻どうこうってのがウソなのはバレバレなのにね

というか、理由として書いた物がウソだろうと、とにかくイベントログの扱い方が解ればいいわけなんだから
「イベントログ VBS」でググればいくらでも情報出てくるじゃん
「イベントログ ID 起動 シャットダウン」とかでググれば、起動や終了のイベントIDもすぐに出てくる
「イベントログ VBS」でググって、WMIのWin32_NTLogEventを使うことが解れば、
「Win32_NTLogEvent 時刻」でググって、TimeGeneratedがイベントの時刻を取得するプロパティであることもすぐ解る

それとも何か、働いてるってのがウソなだけではなく、イベントログの扱い方が知りたいってのもウソで
単にコード書かせてケチ付けたかっただけなのかな？

>>384
ピラフが無職じゃなくても別に困らないでしょ。
ピラフは仕事してると思われたいと思ってる。
それを汲み取って返信するのが会話だと思う。

相手の意志を受け入れて困らないのであれば、
受け入れるべきだと思う。それが相手を尊重するってことだと思うし、
会話を行うにあたって不可欠なことだと思う。相手の意志を無視して
自分の中で結論付けたところでそれは話が食い違ってるだけだし、
自己満足にしかならないよね。

大事なのは相手を尊重する心。VBScriptのコードを
書いてほしいというピラフの心をなによりも尊重するべきだし、
ググって分かった気になってるだけじゃダメです。コード書いてください。
形で示してください。よろしくお願いいたします。

相手の意思を無視してコード書けと繰り返し言うしか脳のないやつが世の中にはいるらしい

相手の意思を酌み取って尊重するのは、
良い関係を築くべきな友人やお得意様相手の場合の話ね

良い関係を築いたところで、何のメリットも無いどころか
調子に乗らせてつけ込まれるだけみたいな相手に対してまで
そういう配慮をするのは、大人な対応ではなく単なる頭の弱い奴

>>385
ちゃーメシは夢職なのか
可哀想すぎるぞ

>>388
そうだよね、ピラフ可哀想。
同情でVBScriptのプログラム書いてくれてもいいんだよ？
やさしさに甘える準備は万端だよ？

>>387
ピラフがそんな人間じゃないっていうのはスレ見てたらわかるでしょ。
心外！ピラフ心外!!

>>386
ピラフじゃない、ピラフじゃない、ピラフじゃない。
え？そんな人いるの？想像もできないよ。

証拠保全のために、勤務時間を記録しておけ！

残業代を減らすため、勤務表を改ざんする上司がいるので、
知らない間に、給料が減っている

また、1分単位の残業代を払わない会社もある

1分単位の残業代は、法的には払うべきものでも、一般常識的には払わないのが普通
その代わり、1分単位の私語雑談や、ちょっと手が止まってるくらいは、口頭で注意されるくらいのことはあっても
事細かに懲戒処分とかにされずに見逃してもらえてるはずだ

何でもかんでも杓子定規に法律守らせようとするのは、まだまだ社会的に未熟で幼稚な思考
流石に残業の計算単位を1時間とした上で、毎日40〜50分の残業をさせられるとかならまだしも
15分単位の計算で、5分、10分くらいのサビ残にとやかく言わないのが、社会を知った大人の対応

自分も完璧ではないのだから、相手が完璧でなくても、法律的にではなく社会通念的に問題がなければ
完璧じゃない自分を棚に上げて、相手の不完全さを攻撃するなんて幼稚で恥ずかしいマネはしない方がいい

>>392
大丈夫だよピラフ最初から改竄して提出してるから、えへへ

>>393
じゃあ、お願いしますけど、
イベントログから取得したPCの起動時間と終了時間を
15分単位で丸めて出力するVBScriptのプログラムをよろしくお願いいたします。

PCの起動時間とか終了時間とかで就業時間を管理してるの？(´･ω･｀)
それやり放題だから30年前にうちの会社じゃ廃止された方式だよ？(´･ω･｀)

>>396
30年ていったい今いくつなんよ？Windowsもない時代じゃん。
古代文明にもほどがあるよ。ピラフの会社はお給料少ないし、
時間なんて適当でええんよ。

うちの会社で30年前に廃止されたというだけで、なんで俺が30年前にも
今の会社で勤めてたと勘違いしたんだ？(´･ω･｀)
ちなみ、その頃うちの会社はPC-98というのを使っていたらしい伝聞だが(´･ω･｀)

>>398
ああなんだ、ピラフてっきり古代人が経験談を語ってるんだと思ってた。
ピラフは自分の会社の歴史とか聞いたりしないからさ、絶対そうだと思ってたよね。
30年は勤めてないってことでいいのね、28年くらいでおk？
PC-98っていったらやっぱDOSなんドスか。VBScriptが使えないのは嫌だよね。