◎正当な理由による書き込みの削除について: 生島英之 とみられる方へ:VBScriptについて必死に話し合うスレ [無断転載禁止]©2ch.net YouTube動画>1本 ->画像>12枚
動画、画像抽出 ||
この掲示板へ
類似スレ
掲示板一覧 人気スレ 動画人気順
このスレへの固定リンク: http://5chb.net/r/tech/1498650722/ ヒント: 5chスレのurlに http ://xxxx.5chb .net/xxxx のようにb を入れるだけでここでスレ保存、閲覧できます。
最近やらされてるんだけど、信頼できるドキュメントがなくて死ねる
>>1 逃げてないが!? 逃げる理由なんてないし
やましいことなんて何もしてないし
ピラフは潔白だし
>>4 ピ〜ラフはやってない潔白だぁ〜♪
↑
怪しさ250%
ピラフがよく見るのはここかな
VBScript関数リファレンス
http://www.kanaya440.com/contents/script/ Qiitaでも意外と記事が書かれてて人気あるんだよね
「vbscript」の検索結果 - Qiita
https://qiita.com/search?q=vbscript みんなもVBScriptの記事書いたら良いよ!!
>>9 リリースされたのが昔だからって設計が古いわけじゃないと思うんだよね
GoもSwiftも結局はVBScriptの焼き直しなわけじゃん?
TypeScriptのコンパイラがJavaScriptを生成するように
VBScriptをJavaScriptに変換するトランスレータがあればいいと思うんだよね
vbsをjavascriptに翻訳できるツールを開発したら、結婚してくれるか?
>>14 ピラフは結婚は無理だけど
>>10 が代わりに結婚するよ
作って
>>16 ついでにラムダ式を使えるようにして変数の初期化ができるようにしてもらえると嬉しい
柔軟な言語であってほしいから不変は要らないかな ブロックスコープは欲しいかも
もしかしたらマイクロソフトが100億円で買取るかもしれないんだよ!?
Haxe(ヘックス)はOSSで、JSに型チェックを付けたような言語で(altJS)、 JS(ES5), Flash, PHP, C++, Java, C#, Python, Lua に書き出せる。 Windows8.1対応。IDEは、FlashDevelop このサイトで、ブラウザでプログラミングして、実行できる Try Haxe ! try.haxe.org/ Haxeプログラミング入門、尾野政樹、2015
条件分岐でハマって小一時間 ¥を¥¥としていたというオチ 他の言語だとエスケープ文字なんだもん
>>23 聞いてマイハニー
世界が隠してる重大な事実にピラフ気づいてしまったんだけどさ
VBScriptってFunctionやSub、Propertyといったクラスの構成要素について
オブジェクトごとにメモリを確保するんだよ
メソッドがたくさんあるオブジェクトはそれだけでメモリをたくさん消費するし
メモリ確保のためにCPUもたくさん消費する、これオブジェクト指向的に厳しくない?
メモリを湯水のように使ったら良いわ!と大富豪プログラミングになっちゃうよ
貧相なマシンでも大量のデータを処理できるような
VBScriptハイパフォーマンスプログラミングテクニックを早急にまとめる必要があると思うんだよ
データに振る舞いを持たせないほうがいんじゃないかと思うだけどどう思う?
VBScriptでディープラーニングでもやるつもり?
function Dog() { this.bark = function() { console.log('わん'); }; } function Dog() {} Dog.prototype.bark = function() { console.log('わん'); }; var dog = new Dog(); dog.bark(); var dog2 = new Dog(); dog2.bark(); JavaScript でも、上の書き方をすると、 各インスタンス毎に、関数が作られるから無駄 下のように、prototype、つまり、1階層上・親クラスに、関数を持たせる
____/ ̄ ̄ / │ ̄\__ ゴゴゴ・・・ / .. 、 ,_  ̄\_/ ̄ ̄\/ ̄ ゴゴゴゴゴゴ・・・ ___/ ̄へ√⌒l⌒´ ̄ ̄\_ ´ / \ _ ./ ̄ ̄ ̄\ / __ `ソ/ ─ ─ \/ ̄/ \/゚ (●)。 (●) \/ rへ,ノ ・・・・・・ __>-へ| i (__人__) |ノ :.\_ .:/从へ、.゚` ⌒´o.ノ从rーヘ_ _::ノ :ノ`⌒Y⌒´:: \ .::┘ :│ ゚
Dim a() a = a Microsoft VBScript 実行時エラー: 型が一致しません。 解せぬ・・・
ピラフ完全に閃いたんだけどさ 初期化メソッドとコピーメソッドを作成すれば プライベートなフィールドを隠したままオブジェクトをコピーできる これコロンブスの卵じゃない? 自分の才能が怖いわ Class ClassValue Private FieldValue Public Sub Init(ParamValue) FieldValue = ParamValue End Sub Public Function Copy() Dim value Set value = New ClassValue Call value.Init(FieldValue) Set Copy = value End Function End Class
>>26 プロトタイプ完全に理解した Dim prototype Set prototype = New ClassPrototype Dim dog Set dog = prototype.Dog.Create() Call WScript.Echo(dog.Prototype.Bark(dog)) Class ClassPrototype Dim Dog Sub Class_Initialize Set Dog = New ClassDogPrototype End Sub End Class Class ClassDogPrototype Function Create() Dim dog Set dog = New ClassDog Set dog.Prototype = Me Set Create = dog End Function Function Bark(ParamDog) Bark = "わん" End Function End Class Class ClassDog Dim Prototype End Class ピラフは着眼点が悪くないが勉強不足だと思う 趣味プログラマなら、それでじゅうぶんだけど
>>30 違う
>>26 を理解するためにはjavascriptにおけるプロトタイプベースの継承を理解している必要がある
>>30 みる限り、明らかに誤解している。
,.:::.⌒⌒:::::ヽ (::::::::::::::::::::::::::::) (( (::::::::::::::人:::::::::ノ (::::(´・∀・`):ノ )) (( ( つ ヽ、 . 〉 とノ i )) (__ノ^(_)
ピラフ炒飯丼は、何でオワコンなブビスクリプトにしがみついてるの?
>>38 人に教えられるくらいの知識と経験をお持ちなのかと思ったら
どうやらそうじゃないようで勉強すべきなのはそちらの方なんじゃないかなって思いました
そっちで勉強してピラフに教えれば知識身につくしピラフに感謝されるし一石二鳥じゃん
煽れば教えてもらえると思ったか? もっと謙虚になれよ
>>41 ピラフが何をしたら教えてくれるんですか?
>>39 これ可愛いか?
>>46 えへへー、これピラフ
VBScriptは盆栽とかプラモデルみたいなもの 想像力と知力を駆使してプログラムを作り上げたときの 達成感が半端なく気持ちいい、作って楽しいし眺めて楽しいし とにかく最高
ピラフって女のつもりだったのか ずっとピラフ大王のイメージだったわ
女のつもりだったのかってきもくね オンラインゲームで女キャラ選んでるやつはみんな女のつもりなんだな
本人が女の写真を貼り付けてこれが自分だと主張してる流れで何言ってんだこいつ
ふーんピラフって2009年度三愛水着イメージガールだったんだ
順列は、階乗と同じ 5! = 5 * 4 * 3 * 2 * 1 Ruby の配列にもある
VBScriptでByRefが有用な場面が思いつかない。
Arrayを渡すくらいなもんじゃないの??
だったら何のためにあるのこの構文…。
教えてエロい人。
>>58 C++を勉強して実装例をパクればいいじゃん…。
>>60 エロい立場から言わせてもらうとスワッピングにも使えます
>>62 C++を勉強する気が無いということか?ならお願いすんじゃねークズ。
> エロい立場から言わせてもらうとスワッピングにも使えます
考えが古い。古過ぎる。お前頭正常か??
Cでswap(&a, &b)みたいに書く時に便利ってか??
…
…
古い。古過ぎる。スクリプト言語でそんなのはゴミだ。
馬鹿だろお前。
>>63 どしたの? なんでそんなに力入ってるの?
もっと気楽にやりなよ、気楽にピラフに教えて頂戴よ
お前が馬鹿だということは分かったからもういい。 海外のフォーラムで聞く。もういらん。 5chなどというレベルの低いところでで聞いた俺がアホだったわ。
短気すぎでしょ、ピラフちゃんと答えたのに、轢き逃げにあった気分だよ
>>65 >俺がアホだったわ
今頃わかったのか、どうしてそうなるまで放っておいたのか…
このスレはピラフ大王が居なくなると消滅する それは間違いない
>>67 VBScriptでByRefが有用な場面教えて
>>68 海外フォーラムで鍛えられて帰ってきた帰国子女の
>>63 がいるからピラフはあまり心配してないんだよね
ハイパーでっかい文字列を受け渡しするときにもByRefが有効だったりしないかな ちょっと誰か試してみて
更新必要じゃ無けりゃByRefでしょ 速度がダンチだよ
指定しないときByRefになるから ByValがおまけなんじゃなかろうか
____ / ⌒ ⌒ \ ./( ―) ( ●) \ /::⌒(_人_)⌒::::: | チラッ | ー .| \ /
文字列で試してみた
計算量はByRefの方がいい
長さが65,536の文字列を引数に1,000万回関数を呼んだらByRefの方が60秒速い
1万回くらいでは差が0.1秒未満で計測できない
ちょと質問 VBedit使ってるんだけど、日本語入力ができない フォントをMSゴシッチとかにしても無理、もしかしてみんな日本語打たない?
インライン入力は出来ないけど普通に入力できる なんか勘違いしてるだけじゃないの
>>78 サンクス解決しました
Winの問題でシステムライン変換ができない状態で再起動したらなおりました
コードを保存しないで実行できるのはVBsEditとSystemScipterだけだよなあ。 他は何故か保存が前提。書き捨てのコードで実験できるのは実に便利だよなあ。
あどうも、VBScriptのおしゃれ番長ピラフです
ByRefは配列にしか使えないからうにゃらと言っておられる方が
いましたが配列はVBScriptで最も重要なデータ構造です
たとえば配列を使うことでSystem.Collections.Hashtableよりも
3倍高速なHashtableを実装できます
Hashtable.vbs GitHub
https://gist.github.com/anonymous/8c88e9c5e37edbb06524ec4871e13846 同様にSystem.Collections.Queueよりも高速なキューや
System.Collections.Stackよりも高速なスタックを作ることができます
つまりあれなんです、.NETのコレクションって遅くない?
gist.githubって良くない? アカウント持ってなくてもサクッとコード共有できる かっこいいよねこれ
グーグルのRobotoフォントいいよね
すっきりしててシンプルで優雅でエレガントな気がするフィーリングだよ
質問なのですが現在のスクリプトが管理者権限を持っているかを判別する方法はありますか? 調べてみて WshShell.Run("openfiles", 0, true) で一応できたのですがもっとスマートな方法があれば教えてほしいです。
スマートかどうかは知らないけど Windows Vista以降なら whoami コマンドを使って 実行中のユーザが管理者権限を持ってるかチェックする方法もある ※ "Mandatory Label\High Mandatory Level" グループがあれば [管理者として実行] の状態 Set WshShell = WScript.CreateObject("WScript.Shell") ret = WshShell.Run("cmd /c whoami /groups | find /I ""Mandatory Label\High Mandatory Level""", 0, true) if ret = 0 then MsgBox "管理者" else MsgBox "非管理者" end if
VBSからタスクスケジューラに複数の引数を渡して実行したいのですが、「プロシージャの呼び出しまたは引数が無効です」とエラーになります。
こちらによるとString型の配列を引数にできるとあるのですがどうすれば良いのでしょうか。
https://msdn.microsoft.com/ja-jp/library/office/aa382094.aspx Dim strArg
Dim TaskService
Dim TaskFolder
Dim RegisteredTask
strArg = Array("A1","A2")
Set TaskService=CreateObject("Schedule.Service")
TaskService.Connect
Set TaskFolder=TaskService.GetFolder("\User")
Set RegisteredTask=TaskFolder.GetTask("test")
RegisteredTask.Run(strArg)
WScript.Quit
___ / \ / ヽ | ● | /\ ノ (――> (__  ̄ ̄> \ / / ̄ ̄二) | | (___/ / \ / 〜〜〜〜〜〜〜〜〜〜〜
文字列で渡して受け取り側でスプリットしちゃえばいいのか
>>782 旦那のオチンチンが結構大きいので口に入れるのは辛いですね
ピラフのオチンチンは爪楊枝サイズですが柔らかいので歯の掃除に使えません。
おチンチンびろーん ∩___∩ | ノ ヽ/⌒) /⌒) (゚) (゚) | .| / / ( _●_) ミ/ .( ヽ |∪| / \ ヽノ / / / | _つ / | /UJ\ \ | / ) ) ∪ ( \ \_)
問題.次の式の結果として正しいのはどれでしょう (1) 5 / 4 * 3 (2) 5 \ 4 * 3 1.(1)が3.75、(2)が3.75 2.(1)が3.75、(2)が3 3.(1)が3、(2)が3 4.(1)が3.75、(2)が0
まじか?ピラフにおちんちんついてたのか!? 5ch始まって以来の衝撃ニュースやんけ!!!
マシュマロを食べるたびにピラフのちんちんを思い出す呪いをかけた ___ /::::::::::::::::\ /:::::─三三─\ /:::::::::<○>三<○>.\ /⌒)⌒)⌒.:::::::::: (__人__) :::::: \ /⌒)⌒)⌒) | / / /.. ` ⌒´ | (⌒)/ / / /,, | :::::::::::(⌒) / ゝ ::::::. .........._ | ノ \ /_ /´ ヽ ヽ / ヽ / /0 .', | | {o ::} ': / ヽ、___,.,/
>>103 ところでさ「君の名は」って映画観た?
ピラフいちゃもんつけてやろうと思って観たけど
大号泣だったわ、あんな悲しい話だったとは……
>>105 観たがいいよ!YouTubeとかAmazonで400円で観れるから
>>114 元祖、君の名はの岸恵子は85歳だけどね
vbsなんていう、完全終了してる言語になんでしがみついてんの?
普通にJavaScriptかPowerShellだよね今なら
なんか放っとけないんだよね VBScriptにはピラフがいないといけないんじゃないかって 気がつくとVBScriptのことばかり考えてる
>>123 Node.js使ったことある?あれマジヤバくない?なんていうかマジヤバくない?
超速いんですけど、メモリ効率もすごいし、zip解凍するだけで使えるハイパーポータビリティだし
あれはねヤバイね
ピラフが居なくなったらMSもVBScriptから撤退するだろうな
仕事で初めて使うことになった プログラミングとかの経験はほぼない CSVファイルをデータベースにインサートをするスクリプト作ることになったんだけど、どんなコードを書くのか想像すら付かない コードも暗号にしか見えないし出来るのか…
割とガチでJavaScript使った方が良いと思う
>>128 だけど
とりあえず少し触ってデータベースへアクセスする部分は書けた(全部で5行くらいだけど)けどCSVをデータベースにインサートする部分が全く分からん
このケースってそんなにないのかな?
ネット見ても似たサンプルが見当たらない…
どういう考え方というか進め方をすればいい?
>>132 やり方としてはCSVからSQL(insert文)作って実行するだけじゃない
>>133 ありがとう
でも全然分からん
CSVファイルの中身を一度抽出する必要がある?
それともファイルごとDBぶん投げるの?
あと、インサート文を書くにしてもVALUE部分はどう書くの?
>>134 csvファイルの中身を抽出してカラム毎に分解してinsert文を作る。
あとはピラフ大王に教えてもらえ
>>135 ありがとう
やっぱ中身の分解は必要なんだね
もう少し調べてみる
ファイルの中身を列ごとに取得
SQL文作成
データベース接続
SQL投げる
って流れで良いかな?
質問ばっかりで申し訳ないんだけど、日付でファイルを指定したりも出来る?
>>136 データベースエンジンによってはcsvをインポートするコマンドがあったりする。
SQLServerのbcpコマンドとか。
>>138 そうなんだね
ポスグレ使ってるから調べてみる
日付はCSVに付加させてて、今日の日付のファイルのCSVを読み込むって事をやりたい
行の取得が一般的なの?列の取得ってどうやるんだ?
>>139 scripting.filesystemobjectをcreateobjextして
opentextfileで開いてreadlineするか
readallで全部読んでから、vbcrlfでSplitしてFor eachで処理する
読んだ一行は、カンマでSplitして文字列はダブルクォーテーションで囲んだりしながらvalue部分作成
あとはあらかじめ用意したSQLにくっつけて実行
>>140 ありがとう
呪文にしか見えん…
ちょっと調べながら解読してみる…
>>142 スペル間違ったcreateobjectね
____/ ̄ ̄ / │ ̄\__ ゴゴゴ・・・ / .. 、 ,_  ̄\_/ ̄ ̄\/ ̄ ゴゴゴゴゴゴ・・・ ___/ ̄へ√⌒l⌒´ ̄ ̄\_ ´ / \ _ ./ ̄ ̄ ̄\ / __ `ソ/ ─ ─ \/ ̄/ \/゚ (●)。 (●) \/ rへ,ノ ・・・・・・ __>-へ| i (__人__) |ノ :.\_ .:/从へ、.゚` ⌒´o.ノ从rーヘ_ _::ノ :ノ`⌒Y⌒´:: \ .::┘ :│ ゚
>>142 です
>>140 の人丁寧に教えてくれたけど全然分からなかった…すまん…
CSVの読み込みにCOPYが使えるってのを見つけて試そうと思ったんだけどファイルの先頭3行に必要ない行があるからskipを使ってコード書いたけど実行すると”skip”付近で記述がおかしいみたいなエラーが出る
これ何かおかしい?
Sql = "COPY datatest FROM 'C:\\FTP_Test\\LOG01\\00006401' skip 3; "
ピラフの雰囲気だとなんでもエクセルとVBA使ってそうだけど
>>152 ピラフ貧乏だからエクセル持ってないの!
>>151 ポストグレスの重要機密文書見たけどskipは載ってなかったよ
skipオプションは使えないんじゃないかな
https://www.postgresql.jp/document/9.3/html/sql-copy.html テキストエディタでサクッちゃいなよ
やっちゃえエディタ
>>154 skipないのか…
>>140 の人がレスくれた内容がこの辺かな?
http://bayashita.com/p/entry/show/85 これを
読んだ一行は、カンマでSplitして文字列はダブルクォーテーションで囲んだりしながらvalue部分作成
あとはあらかじめ用意したSQLにくっつけて実行
って全然イメージ付かない…
1行ずつよんだ結果は上のサイトで言う所のstrLineに入ってるって理解で良いのかな?
この変数の中身をどう分解すれば良いんだ?
聞いてばっかりでごめん
>>155 strLineには1行ずつ読んだ結果が入ってるよ
Split関数を使ってカンマで切って配列に変換すればいいよ
Dim values
values = Split(strLine, ",")
>>156 ありがとう
CSVの列の数とテーブルの列の数が同じなら下の書き方で上手くインサートできる?
INSERT INTO test
(aaa,bbb,ccc)
VALUES
(values)
>>157 数も順番も同じなら、テーブル名も省略できるよ
“今日の日付のファイル”を読み出すって場合はどういうコードになるの? 日付を付加するとかはあるけど探して読み出すっていうのが見つけられなかった
>>159 どこに日付が有るの?
ファイル名なのか、作成日付なのか変更日付なのか
ただ日付と言われても誰も解らないよ
>>160 ごめん
読みだしたいファイルに日付が付加されてるんだけど(20171217みたいな感じ)、今日の日時が付いてるファイルのみ判別して読み出すっていうのがやりたい
>>162 日付はファイルを作成した日時が付加されてる
今はパスに対象のファイルを指定してるから読み出したり出来てるんだけど、日付の指定で読み出し対象を変えたいなと思ったんだ
>>162 パス名に一定の規則に基づいた日付がついていて、かつその日付を信頼して制御してOKなら、InStrとかReplaceを使ってパスを検索すれば良い
実際のファイル作成日や最終更新日を考慮しなければならないなら、FileSystemObjectとかを使ってFileのプロパティを調べて検索するべし
>>162 ワイルドカードとかの指定は出来ないので
ファイル名を読み出して判定してからオープンする必要がある
sdate=replace(date,"/","")
set ofo = fso.GetFolder(folder)
とかでフォルダー取得して
For each ofi in ofo.files
でファイル一つずつ読み出し
if instr(ofi.name,sdate) <> 0 then
ファイル読み出し、DB書き込み処理
end if
こんな感じかな
/ ̄ ̄\ / \ |::::::: : | , ノ. . |::::::::::::: | 'ヽ ( |::::::::::::: | ) ) . |::::::::::::::: } ` ノ . ヽ____ } ( ,ノ'  ̄ r'ニニヽ._\. ノ ;;. r':ニニ:_`ー三`:く._ [l、. /: : : : : : :`,ニ、: :_:_;> /,ィつ . /: : : : : : : : / : : : ヽ\ ,∠∠Z'_つ | : :.:.:.:.:.: . :/: : : : : : l : ヽ. / .r─-'-っ . |:.:.:.:.:.:.:.:.:.,' ''" ̄: : :l: : : :l / ):::厂 ´ |:.:.:.:.::.:.:.:l -─-: : /:_:_:_:_l / ̄`Y´ . |:.:.::.:.::.::l.__: : : :/::: : : : :l/⌒ヽ: :〉 |::.:::.::.::l: : : : : : /:::: : : : : |: : : : ゙/
>>165 >>162 です
見ながらやってみたんだけどわからなかった・・・
日付を判定する元にしてるのがsdateかなと思って中身見ようとCall MsgBox(sdate)ってやっても今日の日付が表示されないのはsdateには今日の日時が入ってないからなのかな?
あと、if instr(ofi.name,sdate) <> 0 then の文のinstrの意味って検索が一致した文字の位置を返すって役割って理解であってるかな?
if instr(ofi.name,sdate) <> 0 then この文の意味がよく分からなくて・・・
見ながら書いたコードなんだけどもう少しっぽいのに分からない・・・
Dim objFileSys
Dim objFolder
Dim objFile
Dim sdate
Dim a
Set objFileSys = CreateObject("Scripting.FileSystemObject")
sdate = Replace(Data,"/","")
Set objFolder = objFileSys.GetFolder("c:\Filedate")
For Each objFile In objFolder.Files
If instr(objFile.Name,sdate)
Next
>>170 dataじゃなくてdateね
Dim objFileSys
Dim objFolder
Dim objFile
Dim sdate
Dim a
Set objFileSys = CreateObject("Scripting.FileSystemObject")
sdate = Replace(Date,"/","")
Set objFolder = objFileSys.GetFolder("c:\Filedate")
For Each objFile In objFolder.Files
If instr(objFile.Name,sdate) <> 0 then
end if
Next
>>171 ありがとう
綴りを間違えてた…
本当に馬鹿な質問で申し訳ないんだけど
If instr(objFile.Name,sdate) <> 0 then
で今日と判別されたものはどこに入ってるの?
例えば今日の日付のファイルをデータベースに処理するとして、ここで判別された物がファイルのパスにしたり出来るのかなって思ってるんだけど理解間違ってるかな…
確認しようと中身をメッセージボックスに出してみようと思ったんだけど( )の中身はなんて指定すれば出せるかな
Set objFileSys = CreateObject("Scripting.FileSystemObject")
sdate = Replace(Date,"/","")
Set objFolder = objFileSys.GetFolder("c:\Filedate")
For Each objFile In objFolder.Files
If instr(objFile.Name,sdate) <> 0 then
Call MsgBox()
end if
Next
>>173 ありがとう
途中でメッセージボックス出してファイルの名前だったり中身のデータも取得できた
みんな丁寧に教えてくれてほんとにありがとう
$folder = "c:\Filedate" # yyyymmdd $today = Get-Date -Format "yyyyMMdd" # 日付を含んだ $filter = "*" + $today + "*" $file = ls -File -Path $folder -Filter $filter # 読み込み Get-Content $file PowerShell で書いた。 PowerShell, PowerShell_ise で実行して
修正 Get-Content では、相対パスでは、作業フォルダの場所次第で、動かないことがあるから、 絶対パスにしておいた方が無難 ># 読み込み >Get-Content $file # 読み込み Get-Content $file.FullName
文字列 "平成29年12月18日" をDate型に変換したいのですがどうやればいいですか 教えてくださいお願いします
"平成29年12月32日" のように不適切な日付の場合はアラートを出したいです よろしく教えてくださいよろしくおねがいします
>>140-141 CSVの読み込み時に一律で Split(Line, ",") するのは勧めない。CSVの仕様的に正しくない。
「"」でくくられて「,」を持つフィールドを正しく取得できない。
良い機会だから、トークン切り出しクラスを実装してみたら?スキル上がるよ。
>>165 これくらい単純な事には、Execオブジェクトに dir /a-d /b させて StdOut をもらった方が楽。
ワイルドカードが使えるし。
>>179 「昭和80年」のような場合はどうすんのよ?
>>180 そんなクラス作るくらいならADOでいいよ
execとかは楽かもしれないけど美しくないな
>>182 CSVをmdbあたりに突っ込んでから再度取得する感じ?
>>183 テキストクラスで直だよ
読み出しはDBと同等に出来る
書き込みできないけどね
>>181 NGになって欲しい
なぜならば平成しか来ない想定だから
間違えた。
>>185 は
>>184 ね。
ADO にそんなのあんの?
>>187 テキストドライバがあるよ
ODBCドライバかOLEドライバかACEなんとかで提供されてるはず
VBSは正規表現が使えるから、文字列から数字をパターンマッチで取り出して、 後は、数の範囲を確認する。 西暦や和暦では月は1〜12であることはわかるね。各月の日数は月によって異なる。 カレンダー見ればだいたいわかるね。ただし、うるう年では2月は29日になる。うるう年の判定方法は検索して。 年号はデータを用意するしかない。
>>184 追加はできるんじゃなかったかな
超絶遅いけど
>>186 法律上は
明治45年7月30日と大正元年7月30日は同じ日
大正15年12月25日と昭和元年12月25日は同じ日
だからどちらも入力として受け付けるってことでいいのか?
>>189 日本語で言われても全然わからない
VBScriptランゲージでどうぞよろしくお願いいたします
>>191 平成だけで良いです
明治も大正も昭和も仕様に含めない方向で
>>188 見つかった。こんなのあったのね…。
場合によっては使えるかな…。
>>190 insertは出来なかったはず
insertの変わりに普通にWritelineで追記してた
>>195 うそーうそーうそー
ちょっと明日起きたら試してみる
毎年のことだが、1月は31日あり、2月は28日か29日あり、3月は31日あり、4月は30日あり、5月は31日あり、6月は30日あり、7月は31日あり、 8月は31日あり、9月は30日あり、10月は31日あり、11月は30日あり、12月は31日まである。
>>193 ちうことは…
1. フォーマットに従ってなければはじく。
2. 存在し得る日付かどうかを調べてはじく。
3. 合格したら西暦変換して出力
大体こんな感じ…だけどおまいさんなら楽勝で作れるでしょ。
今日は寝る。
>>194 CSVファイルの読み込みはイレギュラーケースがExcelとテキストドライバーで違ったりしてて
正しいものだけ読めれば良いですってことなら使えるのだろうけれども
Excelと同じ結果を得たいとか、不正なデータがあったらアラート出したいとか
そういう要求があるとパーサこしらえなきゃいけなかったりするんだよね
どこまで細かく見ますかってことになろうかと
>>198 1.は正規表現でイケると思うの
2.はどうやるの?
3.もお願い
以上、よろしくお願いします
>>197 できそうですか!?よろしくお願いします!!
カンマ区切りのCSV よりも、タブ区切りのTSV の方が良い
でも、TSVでも、データ内にタブを使わないように。
タブは、区切り文字のみに使うこと
>>178-179 そもそも、日本の和暦に対応している、OS のAPI があるのかな?
>>202 わからぬ、だがピラフはそれを欲しい、作ってくれるか?
>>199 そこは同意だなぁ。
>>202 APIはあるけどVBScriptからは叩けない。
PowerShellで日付をチェックする
https://lightgauge.net/powershell/3742/ 西暦なら、PowerShell でチェックできる
大昔に、帳票アプリを開発した際は、 和暦年号の始まり・終わりの年月日を、DB (またはファイル)に入れておいて、 新しい年号も、DBへ追加することで、対応できるようにしていた
On Error Resume Next DateValue("平成29年12月18日") Call MsgBox(Err)
>>207 13って表示されました
これは不吉な証拠だと思います
CSVをADODBで読み込んでみようと思ったの 64bitではACCESSの何かをインスコしないダメみたいなの 仕切りが高いと思います
>>210 ごめんこっちだった
https://www.microsoft.com/ja-jp/download/details.aspx?id=13255 再配布可能モジュールだからどこに入れても問題ないけど
AccessDatabaseEngineだからactuallyといえばAccessかも
>>215 以前、おまいさんのコード見たけど、コーディングスタイルが変化してんのな…
>>217 …と来ると思った。
その進歩の無さがこのスレを支えているのかも知れないな。
VBScript は「間違った、VB的な」ハンガリアン記法を敢えて使った方がいい場面があるのだが、まだ分からないのか…。
あと、あれだ。 「面倒だから書かない」と「面倒だけど書くべき」場面の区別が付いてない。 自分だけが使う使い捨てコードならともかく、意志のないコードを人様に見せたらいかんよ。
ま、ネットにコードをアップするくらいならコピペ元のURLを貼ってくれた方がエコなのでそっちを勧める。
間違ったハンガリアンはとてもすごいんだとみんなに使ってもらいたいんだという 強いお気持ちをお持ちになっておられるのが伝わってきました 書かないべき書くべきところの区別が自分はついているんだと 自分ならこれを書くのに自分ならこれを書かないのにという思いを抱いておられることも 痛いほど伝わってきました 記法なんて好きにすればいい人それぞれ違っていいんだと ピラフは思うけれどもそこまで強い思いがあるんだったらみんなに実物を見せるのがいんじゃないかな これが自分が思う最高のコードだとバシーンと出したらいんじゃないかな
ピラフは他人の意見に耳を貸せるような人間じゃないからね
ピラフのコードに言いがかりつけてるだけじゃん? それってただのマウンティングだと思うしゴリラだと思うの こうやったがいいと思うのならそれを出すべきだと思うんだよね ピラフに文句言うんじゃなくて、自分ならこう書くってのを堂々と示すべきだと思う それが本当に良い物ならみんな真似すると思うし有益だと思う たとえ良くないものだったとしても自分の意見を主張したんだから価値あることだよ 他人を貶めてるだけじゃダメ、ゴリラから進化するべき
>>226 いつでもお耳貸すよ、ピラフのかわいいお耳貸したげるよ
賛同するかどうかは別として意見を聞くことは嫌いじゃないよ
自分の意見に賛同しないからこいつはダメだというのは支配者の考え方
北の黒電話さんのやり方
自分はこう書いてるなぜならばこういう目的があってそこにはこういう背景があって
こういう手段を検討したうえでっていうのが意見だと思うんだよね
整然とした論理展開があると説得力を感じるよね
意志のないコードとか人様に見せたらいかんとかはポエムチックな感情の垂れ流しかなと
何か言われればとにかく理屈をこねて茶を濁す、それがピラフ
再配布可能のADODB, Microsoft Access Text Driver を使ったのか SQLite などの無料DB は、使えないの?
>>230 ちょとー男子まじめにVBScript書きなさいよー
それこそ敷居高いだろ お手軽にテキストファイルを扱えるのがいいんだよ もしくはMDBでいい それ以上必要ならVBS使わない方がいい
>>232 そうやってはぐらかし続けているのがいいと思う
>>234 ろくなこと言ってない分際で何抜かしとるんじゃカス
レポートにまとめて提出しろよ精査してやるわ ピラフがーとしか言ってないお前らに論理的な 文章が書けるとは思えんがな
そもそも何を主張したいのかもわからん ピラフが間違ったハンガリアンを使ってないのが 気に入らないだけ?
間違ったハンガリアンを使ってほしいのなら そのメリットを伝えないと、論文書かないと たとえ正しいことを言ってたとしても 説得力がないと宝の持ち腐れ、精神を加速させるんだ 論理を展開するんだストーリーを描くんだよ!
間違ったハンガリアンは間違ってなかったという 夢を思い描く少年 だがそこに立ちはだかるピラフという謎の少女 敵か味方か果たして彼らの結末は……!?
>>243 そもそもピラフってハンガリー料理なわけだが
ピラフは純真貧乳オカッパ少女だぞ 不埒な妄想すんな
これピラフ
>>240 ハンガリアン言ってんのお前だろ?そんなのどうでもいいわ
>>252 間違ったハンガリアン使ったほうがいいってピラフに言ってる人がいたの、どうでもよくないの
↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★
★ 218 :デフォルトの名無しさん [↓] :2017/12/19(火) 22:43:25.21 ID:9NfRyj4O (2/4)
★
>>217 ★ …と来ると思った。
★ その進歩の無さがこのスレを支えているのかも知れないな。
★
★ VBScript は「間違った、VB的な」ハンガリアン記法を敢えて使った方がいい場面があるのだが、まだ分からないのか…。
★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
間違ったハンガリアン記法を敢えて使った方が良いという人が 間違ったハンガリアン記法を敢えて使った最高のコードを出せよとピラフは思うわけ なぜ出せない、それがないから説得力がなくてただのマウンティングゴリラ野郎だってピラフ思っちゃうの
バカがピラフに嫉妬してるだけなんだからそんなに激おこすんなよ
>>255 キモいのはお前だよ
何の罪もない、晒されてる人が可哀想
>>253-254 スルーできてないところを見るとおまえ無邪気キャラ作ってるだろ
>>256 俺はあんまり妬ましい感情は持ち合わせていないよ
ピラフがキチガイなのは同意するけど
>>257 キモいのは完全にお前
ピラフが一番かわいそう
>>259 ピラフのキャラを分析してピラフを悪しざまに言ってる時点で
ピラフに関心を抱いていて気を引こうとしてるのは明らかであり
あなたの行動は嫉妬によるものと判断して良いです。
自分に素直になりましょう。僕は本当はピラフになりたいです!と
大声で叫んだらスッキリすると思いますよ。以上がピラフからのアドバイスです。
参考になりましたら幸いです。
>>259 じゃあそのレスから湧きだしてるドス黒い感情は何なの?やっぱお前キモいわw
>>264 ドス黒い感情がピラフの上品なレスから湧き出すわけがないので
あなたの妄想によるものと思料されるわけです。キモいのはお前。
キモいって言ってたからピラフのことだと思っちゃったの、てっきり!
ピラフなので連投で応戦し余裕の無さを見せつけてしまいます
>>262 アドバイス?他人のアドバイスを聞かないような奴がなにを?
>>270 なんのアドバイスしたの?
それ伝わってないよ
間違ったハンガリアンを使えというアドバイスか? 記法なんてそれあなたがそう思ってるだけですよねでしかないからな
>>262 アドバイスなんぞ、あなたがそう思ってるだけですよでしかないそうで。
>>274 知らねえよ、アドバイス聞かないって言ってたから
そういう経験があると思ったけど、自分のことを
人に聞くな
>>276 アドバイスを聞かないのはいつものピラフだよ
>>275 俺が言ったのは間違ったハンガリアンについてな
お前はそれをアドバイス全般に汎化したわけだけど
汎化できるものなのかな?よく考えてみて
>>277 なんのアドバイスをしたの?
その根拠を聞かないことには判断できんな
>>280 間違ったハンガリアン記法と262の可換性について
説明できなくない?
>>281 だって全般に汎化したといったのはお前だもの
>>283 アドバイスなんぞ、〜そうで
というふうにアドバイスを主語にして
誰かがそう言ったという伝聞形式で言った
わけだから、しらを切るのは難しいかと
100歳まで生きる人間が存在することと すべての人間が100歳まで生きること は違うわけで、分かっててやってるならただのクズだけど 本当にわからずにやってるなら論理学の入門書を読むのが良いよ
どっちかというと ID:6K1dx/3N の方がいぢめたくなるタイプだけどなw というか完全にいぢめられっ子だろコイツw
ハンガリアンって意味無いよな ちゃんと変数名付けてりゃ型なんて想像つくだろ
西暦2017年、IDEの進化によりハンガリアン記法は滅亡の危機に瀕していた だが旧態依然としたVBScriptの開発環境と救世主ピラフによりハンガリアン記法は息を吹き返した かに見えた
ちゃんと変数名が書けてないケースが多数だから、ハンガリアンにしてくれってことだと思うが。 ちゃんと書けてれば問題無いかもしれんが、ちゃんと書ける奴でもちゃんと書けるという信用を勝ち得ていなければ仕方ないな。
fso_ fso_folder fso_file とかにしとけばいい変数をわざわざ objFso objFolder objFile とか書いてる人は何考えてんだろと思うよな
上みたいなコード書いたサンプルなんてどこにも無いだろ
>>298 合ってるだろ?
FileSystemObjectにFolderオブジェクトにFileオブジェクトだ
Folder, Fileはfsoオブジェクトではない。
そもそも上も下もイラン fso file folder で十分でしょ? これらの名前でオブジェクトじゃないことがあり得るの?
>>301 fileにファイル名、foloderにフォルダ名の文字列型とか。
そもそも、ハンガリアン記法はオブジェクト指向が導入されて
型名が多くなりすぎて破たんしたんだが。
それに、今はIDEを使う環境だとIDEが超優秀なので
ハンガリアンを使う意味が全くない。
>>30 ファイル名ならfileNameだろ
そんな変数の付け方するやつは殺せ
file
fileName
fileCreatedDate
とかでつけた方が読みやすい
まあこれもハンガリアン的ではあるが
とにかくシステムハンガリアンはクソ
>>303 >そんな変数の付け方するやつは殺せ
オレを大量殺人者にしたいのかw
>>304 安価ミスったわ
ネットのサンプルとか見てもぶち殺したくなる変数名ばっかで萎えるわ
同僚もシステムハンガリアン信奉者でしんどい
VBScriptはIDEのサポートが無いのでハンガリアンなんだろうね。 オブジェクト型だけobjかoでも付けとけば良いと思う。
実際、コード読むとハンガリアンの方が理解しやすい。 先に出たファイル名の文字列かオブジェクトかといったもろもろ含めるときちんと変数名を付けられてる奴なんて殆どいない。 書ける奴ほどそんなこと分かってるから変数名付けるのに凄く悩むし、ハンガリアン批判もしないと思うんだが。
>>307 あのさ
例えばfileで文字列だったらだよ?
パスなの?名前なの?わかる?
だからfileNameとかfilePathとか言う変数名をつけるの
この変数名ならオブジェクトや数値と言うことはあり得ないからね
システムハンガリアン使いはこういうのサボる口実にしてるだけなんだわ
VS Code の拡張機能(Market Place)に、幾つかのvbs プラグインがあるけど
【Microsoft Tech Summit】APP017 PowerShellの新しい相棒 Visual Studio Code
VIDEO 2017/01/23 に公開された動画
>>309 現実はやたら略す人間がいるから、そう簡単ではない。
変数名と実体が異なる場合や、論理名の日本語とまったく異なる命名をする人間もいる。
>>309 VB系の悪いところはObject型を推奨しているところ。
マイクロソフトのライブラリそのものだって型が想像できないものだらけ。
今年もよろしくってのは2017年の事だよね。 ピラフに「よろしく」するのは1,2日で十分だ。
本来のハンガリアン記法は「用途」を書くという考えだった。型名を書くなんぞ発想じゃねえ。 型が変われば全部修正とかありねー。 「敢えて」つったところは。 VBScript ではオブジェクト型は代入で差別的に「Set」しなきゃならんだろ? 文法的に差別されている以上、後で読む人のために「obj」とか付けとくんだよ!!これは自分自身のためでもある。 Date型にも同様な問題は付いて回るが、「〜Date」とか「〜Time」とか付けることにしとけばいいと思う。 普通に代入できるし、特別なリテラルがある分「おたく、VBScript 書けるの?書けるなら、普通わかるよね?」という強要ができる部分がある。(当社比) だがオブジェクト型、てめーだけは用途が多岐にわたる分、駄目だ。 ということが分からんって何なのだろうか? あと、「『面倒だから書かない』と『面倒だけど書くべき』場面」についてだが。 理由は同じ。 「拡張性」 「後から読む人(自分を含む)のため」 こういうことは中学生とか高校生とかで小論文書かされたら大体分かる。 分からんならその程度の脳みそってことさ。
>>322 差別とか言う言葉を使うな
それよりピラフはクリスマスに婿入りでもしたのか。
新幹線が自壊した頃だな。
うちの親が俺のパソコンを中古屋に出した日でもある。
ピラフのこと日記に書いてたから殺しに行った可能性あるな。
でも、翌日は珍しく一日に何度もうちに来てるんだよな。
何かを確認しに来たのかな。
ピラフ良い奴だったな。 居なくなると寂しいもんだ。 きっと向こうでもVBScript書いてるんだろうね。
ピラフが復活するまで俺はパンツをはかないことにした
社内システムのWindowsサーバーでのバッチ処理運用を任されることになった 開発会社から運用手順を引き継いでみると、サーバーにログインして 30個くらいのバッチファイルを手で順にぽちぽちと実行していく原始的なものだった 途中にディレクトリ移動やメッセージ確認などの手順も含まれている とても手ではやっていられないという印象を受けたので、自動化を検討したい ・VBSのGUIで指定したバッチファイルを順次コマンドウィンドウへ流す ・コマンドウィンドウに吐き出されたバッチファイルの結果メッセージを監視し、 エラー文字列が含まれていたら警告ウィンドウを出して実行中止 ・・・というようなスクリプトを組みたいのだが、VBSで実現可能だろうか? ちなみにバッチファイルとVBAについてはいくらか知識があるが、VBSは未経験
Ruby, PowerShell もある サーバーなのに、GUI は無理でしょ?
>>331 1988年から時空を越えたレスなのか?
今は2018年だぞ。
>>332 サーバーはディスプレイ・キーボード・マウスを装備しているからGUI操作可能
ていうか直接サーバーを操作する想定でシステム構築したそうだ
RubyもPowerShellも経験がなく、自分に扱えそうなのはVBAに似ているVBSくらいだと思う
>>333 何かおかしいかな?
先週引き継ぎ会があったばかりで困っているのだ
>>334 VBSのGUIなんてないけど
htaなら出来るが、いろいろと面倒かも
>>334 ああ、MessageboxとInputboxならあるか
>>334 まぁバッチ流すだけなら簡単にできると思うが
基本的にVBA解るなら簡単でしょ
>>331 一番重要な情報が抜けている。
その30個ほどのバッチファイルの実行パターンは何種類かで固定か?
「時と場合によって様々に変わる」というならそもそも自動化する意味がほとんど無い。
>>335 あちゃー
VBSにはVBAのようなユーザーフォームってないんだっけ?
各バッチファイルの実行ボタンと、正常終了・異常終了を表示する
テキストボックスを備えたGUIを妄想していたが無理か・・・
あと
>>331 に書いたとおり、各バッチファイルの標準出力に
エラー文字列が含まれていればオペレータに警告して実行を中断したい
バッチファイルには荷が重いのではないか
>>339 実行パターンは完全固定。ただし以下の特殊要因があり、なおさら実行支援手段が欲しい
・バッチファイル名に続けて引数文字列(その回ごとに全バッチファイル共通)を入力要
・途中で実行を休み、データ転送のWindowsアプリ操作を挟む必要あり
>>340 標準出力のエラー判定がどの言語で作ってもネックになりそうだね。
ちゃんとしたアプリだと戻り値(errorlevel)にゼロ以外の値を返してるんじゃないの?
エラーも標準出力ではなくて標準エラー出力だろうし。
まぁ、実行を手動で30個のバッチにするようなアフォSIerだと
望むべくもないか
>>340 フォームはhtmlの知識あれば、htaでいけるよ
標準出力のメッセージでエラー判定はキツいね
一応Execなら近いこと出来るけど、元のバッチファイルから書き換えた方が早いかな
と言っても、人の作ったバッチファイル理解するのも大変だけどね
がんばってとしか言えないな
>>341 ERRORLEVELはセットしていないそうだ
>>342 UIはそれでやるしかなさそうだね
>>343 納品物に手を入れるとサポートを受けられなくなるので、バッチファイルの修正は避けたい
Execについてマイクロソフトのドキュメントを調べてきた
Wscriptオブジェクトを作りExecメソッドでコマンドを実行すると
StdOutプロパティに標準出力が入ることを利用し、
InStr(object.StdOut.ReadAll, 文字列) > 0 のような判定をすれば行けるのかも
ほんとはJP/1のような運用支援ソフトを使うべきなんだろうけど、
そういう直接の利益を生まないものに予算が下りにくい会社なので・・・
ともかく頑張ってみるわサンクス
>>344 戻り値をセットしてないなんて酷いプログラムだな。
BAT処理でも標準出力の文字列検索は出来るので何とかなるかもね。
いtったい何処のベンダーが作ったら30個のバッチを手動で走らせるような仕様になるのかと。
普通は自動化してボタン一発で実行とかタスクスケジューラで実行させるけどねぇ。。
低レベル過ぎるデベさんだね〜
Grunt, Gulp などの、JavaScript の、Task Runner じゃないの? 他には、Jenkins とか
Rubyではパイプラインで、サブプロセスを実行し、結果を受け取れる。 例えば下は、メモ帳の実行ファイルの場所を探す resText = "" IO.popen("where notepad") { |io| resText = io.read } puts resText 出力結果 C:\Windows\System32\notepad.exe C:\Windows\notepad.exe
>>344 > InStr(object.StdOut.ReadAll, 文字列) > 0 のような判定をすれば行けるのかも
アホの子か?小学生から出直ししてこい。
1. 30個ほどのバッチファイルを定型処理
⇒ フツーにバッチでラップすりゃあいいだろ。引数取れるし。
2. > ・途中で実行を休み、データ転送のWindowsアプリ操作を挟む必要あり
⇒ 意味不明…まさかFTPとかで送信してまた受信を待つとか??ハァ??
クソバッチを全部捨てて自分で作るな。俺なら。
このようにしてまた仕様と言う名のバグが産み出されそびえ立つクソになって行くのです こんなときピラフがいてくれたらなあ
>>349 修正
>IO.popen("where notepad") { |io| resText = io.read }
# 標準エラー出力を、子プロセス側で標準出力にリダイレクトする
# 標準エラー出力と標準出力がマージされる
IO.popen( "where notepad", :err=>[:child, :out] ) { |io| resText = io.read }
>>351 ,、,, ,、,, ,, ,, _,,;' '" '' ゛''" ゛' ';;,, (rヽ,;''"""''゛゛゛'';, ノr) ,;'゛ i _ 、_ iヽ゛';, そんなこと言われても ,;'" ''| ヽ・〉 〈・ノ |゙゛ `';, どうすりゃいいのさ ,;'' "| ▼ |゙゛ `';, ,;'' ヽ_人_ / ,;'_ /シ、 ヽ⌒⌒ / リ \ | "r,, `"'''゙´ ,,ミ゛ | / / リ、 ,リ l l . __l l_.[] _゛r、ノ,,r"__/_/__ \, ´-'ヽ ヾ_ノ | | |__ コロ・・・・ _____\ コロ・・・・ ()__)」 >>328 パンツは履きなさいよ紳士淑女の嗜みとして
インフルエンザが猛威を奮っているらしいから
仮にノーパンがデフォの生粋の変態だとしても日本社会を病魔から
守るためにパンツは履くべきだし腹巻きを巻くべきだよ
参考までに
>>352 スーパーハカーといえば日本最大手の仮想通貨取引所であるコインチェックが
お金盗まれたらしいじゃん、まああいつは四天王の中でも最強...
Excelで管理してればこんなことにはならなかったのにね
>>353 いいか、ここはVBScriptのスレだ
お前が書いてるのはRubyだ
悪くない続け給え
>>344 似たような経験あるよ
処理が失敗しても正常終了するプログラムがあって
処理が成功したときのみ後続のプログラムを動かしたいってこと
処理が成功したときはログファイルに"success"って文字が出力される
仕様だったからプログラムの実行が終わったあとに
ログファイルをgrepして判断するようにした
前日のログを拾わないように今回分のみ出力されるログファイルと
永続的に出力されるログファイルを分けた
シェルスクリプトから呼び出すことを前提にしたプログラムなのに
処理が失敗して正常終了するなんて正気の沙汰じゃないと思った
リターンコードで判別できると超楽チンなのにね
フレームワークとか共通ライブラリとか自分で手を入れられないものが
そういう仕様だとあれだよね、ほんとあれだよ
ピラフが居ないと寂しいが居たら居たでウザイわ〜www
>>358 そういう場合でも何とかする技術はあれこれあるけど
あれ?ピラフってgrepとか知ってるような奴だったっけ?
…こいつは臭いぜ…。偽物くさい…。
ピラフ復活しとるな これでまた俺もパンツをはいたサルにもどれるw
ピラフの居ないこのスレなんて卵とご飯とラードとネギと焼き豚と塩コショウの入ってないチャーハンみたいなもんさ。
Rubyistの人いるー?
エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd これどう?このお題Rubyならどう解く?
VBScriptで解ける人なんて絶対居ないよ できるものならやってみろって心底思うよ
ピラフキャラ変わった? なんか俺の知ってるピラフじゃない パラレルワールドに来てしまったのか俺は?
>>371 ピラフは出来もしない分際でイキってる人が大嫌いだからね
遅延読み込み・無限ストリームとかは、Elixir かな?
>>369 おらさっさとやれやゴミ
逃げんじゃねえよ
問題も解けない話題も提供できない 頭の悪いコミュ障が偉そうにすんな
自分が出した問いかけには回答が貰えて当然と考え 無視されたり答えてもらえないと相手を無能扱い 昔からのピラフそのものじゃないか 何も変わってない(成長していない)と思うが
課題をこなす実力もないし 他人の批判ばかりで話題もないクソ雑魚が
このスレはピラフのためのピラフのスレ 今時、VBScriptなんてピラフ以外は使わない
>>380 証拠もないのに適当なこと言わないで頂きたい
>>390 それでは面接を始めます
いろんな問題があるなかでなぜこの問題に
挑戦しようと思いましたか? 解答の動機を教えてください
__ヾ:.vz __ , . : : : : : : : : : : :\ 7: : : : : : : : : : : : : : : `ヽ /. : : : : : : : : : : : : : : : : :〈 7.: :/: : : : : 从ハ: : : _: : { ≧:}レノイ'´ `゙` }rく /.::}从>=、__彡==ミr゙ .':.\ /.::::::∧ミ乂__.ノ⌒ゝ. __ノノイ.::::::. \ ,..:::´::::::::::::::::::ハ 厶_ji_ 〃::::::::::::::::.`:::.、 /.:::::::::::::::::::::::::::>'´rー==ミ:、':::::::::::::::::::::::::::::::\ /.::::::::::::::::::::::::> ´  ̄ ̄ミz ` <:::::::::::::::::::::::::::. ,:::::::::::::::::::::::/ r彡´二ユ `ヽ::::::::::::::::::::::, ,::::::::::::::::::::::∧ r<::〉> ´ <=ミ ∧::::::::::::::::::::,
>>394 すみません、炭鉱の仕事が忙しいから、そちらでは働きません。
>>381 こいつは何か言われればそれが面白くないからね
rubyの話を咎めたのになぜかvbsの提示にすり替わってるし
反省もしない向上もしないそれがピッコロ
ピッコロ フルート タンバリン シンバル あっ・・・
とりあえず枯れた花束は受け取ったけど、すぐに焼却処分が決まった。
>>403 あるじゃーのんか
>>398 まるで将棋だな
もとい、まるで女だな。
Windows10 Home で、WSL(Windows Subsystem for Linux)正式版を簡単に導入できた MS Store から簡単に、Ubuntu 16.04 をダウンロードできた。 サイズは、200MB ほど パッケージマネージャーで、Ruby 2.3 も簡単にインストールできた ただ、Linux を使って、やる事がない
ピラフは暗黒麺に堕ちダース・ピラフとなった もう米粒ではないイカ墨ピラフだ
/.⌒ヽ / ..\ ../ ヽ. \ / ̄ ̄\ (./ .ヽ. ) / \ / l" |:::::: | .ノ l . |::::::::::: | | ─ ─ .::| |:::::::::::::: | .| (●) (●) .:::::| . |:::::::::::::: } | (__人__) ..:::::::| . ヽ:::::::::::::: } ヽ.._ ` ⌒´ _,ノ ヽ:::::::::: ノ | \ /:::::::::::: く | | | | -―――――|:::::::::::::::: \――┴┴――――-┴┴――
この題材あんまりおもしろくないよな よって自分でやれ
>>411 できてからいいなよ、ゆえにお前がやるんだよ
炭鉱で働きながら問題解いた人もいるんですよ、甘えるな!
>>414 やってから言いなよ
この問題解いたら圧倒的な充実感に満たされて
文句言う気もなくすから
>>416 それとこれとは話がちがうだろ
ちーがーうーだーろー
仮に完璧なコード出したところで、糞どうでもいいようなレスしてはいおしまいなんだよね レスは必ず付けるんだよ、なぜならこいつにとってはレスバトルでの敗北を意味するから
>>419 完璧なコード出してから言いなよ
言い訳ばかりで見苦しいよ、やらない理由を考えるより
できる方法を考えよう、前に進もう
手前で勝手にやってろってんだよ お前のコード出せは「俺様に意見するな」に過ぎない
>>421 一緒にやろうよ、どうしてそんなに強情なのさ
延々と繰り返して持久戦に持ち込むつもりかな これぞピッコロ 成長などするわけない
>>423 人のこと言える立場じゃないじゃん、完璧なコード出してないくせに
完璧なコード出してくれたらポポももっと成長しなきゃって思えるけど 出してないじゃん
何でこれがvbsで解けないと思うんだ? 単純な計算やん
>>426 解けることは炭鉱の人が示したよ、VBScriptで解けるよ
じゃあ炭鉱の人とは別の解を示してよ
単純だって言うくらいならできるでしょ
見栄張ってないことを証明して
>>424 言ったそばからそれかよ
そろそろ取り巻きを装って発狂しねえかな
意見をすればコード出せ コードを出せばあっそ、よかったね こいつの頭の中など見え透いてる
ああ、解けることは納得してんのか 別解が欲しいだけ?
>>430 それだけじゃないけどとりあえず別解示して
>>431 取りあえず何かレスしないと気が済まない?
だったらお前がまず黙っててみろよ
>>433 いまポポが集中してるところでしょうが!!
>>390 に対して
>>394 だもんね
舐めくさってないかこのバカは
>>435 でもさあよくあるじゃん
是非うちで働きませんかと誘っておいて
出向いていったら弊社を志望した動機を教えてくださいって手合い
てめえが誘ってきたんだろうがという状況ですよ
なかなかおもしろいと思うんだよね
ユーモア理解してもらえると思ったんだけど
>>432 いきなりコードを出せってなんだw
お前は一体何を議論したいんだよ
そんな弁解で正当化しようとしてんの?どうしようもないクズだね
>>439 ユーモアを理解せずコードも出せないお前の方がどうしようもないクズだよ
>>438 そういえばラピュタに出てくる親方も炭鉱夫じゃん
片山さんのことをラピュタのおっさんと呼ぶべきか
親方と呼ぶべきか迷うよね、まずそこから議論しよう
>>426 の人は単純な計算やんと関西弁まで使って大見栄きったんだから
別解示すことくらい朝飯前だと思うんで朝ごはんのおかずにしようと思うから
別解示してほしいの
>>440 手前の不届きをユーモアだとかほんとクズだよね
これぞピッコロ、反省などできるわけありません
さらには意見されたことが許せないのでいつも通りのコード出せ なりふり構っている余裕などありません
でもちょっと静かにして欲しい寝てる人もいるんで時間考えて 頑張りたい気持ちはわかるから
寝てる人間がスレ見てうるさいなんて思うわけないだろ そんな舐め腐った態度でコードを提示してくれるお人好しなんてまずいないよ
そろそろ護衛してくれる取り巻きさんたち出てきてもいい頃じゃないの?
頑張り屋さんうざいな 実のあること何も言ってないし NGにしよ
>>442 一番単純で素直な方法はなもう示されてるじゃないか。何故別解が欲しいのか?
お前は何の考えもなく、何か刺激を受けるコードに出会いたいだけだろ。
自分の考えを言葉にすることもできない無能が偉そうな事を言うな
何これ? ピラフの中の人面倒くさくなって別人格作ったのか?
暗黒面に堕ち、ダース・ピラフ卿となったピラフには死を
コード書けなくてピラフにバカにされまくってるお前ら哀れw
ははぁ。 「100bitのビット列を生成する。パターンは2^100通り」 「その中で、『1が10連続するパターンに一度でもマッチする』のは何通りか」 というお題だな。 そういう意味でコテのおっさん達は失格。 おっさん達の人格がアレとしてこのお題、ちょっと難しい。 強引にやれば解けるのは自明だけど。 元のブログの著者が「知り合いの数学者に『エレガントに』解いてもらった」てのが分からないなぁ。 紙上でサクッと出せるもんなんだろうか…。俺は思いつかない。
ぽぽちゃん
>>462 これ、Rubyでよろ
エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd Rubyはスレ違いだろ? VBSにこだわらず好き放題やりたいならそういうすれ立てろよ
じゃあなんですか、スレ違いの発言しちゃいけないとでも言うんですか
Rubyというメガネを通してVBScriptを見ることで初めて見えるものってあると思う そういうのを大切にしていきたい
サバサバしてる方が良いわけ? それベッドの上でも言える? そこんとこよく考えて発言していただきたい
>ピラフは、VBからはじめたので、Cのポインタのプログラムは、 > 組めないですが、まぁ、CASLのLEAとLDで組むようなものでしょうか。 >たとえば、自分が、マンガを読むとき、マンガの棚には、目的のマンガの本が > あります。 > 現実は、あまくないです。マンガは、ないので、本屋にいって金で買い増す。 >さらに、さがせば、ポインタのポインタのようなもの・。 > 自分が辞書でことばの意味を調べることに似ていますが、 >ピラフは、20代でマンガをかったのは、10冊もないでしょう。 >クソバカ片山を辞書でひいても、のっていません。 >そんなのは、あたりまえで、ピラフは、辞書は、ひいていません。 > >それでわ。
>>472 ここはベッドの上でもないしピラフが好き勝手に振る舞えるところでもないよ(他の人なら可)
>>473 なにこの怪文書
大丈夫なの? お薬飲んだ?
>>475 つまらない煽りにも漏れなくレスしてしまうほど余裕がないんだろうね
>天才白白のおめざめですぅー!! > 今週は、なんとか代休とれそうですぅ!! >それまで、こつこつゲーム制作ですぅ!! > 今日は、ザコ編隊飛行のアニメパターンと >美少女CGの完成がメインですぅ!! >どんなのができるというわけなのかなぁー!! >まようというわけなのかなぁー!! > 人間ねぼけようかなぁー!! > >うわぁーーい!! > > ______ _______ > / __ ____) > V / でわですぅ!! / //// > v( ^ー^)v <____________________) > | 白白 | > O O
>Rubyistの人いるー?
>
>エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
>
http://note.mu/issei_y/n/n882e9f77e8bd >
>これどう?このお題Rubyならどう解く?
再起動したときにメールを送信するものを作っています
http://www.atmarkit.co.jp/ait/articles/0405/22/news017.html これを参考に以下にようにしてみたのですが
★転送においてサーバーに接続できませんでした。
と表示されます
★[安全性の低いアプリの許可:有効] をgmail上で設定しています
問題点がありましたらご指摘ください
Set oMsg = CreateObject("CDO.Message")
oMsg.From = "
[email protected] "
oMsg.To = "
[email protected] "
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
再起動したときにメールを送信するものを作っています
http://www.atmarkit.co.jp/ait/articles/0405/22/news017.html これを参考に以下にようにしてみたのですが
★転送においてサーバーに接続できませんでした。
と表示されます
★[安全性の低いアプリの許可:有効] をgmail上で設定しています
問題点がありましたらご指摘ください
Set oMsg = CreateObject("CDO.Message")
oMsg.From = "
[email protected] "
oMsg.To = "
[email protected] "
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
>>483 認証の情報が必要なんじゃないかと
↓こちらでどう?
VBScriptのCDO.MessageでGmailアカウントを使用したメール送信
http://itmemo.net-luck.com/vbscript-mail/ >>484 ありがとうございます
この方法でメールを送ることはできました
あとは自分でPC起動時に自動で実行できるかテストしてみます
ありがとうございました
ご査収ください 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
vbs単体でストップウォッチみたいなの作るのって不可能? msgboxじゃ処理止まるしなあ。 複数ファイルを非同期で走らせるとか、hta使うかしないと無理かな。 powershell では作れそうだが。
開始の時刻を記録して 入力があった時刻を記録して 差を計算すれば良いような 何をやりたいのかよくわからんが
>>488 無理矢理やるならpopupがある
実用になるかは知らないけど
>>489 時間計測は出来るけど、それを例えば1秒毎に表示を更新してカウントダウンみたいなのをやる方法が分からなくて。
>>490 ポップアップってのがあるのか。けど閉じたり開いたりするのはちょっとうざったいなあ
>>491 キャリッジリターン(CR)コードを使えば、コンソールで一行更新できる。
>>492 それじゃ単なる時計だよ
ストップウォッチだからスタートはいいとしてストップボタン(ボタンでなくてもいいけど)をどうするかが問題
標準だとHTAが無難だと思う
>>492 なるほど、もう少し詳しく教えてください。
ストップウォッチと書いたけれど、それでやりたいことは実装できそう。
vbsダブルクリックからコンソールに出力はどうすれば?
>>494 ショートカットでcscriptから起動するようにすれば、コンソールが出てくる。
>>494 cscript.exeで起動して、
wscript.echo time & vbcr
を送り返すでいいのかな
>>494 一行更新は出来ないね
後カウントダウンは出来るけど、キー入力できないので停止が出来ない
何がしたいかはっきりしないのでなんとも言えないけど、GUI欲しいなら素直にhtaで書いた方がいいと思う
行更新できないのか。。。すまぬ。cscriptがちょっと悪さしてるのかな?
>>499 何だろうね
echoってwritelineと同じかもと思ってstdout.writeでやってみたけど、横に繋がるだけで一行更新は出来ないみたい
みなさんありがとうございます。 具体的に言うと、測定機器があってその出力結果の処理に既にvbsを使っています(ドラッグ&ドロップが凄く便利)。 でその前の測定のときに時間を計測する必要があるのですが、いつもスマホのタイマーやストップウォッチを使っているので、そのvbsに機能を付加できないかと思った次第です。 htaもいいのですがファイルが2つになるので、できれば一つで実現出来ないかなと。
>>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
Ruby でも、ストップウォッチは困る Rubyから、Selenium WebDriver で、わざわざ、ブラウザを起動して、 jQuery で操作してるのは、漏れぐらいかw 何をやっているのか、よく分からない
vbCRで行更新は問題なかったが、WScript.Echoが最後に改行する問題があるようだ。 WScript.Echo "aa" & vbCR & "ab"
これでOK。 Dim fso, conout Set fso = CreateObject("Scripting.FileSystemObject") Set conout = fso.CreateTextFile("CONOUT$") conout.Write vbCr & "TEST1" conout.Write vbCr & "TEST2" conout.Close
>>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")
Call WScript.StdOut.Write(vbCr & "hoge") Call WScript.StdOut.Write(vbCr & "fuga") これで普通にできたわワロス
>>505 じゃあこれ、Rubyでよろ
エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd >>504 カウントダウンタイマーとストップウォッチの区別もつかない人は絡んでくるなよ...
いやみなさん参考になりました。 cscriptからの実行で最低限の欲しい機能は実装できそうです。 それ以上望むときはhtaなど使ってみます。 どうもありがとうございました。
>>512 本人がタイマーって書いてるだろ
オマエこそ絡んでくるな
>>499 ごめんなさい
vbsedit上で試してた…
cmdでやったら普通にいけました
じゃVBSでwebsocketはできる? と、むちゃぶりをしてみる
>>518 winsock ocxはCOMだから使えるだろ
>>519 ocx は基本 VBScript からは使えない。
>>520 VBScript から WinSock を使おうとするとオブジェクトは作れても上手く動かない。
ocx は画面の部品だから VBScript から使えなくても仕方がない。
また、使えたとしても VBScript から操るのはライセンス違反にあたるんだよなぁ。
ググれば分かるよ。
>>522 Wscript.CreateObjectでインスタンスを作ると使えるらしいが。
mswinsock.ocxの単体配布はライセンス違反だがvbのダミーアプリを作って配布は大丈夫なのでは?
あ、Mswinsck.ocx をラップしたような COM を作ってる人は世界にいっぱいいる。 それでいいんじゃないかな。
>>524 >ちなみに、PowerShell なら好きなポートから TCP し放題。
でもセキュリティがお面倒なんでそ?
みなさん、教えてください VBScript逆引き大全500の極意 という本を買いました vbsからエクセルを操作するやり方が たくさん出ていて買ってよかったです そこで疑問が エクセル操作は、この本に出てる ことしかできないのでしょうか? それとも、できることはもっと あるけど本では一部しか載ってない のでしょうか?
>>527 もっと出来るね
DLLいじる以外はVBAとほとんど同じ事ができるよう
ありがとうございます 「 excel.application やりたいこと 」 で検索してみます
いまさらVBScriptを使おうとする理由はなんなんだ?
VBScript以外の言語を使う人は結局イキってるだけ
俺もVBScript単体またはVBScriptとバッチファイルの併用じゃないとできない事が多い
PowerShellのセキュリティ制限が緩かったらVbscriptもbatも絶滅してたかもね
仕事用に、htaで簡単な押しボタン式ツールを 作ってみんなに使ってもらってるんです いつまで使えるか不安ですが
もうwshスレも落ちてるんだな、ここも早く楽になれよw
WPF? グーグル先生に聞きましたが よくわかりませんでした HTAとVBSって、ホント人気ないですね 会社でちょろっとしたツールを 作るには最適だと思うんですが
VBSの貧弱な機能に絶望してPowerShellを勉強してみたが =じゃなくて-eqだとか、大昔のUNIXに載ってたB-shellかよと再絶望した VBSを捨てて一から設計したスクリプト環境がこれではゲイツも浮かばれんわ
>>541 理由はあったみたいだけど、不等号の表現は失敗だと思う。直観で分かりにくいよな。
>>539 wpfはグーグル先生じゃなくてかずき大先生だろ?
>>542 別に = の代わりに -eq 程度は FORTRAN の .EQ. FORTRAN eq
シェルスクリプト、PowerShell、VBS の次のレベルは、Ruby Windows でも、ファイル・テキスト処理に問題ない
>>545 じゃあこれ、Rubyでよろ
エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd >>534 じゃあこれ、PowerShellでよろ
エレガントな解法、エレファントな解法 〜モンテカルロ法を添えて〜
https://note.mu/issei_y/n/n882e9f77e8bd Rubyなら
>>455 にあるやろ
というかただ別言語に書き下すだけで解いたことになるんだろうか
工夫の余地もほとんどないし
https://pastebin.com/gbLdzrqq >>550 ピラフにはイギリス人の血が混じっているので収集癖があります
いわば大英博物館もピラフに流れている血のおかげで建っていると言っても過言ではないわけです
>>551 それがビューティフルだと思って書いたわけ?
なにも考えず書き写すだけじゃ意味ないよね
もっと工夫できるよね、ちゃんとやって
君たちの潜在能力はそんなものじゃない もっと工夫できるし、もっとビューティフルなコードに辿り着ける もっとやれるよ
言語の特徴もそう、Rubyらしいプログラム、PowerShellらしいプログラムがある Rubyの特徴っていうのは便利な関数がたくさん用意されていて 簡単な文法がたくさん用意されていてラムダ式も簡単に書くことができて ストリームの処理もお手の物でPowerShellはとにかく頑張ってる そういう言語の特徴をとらえた上でその言語らしいコードを書くのが スタイリッシュだと思うしビューティフルでブリティッシュだと思う
それじゃあ勝負しましょうよ Cドライブ以下(サブディレクトリ含む)のすべてのファイルの ファイル名とファイルサイズをテキストファイルに出力するの PowerShellとVBScriptでどっちが速いか勝負しましょうよ
ピラフがプロジェクトマネージャやるから
>>550 VBScriptのコードよろしくお願いします
>>551 PowerShellのコードよろしくお願いします
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
>>552 ピラフはキリギリスの血が混じっていているのか
只者ではないと思っていたが昆虫から進化していたのか
>>559 やるじゃん、こういうのサクッと書けるのがRubyの強みだよね
>>560 オメーのその早とちりなところピラフ嫌いじゃない
>>557 こんなんでいいの?工夫もクソも無いけど
ls 'C:\Users\Owner\Documents\' -rec -file | select Name,Length | Export-Csv .\hoge.txt -e UTF8 -not
>>563 ピラフは焼き鳥か
ということはレプティリアン
キモいわ
>>574 ちょっと待てピラフキモいのか?
ピラフキモくないと思ってたから
ピラフキモいみたいな言われ方すると
ピラフ傷つくんですけど、ところで焼き鳥って美味しいよね
ときどき無性に食べたくなる、ねぎまが最高だよ
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
>>575 ピラフがキモいのじゃなくて
キモいのがピラフ
>>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
“なりすまし万引きGメン”を再逮捕 女児の弱みにつけ込みわいせつ行為 奈良県警2018.3.19 19:13 弱みにつけ込み、女児にわいせつな行為をしたとして、奈良県警郡山署は19日、強制わいせつ容疑で、東京都日野市高幡、会社員、藤井裕久被告(48)=強要罪で起訴=を再逮捕した。容疑を否認している。 再逮捕容疑は昨年12月17日午後3時45分ごろ、大阪市天王寺区の小学6年生の女児(12)に対し、女児の自宅玄関前で首筋に両手を回して抱きつき、背中をなで回すなどのわいせつ行為をしたとしている。 同署によると、藤井容疑者は同区の中古本販売店で、少女向けの本棚に陳列されている本と本の間に千円札1枚をはさみ、女児が持ち帰る様子を観察。店外に出たところで身分証明書を求め、さらに住所や電話番号を聞いた上で、女児の自宅まで押しかけて犯行に及んでいた。 藤井容疑者は今年2月、同県大和郡山市の中学1年生の女子生徒(13)に対しても、同様の手口で名前などを聞いたとして強要容疑で逮捕されていた。同署は余罪を調べている。
>>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
>>588 VBSじゃ出来ないって言ってたのはお前だろ
ほんとバカだな
>>591 じゃあVBScriptでできるんですかー? 証明できるんですかー? おーん?
お友達582が出てきてくれてさぞ安心してんだろうな おーん?(笑)
コードを出してもらっても、その内容には一切の言及なし おーん?(笑)
ピラフ大王の実力は、すごいからな 漏れは、かなり分析したから、 骨身にしみて、よく知ってるw
>>594 VBScriptでできないんですかー? おーんおーんおーん?
ピラフ大王のソースコードは、芸術性が高い もし、大王が「たのしいRuby 第5版、2016」を読んだら、 スクリプトにかけては、天下無双になる!
>>597 これぞ統合失調症
出来ないって言ってたのはお前だよな、と何回ループさせれば気がすむのかな
>>599 じゃあお前はVBScriptでできると思ってるわけ?
思ってないわけ? そこんとこハッキリさせようよ
思ってないんだったらピラフに同意することになるし
思ってるんだったら証明して見せろよ
どっちを選択しても俺様の勝利、としたいだけだろ(笑) 見え透いてるんだよ
まさかと思うけどこいつホントにVBSじゃできないと思ってるのか?
教えを乞う側の振る舞いじゃないよな 立場をわきまえろよ お前の指図など受けるわけないだろう
結局できないんじゃん、偉そうなことばっか言ってるくせに結局できないんじゃん 身の程を弁えて発言して欲しいよ、最初からピラフが言ってたじゃんVBScriptでは できないことはないだろうけれども難しい状況にありますと
368 名前:ピラフ ◆9Jro6YFwm650 [] 投稿日:2018/02/05(月) 20:22:56.26 ID:jcw1NCuo [3/5] 絶対VBScriptじゃ解けないよ 絶対解けないと断言しちゃってるよね ピラフほんとうんこ
>>608 お前もできなかったじゃん
「出来ないって言ってたのはお前だ、俺はできるんだ」と
偉そうに言ってたお前でさえ結局できなかったじゃん
絶対VBScriptじゃ解けないと言ったピラフの目は正しかったことになりますよね
こいつほんとうんこw つい今 最初からピラフが言ってたじゃんVBScriptでは できないことはないだろうけれども難しい状況にありますと って自分で言ったこともうわすれてるww
>>611 で、お前はできるの? できないの?
はっきりしろよ!(怒号)
こいつコード出せばっかりでいじめてもまったくおもしろくないな
>>613 あれれー? できないのかなー? NGにしちゃおうかなー? おーん?
>>613 お前ピラフの悪口言うしか能がないから
お前だけNGにしてお前だけ完全に無視してやろうかなー?
rubyのメガネとやらは全くのデタラメだったわけだ(笑)
____ / \ / ─ ─\ ? / (●) (●) \ | (__人__) | ___________ \ ` ⌒´ ,/ | | | ___/ \ | | | | | / , | | | | | / ./ | | | | | | ⌒ ーnnn |_|___________|  ̄ \__、("二) ̄ ̄ ̄ ̄ ̄ ̄ _|_|__|_
>>619 その場しのぎで適当なこと言ってるから自分でもわけがわからないみたい
VBSで2つのXMLファイルを比較してマージする処理(足りなかったら追加、変更があったらその部分を更新) を書きたいです。DOMを使うのが普通なのでしょうか。 どのように作ったらいいのか大まかな方針を教えていただけませんか?
実はXMLスレにも書いたのですが、あちらは過疎ってたので こちらにヒントもらいにきました
>>622 > DOMを使うのが普通なのでしょうか。
ま、普通はそうだろうねぇ。だがしかし。
> VBSで2つのXMLファイルを比較してマージする処理
VBScript で書く理由?何の理由や得がある?
DOM ツリーを作って触れるライブラリを持ってる言語で書くに越したことはないぞ?
>>624 Windows環境で、言語をコンパイルする環境もないので
コンパイルせずに使えるVBSがいいのかなと思いました。
Javascriptの方がいいのでしょうか。
追記も修正もするって単なる上書きとは違うんだよね? その辺の仕様が文章から読み取れん
XMLをハンドリングするのにDOMはおそらく使いづらい。 ツリーは配列上に表現できる。 SGMLに閉じタグがあることを不思議に思ったことは無いだろうか? 実は閉じタグは配列上にツリーを表現する際欠かせないものなのだ。 配列上にツリーを構成すると、追加削除の操作が高コストになりえる。 したがって最適解はリンクリストになるはずだ。
>>626 JScript(JavaScript) か PowerShell でライブラリを探した方がいい。
VBScript には XML のライブラリはないと思うし、そもそもライブラリが作りにくい言語。
「xml パーサー ruby」で検索! JavaScript のNode.js にもある。 jQuery でも出来るかも
DOMは編集に向いていないんだよ。 VBS使おうとしてる人に言うのは酷かもしれないが、DiffとかMergeとか言ってるから、難しさを思い知った時に「DOMは編集に向いていない」ということを思い出してくれ。
選択点について考えてみよう。 選択する場所を示すのは、文字あるいはノードの上だろうか? DOM仕様ではその通りである。 では現実はどうか? 文字列「ABC」のBに何かを挿入することはあるだろうか? そんなことはない。 AとBの間、あるいはBとCの間であるはずだ。 つまり選択点は文字と文字の間にあるのが妥当と思われる。 「B」一文字を選択するには、「AとBの間」と「BとCの間」二つの選択点を持つRangeを使えばよいのだ。 少なくとも現在のDOM仕様のように、「選択点の前」とか「選択点の後ろ」というようなわかりにくく混乱するインターフェースを提供する必要はない。 ウェブはあまりにもおかしいのだ。 これは技術ではなく政治の結果ということを思い出してほしい。 いまこそ掃除の時である。
一つの位置を示すのに複数の方法が提供されると何が起こるか考えてみてくれ。 文字列「ABC」において、「Aの後ろ」と「Bの前」はどういった違いがあるだろうか?
>>626 上書きではありません
タグが新しく追加されていたら追加して、タグ内の値が変わっていたらその部分だけ更新です
>>629 PowerShellはさわったことがあるので
PowerShellを探してみます
ありがとうございます。
>>630 PowerShellで行き詰ったらそちらの方も調べてみます
レスありがとうございます
PowerShell では、そんなに複雑なプログラミングは出来ない。 「たのしいRuby 第5版、2016」を読めば? XML はTree だから、「a, b, c」のように、単純なシーケンスじゃない。 各要素内に、親ポインターを持っているから 1つ前の要素が、親、兄、それ以外の、3つのパターンがある。 それが、深さ優先の順番で、配列に入っている 差の概念が、難しい。 単純なシーケンスの差と、異なる
PowerShellでc#コードを動かせるからなんでもありじゃないの? そんなことをするのならc#でEXE作るけど。 今ならPythonでも覚えた方がええわ。
>>636 忘れてた。VBScript からは Msxml2.DOMDocument.6.0 オブジェクトが使えるんだった。
リファレンス
https://msdn.microsoft.com/ja-jp/library/ms765496 (v=vs.85).aspx
JScript のサンプルからのコンバート手順
https://msdn.microsoft.com/ja-jp/library/ms756007 (v=vs.85).aspx
「VBscript XML 編集 OR 操作」でググると色々出てくるから、やりたいことは多分できるんじゃないかな。
Ruby には、配列を集合演算できる。 配列A - 配列Bで、差集合 jQuery では、Tree は深さ優先で、配列に格納できる。 Ruby でも出来るかどうか、わからないけど 同じ要素名でも、必ず別のインスタンスを作れば、同一要素として扱わないのかな? すべて異なる要素になるなら、そのまま集合演算を使える 集合の特徴は、[1, 2, 1] みたいに、同一要素があると、 [1, 2] のように、1つの要素にまとめられてしまう
編集距離の概念を持っているかさえ怪しくなってくるな。
>>631 > DOMは編集に向いていないんだよ。
では何が向いてるんですか?
>>644 それは大きなテーマで、VBSスレで話し合うようなことではないし、はっきりとした答えを持ち合わせていない。
とはいえ、壊れたタグを修復するとか、Diffをとるとか、Mergeするといったような一般的な編集の目的には、リスト構造が良いのではないかと思う。
実は、リストによるツリー表現はすでに経験があり、壊れたタグの修復や構造変換である程度の実績がある。
その経験から、DOMから離れて考えることを強く推奨する。
>>645 リストによるツリー表現って具体的にどうやるの?
XMLの属性なんかも扱える?
某所のコピペしたスクリプトですが Win8.1だとdos窓が一瞬出てしまいます Win10だと出ませんでした 窓が出ないようにする方法って他にありますか 出来ればexeを作るとかじゃなくてvbsで完結できるといいんですが Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c dir > dir.txt",vbhide
>>647 ws.run "cmd /c dir > dir.txt",0,True
だと?
>>646 SGMLのノードをそのままリストにしたような感じになる。
もちろんXMLもそのままリスト化できる。
たとえば、閉じタグが欠損したノードを自然な形でツリー上に表現することはできないが、リストならできる。
さらに、リスト上を走査すると欠損していることが判定できるので、エラー回復も容易にできる。
この性質を利用して何かが欠損したフラグメントをリスト上に追加することができるし、欠損を補完することもできる。
おそらく編集にはリストが最適だと思う。
さらに言えば、リストをツリーとして扱うアダプタも容易に作れる。
属性をリスト上に表現することはできるが、何もメリットが無いので、開始タグ上に配列として表現するのが良いと思う。
実際にそうして困ることは何もなかった。
欠点はパフォーマンスだけだと思う。
XML、SGMLをリスト上に表現するのは、HTMLエディタのようなフラグメントを扱うときに最大の効果がある。 HTMLフラグメントをコピペする場合、タグのバランスが取れていないことはよくある。 また、バランスは適正であるが、冗長であるという場合もある。 こういったものをツリー上で修正するのは困難であるし、そもそもツリーとして表現する時点で修正されていなければならない。 実際にやってみればすぐに壁にぶち当たる上、修正困難なバグに悩まされるだろう。 リスト上に表現するだけで、問題が一掃されるので、かなりお勧めできる。 もちろん間違ったフラグメントを追加しないのであれば普通にツリーを使えばよい。
最近はやりの、WYSIWYGなオンラインエディタなどで、安全にHTMLを修正する。 あるいは、クローラによって安全かどうかわからないソースから安全に情報を引き出す。 こういったことはツリーではなかなか難しいと思ったほうが良い。 壊れた状態を表現できないことが逆に壊れた結果を生み出す。
>>648 すみません
同じディレクトリに作業フォルダを変更したcmd.lnkがあってそれを消したら出なくなりました
cmd.exeと明示的に指定したりlnkを最小化で起動するように変えても出ません
ちなみにWinのバージョンを変えたらdos窓の大きさが変わったりとlnkは作り直したほうがいいみたいです
Win10では起こらなかったのにな
レスありがとうございました
jQuery は、Tree を深さ優先で、リストに格納してる つまり、傍系(兄弟)より直系(子孫)優先。 人間の相続と同じ
>>649-651 こいつバカの片山博文だろ。
「犯人は、〜〜といった意味不明なことを言っており」の典型。
こいつ絶対働いてないだろ。
うっわ、モールス信号もわからないコミュ障の低能のゴミがwww キモっ、頭コンクリを糠床にして寝かせて欲しいのか、きしょいゴミwww
逃げてやんの、低能敗北主義者www モールス信号のわからないコミュ障なんてwww
> モールス信号 ト・ト・ト・ツー・ツー・ツー・ト・ト・ト がSOSを指す事しか分かんないや
このスレに於いてピラフからの遭難信号を受信したものは速やかに 自己の艦船に装備されている最大限の武器システムを使用し 撃沈させる義務がある。
__ __ / * \ / * \ ヽニニニノ ヽニニニノ |(●) (●) /(●) (●)\ /ノ| (__人__) | /^):::⌒(__人__)⌒:: ヽ /^/ .| `⌒´ | / / | `⌒´ | ( ' ̄ ヽ _/ヽ ( ' ̄\ _/  ̄ ̄| = V // | |  ̄ ̄| = ̄ // | | | // | | | // | |
Ruby で、selenium-webdriver で、Chrome のHeadless mode で、
5ch の投稿者名・書き込み内容を、抜き出してみた
driver.navigate.to "
http://2chb.net/r/linux/1479499953/8-9" ;
elements = driver.find_elements(:css, 'div[data-id]')
elements.each do |elem|
str = elem.attribute('data-id') + ' 投稿者 :'
# CSS では、コンテキストの直下を表現できないので、xpath を使う
# str += elem.find_element(:css, '> div.meta > span.name').text
str += elem.find_element(:xpath => "div[@class='meta']/span[@class='name']").text
puts str
str = '内容 :'
str += elem.find_element(:xpath => "div[@class='message']/span").text
puts str
end
>>666 * * * + グッジョブ! n ∧_∧ n + (ヨ(* ´∀`)E) Y Y * >>670 ピラフのこと本当に愛してるなら
>>666 をVBScriptでお願いします
>>671 お前を愛している奴など居ない
お前自身も含めて(ー_ー)
>>673 趣味ですけど
趣味こそがホビーであり
仕事こそがビジネスだと思います
しかるに働くことはワークであり
業務こそがエンタープライズだと思うわけです
ゆえにVBSは愛されてるんだなと思いました
名無しで自己擁護するくらい自分のことが好きなようです
>>678 ピラフが名無しで書き込んでるのは内緒にして
>>676 誰かに愛されるとオマエは消滅する。
消滅していないと言うことは誰もオマエを愛してはいない。
無料で翻訳されている、Rails チュートリアルをやれば? ピラフ大王なら、1週間ほどで、web アプリを極められると思う
>>682 ピラフがRailsを完全に理解するのは時間の問題です
【マイトLーヤとPS4】 FFとDQの最新作、VR開発は危険、プレーヤーの日常感覚を損なうおそれ
http://2chb.net/r/liveplus/1524621704/l50 >>685 コード書いて言うばかりで苦労せずに学習しようと考えてるお前が何を?
ピラフが楽できるようにそっちが頑張ればwinwinの関係になれると思うんです、詳細は後ほど解説します
そうやってすっとぼけたりおちょくる態度に徹していれば叩かれて当然だよな
>>690 ピラフを叩きたいだけなんじゃないの?
受け身形にすることで主語を誤魔化してるよね
ピラフを叩くのは誰か、あなたですよ
事実を正確に書くならば
僕がピラフさんのことを叩いても仕方がない
とあなたは言ってるわけです
ご自分の卑屈な姿勢を正当化するために主語を誤魔化して
ピラフのことを悪く言ってる
それってとっても根暗だし情けないと思う
自分を変えよう、Rails頑張って自信をつけよう
ピラフを叩かなくても満足できるようになろうよ
できるよ!Railsをピラフにピラフに教えてくれるよね?
あなたのためなんです! ピラフにRailsを教えることがあなたのためになるから こうしてお願いしているんです! よろしくお願いします!
>>682 >>688
>>691 ,692
スレ違い、他でやれ
ピラフ大王が、Rails チュートリアルを極めるのは、時間の問題だろう PowerShell でも、あれだけ楽々と、スクレイピングする人やさかいに。 大楽勝でしょう
>>698 スレ違い
何の信念があるのか知らないが嫌がらせ以外の何物でもないな
漏れは、ソースコードを見れば、作者のレベルがわかるんだよ ロジックをどう組み立てたか、作者の考え方がわかるのさ
>>700 パフパフという音が隣の部屋から聴こえてきます
>>702 ほお、では試してみましょうよ。
コインが13枚あります。
その中に1枚重さの違うコインがあります。
重さの違うコインは重いか軽いかはわかりません。
天秤を3回使うことで重さの違うコインを特定するには
どのように比較すればよいでしょうか。
これ、VBScriptで解いてください。
時間をおけばレスが付かなくなると思ってんのかなこのキチガイは
なまじ持ち上げられていたから勘違いしちゃってんだろうね お前を擁護するのはこのruby厨以外いない事実をそろそろ受け入れたほうがいいんじゃない?
元のクイズは、 9個の分銅がある。 その内、8個は同じ重さで、残りの1個は、それらよりも軽い時、 天秤を2回使って、軽い分銅を見つけよ
>>701 その人は他のスレでも見かけるけど、
様子のおかしい人にしか見えない
なのでピラフとは相性ぴったり
>>707 あなたはVBScriptの話をしていません、スレ違いです
VBScriptで解いてください
>>708 >>704 をVBScriptで解いてください
>>710 主張がブレすぎ
お前こそ都合よく「VBScript」という単語を含めているだけに過ぎない
>>712 ピラフの事はいい、いまはあんたの話をしてるんです
あなた今日一度もVBScriptの話をしてません、それが問題なんです
問題解決のためにVBScriptで問題解きましょ?
それで両方の問題に終止符を打てます、これはとてもよい提案です
ぜひご検討いただいて、ご回答いただいて自分はスレ違いじゃないんだと
いうことを広く周囲にお示しになっていただければと思います。
何卒よろしくお願いいたします。あなたのためなんです。
>>713 どうでもいいわけないだろう、以前からお前の話をしているんだから
しかも結局コードの要求だけで取り繕うありさまだ
終わりにするなら逆にお前自身が
>>704 をやってればいいだろ
>>714 ピラフの話をするのがマズイんですよ
ピラフはVBScriptじゃないから
このスレはVBScriptのスレですよね
あなたはピラフの話ばかりでVBScriptの話をしてないじゃないですか
それがスレ違いだと言ってるんです
>>704 をVBScriptで解いて自分はスレ違いじゃないと証明してください
好き勝手やってスレを機能させなくしているお前をまずどうにかしなくちゃだからスレ違いには相当しない ごちゃごちゃ言い逃れていないで反省する様を見せれば大目に見てやるけどね わかったらさっさと自分で取り掛かれ
>>716 結局最初から最後までピラフの話ばかりじゃないですか
ここはピラフについて必死に話し合うスレじゃないんですよ
VBScriptについて必死に話し合うスレなんです
ピラフはVBScriptじゃありません
問題解かなくてもVBScriptの話題振れるならそれでもいいですよ
でもあなたはそういうのできないでしょう?
あなたを観察してきましたけどあなたは他人を非難するばかりで
話題を提供したり話を膨らませたりしたこと一度もありません
そういうの苦手な人なんだろうなってピラフは思いました
VBScriptで問題解いてください、あなたはそういうの得意でしょう
ピラフはあなたのことを完全に理解しています
ピラフだけがあなたの理解者です
これは、MS, Google などの入社試験の問題だろ。 こんなの研究しているのは、漏れらぐらい 円周率が、3.05 よりも大きいことを証明せよって言う、有名な東大入試問題があるけど、 MS, Google は、こういう数学的な証明問題を出さないよな クイズは多いけど
>>717 話が通じてないみたいだからもう一度
「お前自身がコードを書け」
これがスレ違いなら今日一日コードの要求しかしていないお前自身がスレ違いだ
>>719 ピラフはVBScriptの問題を出したんです
一方あなたはピラフのことしか話してないんです
ピラフに文句言ってるだけでVBScriptの話を一切してないんです
このままだとこのスレであなた一人だけがスレ違いになって孤立してしまうんで
助け舟を出してるんです、VBScriptで解いてください
>>704 まずは、コイン13枚に名前を付けよう。
コインA〜Mとする。
天秤にコインを載せるとき、左の皿に載せるコイン、右の皿に載せるコイン、どちらにも載せないコイン、の3グループに分けられる。
一枚だけ重さが違うコインがあるので、左が傾けば左の皿に問題のコインがある。
右が傾けば右のコインに問題のコインがある。
釣り合えば載せていないグループに問題のコインがある。
問題のコインが含まれていないグループは、問題外となり、次回からは天秤に載せる必要はない。
VBScriptで実現するのであれば、コインのグループをアルファベットの文字列で表し、天秤に載せる操作を、3引数の再帰関数と標準出力で実装するとよいだろう。
>>721 重さの違うコインは重いか軽いかはわからないので
傾いた方に含まれるとは限らないっすよ
>>720 だからつまりお前のコード要求はスレ違いってことになるよね
悔しいんだろうけど受け入れよう
しかも天秤問題なんかググれはすぐ手順出てくるだろ
>>725 答えググってどうすんの・・・恥を知れ!
>>723 試験に出るパズル 千葉千波の事件日記 (講談社文庫) Kindle版
https://www.amazon.co.jp/dp/B014ER3632/ これに載ってるらしいよ
自分で考えずにググるとかプログラマとして終わってるでしょ バカじゃないの
答えをググるという卑怯な真似をする卑怯な人がいるので 答えはVBScriptで提出するように
ググればと言ってるのはカンニングすれば東大受かるでしょと言ってるようなもん 映画で主演を務めた山口達也は書類送検されたんですよ!?
>>731 おめーVBScript書けないし、解き方もググらなきゃわからんのだろ
おめーの出番ねーから
そもそもお前がなにを目的としているかなんて知らないし、 自分で解決しようとしていないことにまるで気づいていないのかな
>>733 おめーVBScript書けないし、解き方も訊かなきゃわからんのだろ
おめーの出番ねーから
>>734 ピラフの目的なんて知る必要なんて無い
VBScriptで回答すれば良い話
なぜならばここはVBScriptのスレだから
いい加減ピラフに粘着するのやめようよ
俺ならVBScriptでこう書くぜっていうのを出していただければ ワタクシならこう書くわよっていうのを出していただければ ありがたく頂戴するんで、そういう知識や技術が集まるスレッドに していきたいと思うわけでございまして遅ればせながらピラフの所信表明と させていただきたいと思います、明けましておめでとうございます
>>736 手順に沿ってコードを書きたいというならまだわかるけど、
手順そのものはプログラミングでどうこうじゃないだろ
お題スレがあるからためしに投げてみろよ
>>738 うるせえぞ、VBScriptで書けないなら黙ってろや
>>739 残念だけど何でもかんでもプログラミングで解決できるわけじゃないよ
>>741 そんなの当たり前だろ、でもこの問題はVBScriptで解けるだろ
VBScriptでこの問題が解けることを証明していただきたい
>>742 いいから解法をググってみろって
自分の欠損具合に気づくから
if a=b print "c" if a=c print "b" if b=c print "a"
まだピラフに粘着してるの?うんざりなんですけど 話題もないし得るものもないし何なの、ピラフに惚れちゃったの?
せめて素敵なVBScriptコード書く人だったらピラフも 悪い気はしないけど、なんにもできないじゃん
VBScriptだったら ・Option Explicitをつける ・ByValをつける ・Callをつける ・.NETのクラスを使わない とかかな、安全なコード
>>755 うおー!マジかー!はえーっすね
お風呂から上がったらちゃんと読みますあざーす!!
>>752 まあそうやってさっきまでの話を逸らすしかお前にはできないよな
恥かいちゃったもんね
OmokuNai関数とKarukuNai関数にバグがあるかもしれない。
ググらないと解き方わからないとかプログラミングでは解けないとか 抜かしてた完全なるアホがピラフへのストーキング行為をやめないので ピラフ困ってます
粘着ストーカーのIDを晒します ↓こいつです ID:iaGbt0Ns
大丈夫ですゴールデンウィークはまだ始まったばかりなんで よろしくお願いいたします
>>761 コードを書くことと解法を突き止めるのは別の話なんだけど頭の中大丈夫か?
いや、駄目だよな
>>764 お前礼の一つも言えないようなクズのくせに調子よくない?
VBScriptの話をしたいだけなのに VBScriptの話全くできない人につきまとわれてるピラフかわいそう
他人の力を借りてるだけで、お前何もできてないだろ 勘違いスンナ
>>770 あ、逆にさコテハン付けたら人気でるんじゃない?
ピラフのカリスマ性と人気に嫉妬してピラフに文句ばかり言ってるんでしょ
コテハン付けたらそっちも人気出ると思うよ
会話を噛み合わせて来ないところをみると立場が悪いことは理解できてるんだろうか だったら黙っていればいいだけなのにそれもできない障害者
フリーザとかいんじゃない? 上品で丁寧な言葉遣いだけど戦闘力半端ない感じ そういうの合ってるんじゃない?
ピラフが居ないとこのスレは寂れる だが出てくるとウザイ 諸刃のピラフなのである
>>773 お前がコテ付けてるの、このスレだけだろ
お前のようなゴミはこんなスレでしか立ち振る舞えないもんな
>>777 このスレのアイドルであるピラフのことをゴミだと言ってるけど
自分はそれより上だという思いがあるわけっしょ
立派なプライドだと思うよ、私の戦闘力は53万ですみたいな
そういうプライドがあるわけっしょ、やっぱフリーザだよ
あなたやっぱフリーザだよ!!
>>776 なんな面白いニュースないもんかね
VBScriptでこんなことがーみたいな
>>778 ,779
他人に任せてないで自分で天秤問題に取り掛かれよ
ほんとクズだな
一時が万事この調子じゃ ┐( ̄ヘ ̄)┌ ヤレヤレ・・・
コミュニケーションのとり方を知らずに成長した人って居るんだよね 他人にクズやゴミということしかコミュニケーションの手段を持ち合わせてない人 ピラフはちょっと無理だわ、NGで
本当に申し訳ないんだけどもこれ以上続けるとピラフが酷いこと言っちゃいそうで ピラフは酷い言葉とか乱暴な言葉いままで使ったことないしこれからも使いたくもないので 本当に申し訳ないんだけどこんな木偶の坊はNGで
__ __ / * \ / * \ ヽニニニノ ヽニニニノ |(●) (●) /(●) (●)\ /ノ| (__人__) | /^):::⌒(__人__)⌒:: ヽ /^/ .| `⌒´ | / / | `⌒´ | ( ' ̄ ヽ _/ヽ ( ' ̄\ _/  ̄ ̄| = V // | |  ̄ ̄| = ̄ // | | | // | | | // | |
どうせ最後にレスできなければ負けなんだろ? 黙ってりゃいいだけなのにお前の方が続けてるじゃねーか
普通に解いてもつまらないから、ディープラーニングでもしてみる?
>>793 ピラフ、仕事だ。まずは、これのグローバル変数をすべてメンバー変数に書き換えて下さい。
久しぶりに、数学を思い出すよ。 コンビネーション nCr=n!/((n-r)!*r!). H: 重そうなコイン集合. L: 軽そうなコイン集合. H∪Lから左皿に載せるm_1個のコインと、右皿に載せるm_2個のコインを選んで、 未知のコインをなるべく少なくする問題に分割される。
やっぱり狂っているな。やり直し。 H: 重そうなコイン集合。 L: 軽そうなコイン集合。 K: OKなコイン集合。 #(X): 集合Xの濃度。 現在状態(H, L, K)について、H∪L∪Kから左皿に載せるコインと、右皿に載せるコインをそれぞれ一個以上選んで 得られる次の状態(H', L', K')について#(H')+#(L')を最小化する問題に帰する。
さらに単純化すれば、状態は、(#(H), #(L), #(H∩L), #(K))と表せる。 H∩K=L∩K=空集合。
(0, 0, 0, 0)→解なし. (1, 0, 0, 0), (0, 1, 0, 0)→天秤1回、解あり. (1, 1, 1, 0)→天秤0回、解あり. (2, 0, 0, 0), (0, 2, 0, 0)→天秤1回、解あり。
>>801 訂正。
(0, 0, 0, 0)→解なし.
(1, 0, 0, 0), (0, 1, 0, 0)→天秤0回、解あり.
(1, 1, 0, 0)→解なし.
(1, 1, 0, 1)→天秤1回、解あり.
(1, 1, 1, 0)→天秤0回、解あり.
(2, 0, 0, 0), (0, 2, 0, 0)→天秤1回、解あり。
片山博文最近荒ぶってるな なんかあったんか?相談に乗らんけど
元からのキャラだ。中学生の頃からサイバーパンクを気取ってニフティに書き込みまくってた。
機械学習を試そうとしているが、グローバル変数は都合が悪い。ピラフさんはGWで欠席。仕方ないな。
過去のIDを破り捨てる時期が来た。 ネタバレ失礼。 ニフティで全角文字の「N」というハンドルネームで荒らしをやっていた。 ログインパスワードは「GOD(no)1」。
GW楽しんでるかーい? 俺様は波乗りやってるぜ、いえーい。
事務作業でのマクロをこれかPowerShellかでずっと悩んでおります
>>811 guiへのマウスやキーボードの自動操作のマクロだけども何かvbsはダブルクリックで動かす以外で恩恵あるかしら?
PowerShellは何かそのダブルクリックで動かないとか色々とめんどくさい
残すプログラムを書くなら いまどきvbsなんてのは、選択肢にすらあげるべきじゃない
>>812 1行でも書いてから言え。
VBSもPSもGUI操作はほぼほぼ想定してないことが分かる。
>>816 無いね。
寝言はネット外でヨロ。
>>812 ダブルクリックだけで実行できてしまうと誤って実行しやすくなる。
僕の知り合いの知り合いができたパソコン一台でお金持ちになれるやり方 役に立つかもしれません グーグルで検索するといいかも『ネットで稼ぐ方法 モニアレフヌノ』 DGU60
PowerShellってバージョン5でclassとかusing namespaceとか 使えるようになって格段によくなったよね
じゃあなんですか、PowerShellがスレ違いだとでも言うんですか
,-──、. ,.、- '''''' ヽ、 /。。゚。゚,、-────ヽ /。゚。。゚ 。| ヽ |。゚。。 / ─- 、-、 ゚ _=| / ̄ヽ | ━━ヽヽ l/━| ヽ Ll ,..ヽ | | | |. ヽ─ | | レ┐ -二三 | | | / ヽ=へ ────'''/ ┌‐.< ────=、 ,.┴─、\ \/ヽ / \ ヽ / )/-/ヽ / | ノ┐/ ,.-/ ヽ ./ l ./ / l "|"/'ヽ | | ヽ .| ( / l .| '|, ノ ,,-,,.、-'" ̄`>ィ.| ).l´ /| | / / / | /| | ,l、_ ___....,、┐,,,、 / / ノ |.,-─''"ノ | /,. ,.┴、.、'" _,-‐ニ/ι、 / | // / ‐'" ノ | | ' -─ 、,-つつ-''" | | _,................/ =-'" //'''''''"/''>......-‐-'"''''ヽ ヽ '" `ヽ、 、 ノ / / | ヽ=─'''" \ ''‐- // / ヽ、 /"´ _ _ ,,-、 _.、-=`ヽ/,.-= ヽ \ | `ヽ 、 | ` ヽ 、 /`ヽ 、 / |// ||//´ |/ ヽ \|| `ヽ\| | `ヽ 、ヽ| `ヽ、\//
>>835 じゃあおめーPowerShellで基数ソート実装できんの?
しばらく悪あがきしてればかつてのお友達が出てきてくれるとでも思ってんのかなこのバカは
逃げてるやん でけへんのやろ? 正直に言い給え 僕はできませんと
何もでけへん人がなんでここにおんねん お前の方がスレ違いやわ
>>857 お前は楽しんでる場合じゃない
基数ソートを実装するんだ
>>860 スレ違いはお前だろうが
お前が失せろ
はじけて失せろ
フィズバズも解けない木偶の坊
>>861 以前のような公開オナニーはどうした?
苦労せず学習しようとしているのが見え見え
失せろ
>>863 延々と同じたわ言を繰り返して持久戦に持ち込むいつものパターン
まるで成長していない
>>866-867 依頼スレじゃないんだからお願いされる理由はない
と何度言えば理解できるんだこのバカは
仮に提示したところでコイツのことだから茶化して終わるだけだしな
>>868 困ってる人を助けるのに理由なんていらないよ
勇気出して欲しい、自分を鼓舞するんだよ
できるよ!絶対大丈夫だよ!
まず、PowerShellのスレを作るのが筋じゃねえか?
【最強CUI】PowerShell -Part 2 [無断転載禁止] (c) 2ch.net
http://2chb.net/r/tech/1480109402/ >>872 ,873,875,876
開き直ったところでここは介護施設じゃないから失せろ発達障害
>>878 調子に乗るなよ健常者
障害者は社会全体で支えていくんだ
>>879 お前は自他共に認める障害者だけど我儘を押し通せる理由にはならない
さっさと失せろ
なるほど、障害者かじゃあ仕方がないな ID:tESPbryM 君、基数ソートを教えてあげなさい
>>855 やめてよ!ピラフが臭いみたいじゃん!!
何か言われたら悔しくなって引くに引けなくなるんだから大人しくしてりゃいいのに バカだからそれが分からないんだよな こんなつもりじゃなかっただろうにもはや見世物
>>884 バカはお前
基数ソートを実装できない見世物
>>882-883 要するに自演がばれてないと思ってんだろ?
こんな見世物なかなかお目にかかれない
>>885 スレ違いを諭されて反省もせず的外れな反論繰り返してんじゃねえよ
お前ガイジなんだから手話とか点字覚えるといいよ
>>886 思ってるわけ無いだろ
バカじゃないかお前
>>887 で、基数ソートは?
言い訳は聞き飽きた
>>888-890 スレ違いの指摘が余程悔しかったのか、延々と言い逃れを繰り返すガイジ
あまりに遅れているため自演も満足にできません
ということで失せろ
>>891 おめーVBScriptの話してねーな
スレ違いはお前だからお前が消えろよ
基数ソートをVBScriptで実装したら見逃してやっても良い
>>892 自演してまでスレを荒らす上に、いまさら思い出したかのようにVBSかよ
努力のできないお前には無理だから
できるくせにそれをやらないのは怠慢です ピラフはできないから仕方ないにしてもお前は言い逃れできないよ
できないくせにVBScriptの話してねーなとか舐め腐ってんのか こんな奴に教示しても味を占めるだけだ それよりID:gUX5UUiyがお留守のようだが?
ゴミみたいなプライドのために夜中も見回りとか努力の方向が完全に間違ってるよな スレ違いだから失せろ
>>897 ,899-901,903-904
おまえのつぶやく場所じゃないと言ってるんだよ
失せろゴミが
ピラフに絡んでるだけの無能が NGしたってもええねんど〜お〜ん?
あーどーしよーかなー N G し ち ゃ お う か な ー ?
基数ソートを献上して詫び入れたら許してやらんでもないがな
たった1人の友達であるピラフに見限られたら 社会的に完全に孤立するよねー
スレ違いの指摘をコードの要求で反論とかまるで会話になってないし、
このバカのことだからNGできるどころか
>>1000 まで荒らし続けるつもりだろう
キチガイが露呈した今、どうあがいても孤立してしまった現状は覆らないよ だから二度と出てくるな
そろそろ VBScriptについて必死に話し合えよ
>>915 諸君、狂いたまえ
幕末の賢人、吉田松陰の言葉だけど
かっこいいよねこれ
>>920 PowerShell
Ruby
基数ソート
自分でVBScriptの話もせずに荒らしてるんだから世話ないよな
>>922 Dim ary2 As Integer() = ary.OrderBy(Function(i) Guid.NewGuid()).ToArray()
>>921 もうちょっと待ってて
今準備してるから
今日中にはできそうにないから
準備でき次第ご連絡します
>>927 これそのまんまコピペじゃんw
しかもC#と間違えてるし
>>927 もしかしてVB.NETもC#も分からないでコピペしてきたのか?
ガイジにも程があるだろ
いい感じ
都合の悪いのをわざわざ選別かよ そんなことをしてもお前が見えなくなってるだけなのにな
>>934 よく見るとピラフのマヌケ振りがしっかりキャプチャされてるね
>>920 天はピラフの下に人を造らず
天はピラフを最下層民とした
ピラフ生きろ
>>916 ___ / \ /─ ─ \ それではVBScriptの授業を始めます /ノ⊂⊃=⊂⊃= \ / r' (__人__) | | i\ / l \ ヽ l i ノ | l ̄ | i | | >>949 白雪姫なの?じゃあピラフが魔女ね
これピラフ
>>943 先生‼質問です! XampのMySQLとPHPでwebアプリケーションを作っているのですが
PHPでhtmlに吐き出したVBScriptでデータベースからインポートしてjson配列に整形後にフォームボタンから、
JavaScriptを書き出して、jQuaryでインタラクティブに編集してjsonファイルを書き替えて
VBScriptでデータベースに保存し直せますか?、
>>952 ・XAMPPでWebアプリケーションを作っている
・HTMLにVBScriptを記述する
・VBScriptでDBから値を取得してJSON形式に変換する
・jQueryでJSONを編集する
・VBScriptでDBに値を保存する
こういうこと?
DBにアクセスするにはサーバサイドでVBScriptが動く必要があって
VBScriptが動くにはアプリケーションサーバにIISを使う必要があるんじゃないかなと
XAMPPってことはアプリケーションサーバにはApacheを使ってるわけっしょ
VBScriptを実行するのは無理なんじゃないかなと思うのだけれども
PHPからCScript.exeを起動すればVBScriptを実行できそうな気もするけど
普通にPHPでやったが良くない? そっちの方が良いと思うよ
PHP超かわいいじゃん
>>952 どのあたりが疑問なのかちょっとわかりにくいので、文章を整理して
相応のスレで質問したほうがいいんじゃないかな
>>950 ピラフは、カボチャの馬車を引く馬のウンコだろう。
はい皆さんこんばんわ それではVBScriptによるプログラミング教室を始めます
ピラフ先生、VBScriptでゲームを作れますか?
>>957 なぜ片山さんと同じトリップを・・・あなたまさか!?
同姓同名(四人以上)が迷惑してるらしいから、5ちゃんねるで本名を使うのは控えることにした。すmoney。
どうやって本格的なゲームを作るんだい? グラフィック画面すら表示できないのに。
ゲーム作成用のCOMオブジェクトを作らないといかんのかい。
>>961 ピラフは本格的なゲームの作り方を知りません。
しかし、ピラフはVBScriptの可能性を信じているのです。
>>964 言ったつもりでしたが伝わらなかったようなので改めて言います。
ピラフにはできません。
しかし、ピラフはVBScriptの可能性を信じているのです
外部のプログラムかライブラリーかCOMオブジェクトを使うか、もしくはサンドボックスから脱獄しないと無理だよな。
>>969 うん、そう言ってるよ
八百屋のおじさんがこれはトマトだよって言って
客がそれはトマトだと言ってるようなもんじゃん
ピラフが八百屋のおじさんね、君が奇妙な客
トマトは片山さん
サンドボックスから脱獄しようとしたら、セキュリティではじかれる可能性がある。 やはり外部に頼るしかない。
ピラフにうざ絡みするだけのやつはコミュニケーションと認めない 褒めよ、讃えよ、ピラフを 母なるピラフをあ〜♪ --ピラフ讃頌
今日の授業では偶数丸め(銀行家の丸め)についてご説明したいと思います。
偶数丸めとは四捨五入などの端数処理の一つで
0.5未満ならば切り捨て、0.5超過ならば切り上げ
0.5ならば偶数になるように丸める方法です。
たとえば
0.5ならば0
1.5ならば2
2.5ならば2
といった塩梅です
四捨五入では0.5を切り上げるので
増加する方に誤差が蓄積します。
偶数丸めは四捨五入と比較して
誤差の少ない端数処理と言えます。
さて、VBScriptには端数処理を行う関数が複数存在します
それぞれの動作は次の通りです
Round, CIntは偶数丸め
Int, Fixは切り捨て
VBScriptには四捨五入を行う関数は存在しません。
次回は偶数丸めを使った実践的かつ合理的かつハイパースペシャルな
処理についてご説明します。どうぞご期待ください。
散々荒らしておいて何を今さら取り繕ってんだよ 自尊心が人一倍強いだけのキチガイでしかないんだからさっさと消え失せような
>>977 自分の巣でやってなよ
わざわざアカウント作ったんでしょ?
>>979 なんのアカウントよ?
ピラフには3日前の記憶はありません
ここVBScriptについて必死に話し合うスレッドだよ ピラフに文句言ってる方がスレ違いじゃん
ピラフの潤沢な知識と卓越した慧眼に嫉妬してるんでしょ ピラフは心理学を学んでいるのでそういうのわかります
>>980-982 散々好き勝手やっているお前にスレ違い言う権利もここに来る権利もないし、
ここにいてもお前を崇拝する人間などいない
そろそろ現実を受け入れろよキチガイ
否定することでしか会話に参加できない低能先生は開始3分でレッドカード
都合が悪いことをシャットアウトしてばかりだけどそんなのは現実逃避にすぎない アーアーきこえなーいが許されるのは園児までな
>>988 Vbscripterのピラフ氏がナタでメッタ切りにされ死亡
ナムー(︶^︶)
+ ⊂⊃ + ∧∧ (*^ー^) `/⌒/ つつ //// / UU + +
>>992 地獄の民にVBScriptの布教をするために行くのさ
要らんね 半年ほど見てるけど、基地外がイキっているだけ スレタイ詐欺
スレタイに【ひまわり学級】つけなくちゃだからね 次スレはいらない
権利を主張するが義務を果たさない癖にそれを指摘されれば発狂してしまうゴミのような自尊心しか持たないこのキチガイは 自分が偶像かなんかでありたかったようだけど結局は一人で空回りしているだけで存在する価値なしの産廃 どうせ荒らしで埋め立てて逃げ切りたかっただろうけどそれすら果たせないゴミ
-curl lud20250123025600caこのスレへの固定リンク: http://5chb.net/r/tech/1498650722/ ヒント: 5chスレのurlに http ://xxxx.5chb .net/xxxx のようにb を入れるだけでここでスレ保存、閲覧できます。TOPへ TOPへ
全掲示板一覧 この掲示板へ 人気スレ |
Youtube 動画
>50
>100
>200
>300
>500
>1000枚
新着画像 ↓「VBScriptについて必死に話し合うスレ [無断転載禁止]©2ch.net YouTube動画>1本 ->画像>12枚 」 を見た人も見ています:・Jr.22歳定年制度について真剣に話し合うスレ6 ・安楽死法案について話し合うスレ ・高インスリンについて話し合うスレ ・【大阪桐蔭】根尾昂について話し合うスレ Part3【情熱の相対性はNEO】 ・【大阪桐蔭】根尾昂について話し合うスレ Part2【ネオ・ブラボー!!】 ・強制ワッチョイ導入について話合うスレ 4 ・強制ワッチョイ導入について話合うスレ 2 ・【日本紹介】日本在住の外国人の動画について話合うスレPart96 ・【日本紹介】日本在住の外国人の動画について話合うスレPart92 ・【日本紹介】日本在住の外国人の動画について話合うスレPart100 ・【日本紹介】日本在住の外国人の動画について話合うスレPart94 ・【日本紹介】日本在住の外国人の動画について話合うスレPart82 ・【日本紹介】日本在住の外国人の動画について話合うスレPart81 ・【日本紹介】日本在住の外国人の動画について話合うスレPart89 ・【日本紹介】日本在住の外国人の動画について話合うスレPart88 ・大手諦めてる底辺就活について話し合うスレ ・タルパについて話し合うスレ [無断転載禁止] ・スレH板のヲチスレについて話し合うスレ ©bbspink.com ・ディープ基地のキチガイの処遇について話し合うスレ ・【日本紹介】日本在住の外国人の動画について話し合うスレPart108 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart109 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart114 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart113 ・【日本紹介】日本在住の外国人の動画について話合うスレPart67 ・【日本紹介】日本在住の外国人の動画について話合うスレPart69 ・Web制作料金について話し合うスレ ・理想のJK店について話し合うスレ ・詰められてない争点について話し合うスレ ・リンクファームについて話し合うスレ ・運営が休日に規制を行なう件について話し合うスレ ・日本在住の外国人の動画について話し合うスレPart143 ・日本紹介】日本在住の外国人の動画について話し合うスレPart124 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart117 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart133 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart116 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart123 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart115 ・【日本紹介】日本在住の外国人の動画について話し合うスレPart117 ・近所の高卒達(工場のおっちゃんやそこで働く底辺ヤンキー)がなぜ高学歴は無能か必死に話し合っててワロタ ・車の運転は統計的に加害者に成る事がアリキなので、その事について話し合うスレッド! ・そろそろ紙パックについて真剣に話し合うべきだろ ・ロシアスレを必死にあげ続ける糖質キチガイについて ・ゲーム機戦争でわざわざ負けてる側について必死になる理由ってなんなの? ・ラノベ書いてる人が話し合うスレ ・「盗作禁止」って必死にプロフに書いてる人 ・Jr.22歳定年制度に向けて真剣に話し合うスレ 26 ・Jr.22歳定年制度に向けて真剣に話し合うスレ 18 ・Jr.22歳定年制度に向けて真剣に話し合うスレ 28 ・Jr.22歳定年制度に向けて真剣に話し合うスレ 22 ・実用厳禁★独自拡張、草案段階のJavaScriptについて ・最近のこぶしファクリトリーの「広瀬だけが一人で必死になってる」感について ・【栃木】無職長男の将来について家族で話し合う→無職逆上で母親死亡、次男重傷 ・【速報】フィアット・クライスラーとルノーが企業提携を含む関係の深化について話し合う ・【サッカー】<鹿児島市の新たなサッカースタジアムの整備について話し合う検討協議会>提言書を提出!スタジアム「都心部が望ましい」 ・借金持ちが家族との関係を話し合うスレ ・どうやったら沼を止められるのかを話し合うスレ ・(ASI)人類滅亡レベルの危機を話し合うスレ ・果樹に与える肥料は何が良いかを話し合うスレ ・けものフレンズ かしこさなどを話し合うスレ ・ゾンビ発生したらどうするか、話し合うスレ ・【芸スポCB】芸スポの選ばれし者が話し合うスレ
15:30:00 up 18 days, 16:33, 0 users, load average: 8.37, 8.35, 8.75
in 3.3271911144257 sec
@3.3271911144257@0b7 on 020105