WSH(・∀・)ｽﾚｯﾄﾞ! Part 3

1 名前：デフォルトの名無しさん [2008/04/23(水) 20:00:50 ] (　´ゝ`)　誰か詳しい情報ｷﾎﾞﾝﾇ ●過去スレ WSH(・∀・)ｽﾚｯﾄﾞ! pc11.2ch.net/test/read.cgi/tech/1055075469/ WSH(・∀・)ｽﾚｯﾄﾞ! Part 2 pc11.2ch.net/test/read.cgi/tech/1176698934/ ●関連スレ お前ら、wsh使ってますか? Part7 pc11.2ch.net/test/read.cgi/win/1190548945/ HTAをもっと流行らせる計画 pc11.2ch.net/test/read.cgi/tech/1124559962/ ★WSHでCGI★JScriptVBScript pc11.2ch.net/test/read.cgi/php/1059745064/ ●公式サイト Windows Script www.microsoft.com/japan/msdn/scripting/ ●個人サイト Windows Scripting Host homepage3.nifty.com/aya_js/wsh/index.htm Windows Scripting Host Laboratory www.roy.hi-ho.ne.jp/mutaguchi/wsh/ Windows Script Wiki winscript.s41.xrea.com/wiki/index.php 720 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 03:46:40 ] >>718 まぁWSHに限らずの話でスレ違いになるから詳細は伏せる。 721 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 07:08:03 ] 本当は自分でも間違ったことを言ってることに気付いてるが 引き下がれず必死に誤魔化そうとする姿は滑稽だな。 722 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 08:10:36 ] 初心者なんだから許してやれよｗ 723 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 08:59:36 ] >>720 残念、WSHに限った話だ 724 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 09:09:09 ] WSHスレってどういうことを語り合うの？ WSHを利用するのはスクリプト言語で、****scriptの話をしちゃいけないっていうじゃない。 じゃ何を話すの？ 725 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 09:15:35 ] 話題転換？ 726 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 09:32:58 ] >>724 WSHで実行したスクリプトから、WSHで実行されてる別のスクリプトを WScript.Quitする話とか。 これは言語の話ではなく、純粋なWSHの話だ。 727 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 11:21:59 ] 話題転換失敗 出来る厨、涙目w 728 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 19:16:06 ] WScript.QuitはWScript.Sleep中は効くけど、MsgBox中などは効かない。 WScript.TimeoutならMsgBox中も効くので、使い分けてね。 729 名前：デフォルトの名無しさん mailto:sage [2009/02/26(木) 13:37:29 ] なるほど ありがとうございました 730 名前：デフォルトの名無しさん mailto:sage [2009/02/27(金) 10:47:05 ] Windows XP SP3、WSH 5.7、Access 2003 VBA フォームにCommandButtonとListBox（値リスト）を貼り付けて、 Private Sub コマンド0_Click() Dim objShell As Object リスト1.AddItem "AAA" Set objShell = CreateObject("WScript.Shell") Call objShell.Run("%ComSpec% /C SYSTEMINFO", , True) Set objShell = Nothing MsgBox "おわり" End Sub リスト1.AddItem "AAA"　を ・コメントアウトするとRunが実行完了まで待機する ・コメントアウトしないとRunが実行完了まで待機しない みんな、この現象が起きる？ 731 名前：デフォルトの名無しさん mailto:sage [2009/02/27(金) 16:39:35 ] すれ地外が出てきませんように 732 名前：デフォルトの名無しさん mailto:sage [2009/02/27(金) 17:39:16 ] Excel2007では起きない .Popup "aaa",5　はだめだけど 733 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 22:50:09 ] VBSを使って、親ディレクトリ配下のサブディレクトリの中身の表示方法を「縮小版」に変更しようと思う。 ディレクトリの表示を変更するため、Windowsを制御する「 Windows API関数」を使えばいいというのは 分かったんだけど、肝心の「フォルダの表示方法を変更する関数」が見つかりません。 そこで以下の質問。 Q1.そもそもVBSで実現することは可能か？ Q2.「 Windows API関数」で縮小版の制御はできるのか？ 調べてはいるんですが、何の成果もあがりません。 質問スレで聞いたらここに誘導されたので・・・。 お願いします。 734 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 22:59:49 ] >>733 よく分からん 既存のエクスプローラの挙動を変えたいのか、 縮小表示のエクスプローラを起動したいのか、 自前のアプリに縮小表示の機能を作りこみたいのか まず、何をしたいのかをはっきりさせてくれ 735 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:06:42 ] >>733 A1.WSHとVBSの機能では不可能 A2.そもそもWSHやVBSはWinAPIを呼べない COMと呼ばれる汎用コンポーネントを介すことで 実現自体は不可能じゃないけどね どうしてもやりたければ、WSHやVBSではなくそっち方面を調べること 736 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:08:53 ] WSHはCOMですけど？ 737 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:09:54 ] WindowsAPIじゃなくてExplorerAPI使わないとね！ そんなんあるのか？ 738 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:12:32 ] ActivePerlからWin32API呼べますけろ？ 739 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:14:13 ] ttp://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=31949&forum=7 740 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:14:58 ] >>736 知ってますよ 幾人かの妄想上ではWSHがCOMだってことくらい 現実世界ではそれを証明できずに論破されましたが 741 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:21:48 ] 「知る」と「分かる」の違い？ 742 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:28:03 ] ttp://ja.wikipedia.org/wiki/Windows_Script_Host 正確にはWSH=ActiveScripting（COMを利用してる）のホスト。 広義ではCOM（COMに関係する）だけど、狭義ではCOMそのものではない。 743 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:33:47 ] 関連する、と、広義に当てはまる、は違う件について。 というか、外からWScript.QuitやWScript.Timeout出来るって話はどうなったの？ これの具体例出せれば、WSHがCOMだという現在敗色濃厚な主張も一発逆転じゃん。 744 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 23:42:10 ] COMの話はどうでもいいが、本当にそれが出来るなら俺も知りたいね 745 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:24:06 ] エクスプローラはCreateObjectできないけれど、 COMだからオブジェクト参照は別途入手して、 その内部オブジェクトのShellFolderViewのオブジェクト参照を WSHの変数に設定すれば、 objFolderView.CurrentViewMode = viewMode のように使えるのだ。わかるか？ 746 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:41:43 ] 知ってるけどそれがどうかしたの？ 747 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:44:01 ] 知っててわからんとは まっ多少なりとも応用力がないと役に立たんみたいやね 748 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:46:34 ] ttp://ja.wikipedia.org/wiki/Component_Object_Model#.E6.8A.80.E8.A1.93.E7.9A.84.E8.A9.B3.E7.B4.B0 749 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:48:20 ] >>747 何勘違いしてるの？ 750 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 00:52:04 ] >>743 ScriptContorlでWScriptを渡すのはいいのかな？ 元々の要望通りになるとは思えないけど。 751 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 01:02:19 ] >>748のCOMの定義にあるインターフェイスを介す方法でよろしく それ以外の方法で参照を取って操作したところでCOMとは言えないし 752 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 02:12:07 ] え〜と、IUnknownを実装していてoleview.exeやExcelの参照設定からでもオブジェクトの内容を見れたとしても、それでもCOMではないと言い張るんだ？ Windows Script Hostの略称「WSH」とスクリプトからグローバルに参照できるインスタンス「WSH」を混同してるわけ？ 753 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 02:15:32 ] はぁ？ 754 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 02:18:40 ] ふわぁ〜眠 755 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 02:28:40 ] COM　serverはCOMだけど、COM ClientはCOMじゃない、みたいな言い方だな。 748をじっくり読めば分かるけど、COMってのはインターフェース等の通信規格の事で、 COM ClientがCOMじゃないって言うなら、COM ServerもCOMじゃないんだが。 756 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 03:24:39 ] 何見当違いなこと言ってキレてるんだ？ 757 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 19:14:29 ] >>735が恥ずかしさのあまり誤魔化そうと暴れまわってるんじゃなかろうか 758 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 19:17:14 ] WScript.Quitと言えばこんなことも ttp://blog.livedoor.jp/sage_p/archives/51376139.html 759 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 21:02:59 ] >>757 残念ハズレ 760 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 22:00:56 ] 　　　　　　　　　 .　'　　　_ 二二 _ .､ 　　　 　 　 　 ／　　　 /´ -‐…‐- .｀＼ 　　　　　 　 /　　　　 /´　　　 i　　 !｀ヽﾄ､ .　　　 ,ﾍ　 ,' 　 i　 　 !　 !　 |　|i　　|ﾊ　i　ヽ　ｷﾘｯ 　　　/　 ゝ!　 ﾉ|　　! !::__!::ノ ´　￣　 i::.i ｜! 　　　＼　 .|　.:i i :i　i |´　　 ＼　　／　｀!､ﾊ:! 　 　 　 ｀ヽi　 从 i　i | ニﾆﾐ　　　 .ﾆニ !:::::| .　　　　 　 | 　ＹﾊｉﾊN　 {r::ﾘ｀　　´{r::ﾘ '::::N　　　　＜ 残念ハズレ .　　　　 　 |　　ヽゝ　　 ´´　　　　　｀｀ﾊ!｀　　　　　　 .　　　　 　 |∧ 　 �Y!　　　 　 　 ′　,':::| 　　　　 　 ｊ/∧　 _!::｝　、　　 ⊂'　..ｲ:::::| 　　　　　 ///∧´ ∨　　｀ 　,.... ィ´ﾞY:::::| .　　　　 /////∧　ヽ　　　　{ﾄ､∧　|::::::! 　　　　 ,＜￣￣∧　 } ｀ヽ　　＞''}　{￣｀ヽ .　　　 / 　 ｀ヽ:::::::::Y´ヽ　　　　　 i´｀∨::::∧ 　　　/　 　 　 ∨:::::| .:: !　　 　 　 i .:.: !::::/　i 　　　　　　　　　　　＿ ＿＿_ 　　　　　　　 ,. :'´: :,.　-―‐-ミ:ヽ、 　　　　　　／: : : :厶ｨ': ´￣￣ヾ : :＼ 　　　　　 /: : : : : :.!: :M: : : : : }､: ヽﾄ､:.＼　　　＜じゃっておｗｗｗ 　　　　　ｉ: : :.!: : : ﾚ‐'　｀￣⌒　⌒" ﾄﾍ:ﾊ! 　　　ﾄ--|: : :.!: : ､|　　ｰ‐'' ´ ｀'ｰ　　}: :.ﾄ 　　ﾐ　ﾐ　ﾐ : :!: : : :!　z=≡　　　≡z.{: :.ﾊ　　　　ﾐ　ﾐ　ﾐ 　/⌒)⌒)⌒.ﾊ :_Nとつ　＼＼＼ C VVﾘ 　　/⌒)⌒)⌒) 　|　/　/　/:弋こ　＼ヽ　＿＿,.　　　}　(⌒)/　/ / /／ 　|　:::::::::::(⌒) : :}＼　　/　　　1　 ／　　ゝ　　:::::::::::/ 　|　　　　　ノくf⌒Y ｀　{_　　_,ﾉイ| 　　　/　　）　　/ 　ヽ　　　　/　 ヽ　ﾍ,､　　_｢　|::!:::::} 　　/　　　　／　　　　 バ 　　|　　　　|　　 l||l　从人 l||l.!::|ｲ:::ヽ_./ l||l 从人 l||l　　バ　　ン 　　ヽ　　　 -一''''''"~~｀`'ー--､/:::::ｲ;　 -一'''''''ー-､　　　　ン 761 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 22:32:15 ] 必死になってAA探してくるほど悔しかったの？ 762 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 23:00:23 ] >>761 かわいそうだからそっとしておけ。 763 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 23:24:22 ] A1.WSHとVBSの機能では不可能 A2.そもそもWSHやVBSはWinAPIを呼べない COMと呼ばれる汎用コンポーネントを介すことで 実現自体は不可能じゃないけどね どうしてもやりたければ、WSHやVBSではなくそっち方面を調べること 764 名前：デフォルトの名無しさん mailto:sage [2009/03/02(月) 23:54:32 ] そんなに怖い顔してモニターを睨まないでください 765 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 00:49:54 ] 反撃したいなら、間違ったこと書いてるレスをコピペしないと反撃にならないぞ 766 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 01:37:17 ] VBSもCOMですけど 767 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 01:39:21 ] JScriptもCOMですけど 768 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 03:01:44 ] ┐(´ー｀)┌ 769 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 03:09:20 ] COMMAND.COM も COM ですけど 770 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 03:40:59 ] 完全に論破されて壊れちゃったんだね 771 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 12:55:13 ] >733 　AppActivate() で目的のウィンドウを手前に持って来る 　→ SendKeys() 　 　…で十分みたいな気がするのは俺だけか? 772 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 14:00:02 ] COMで確実に操作できるのにわざわざタイミングのむずかしいSendKeysを使うものか 773 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 14:14:26 ] WScript.Echo('JScriptはCOM',typeof(new Object()),'ですけど'); 774 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 14:30:12 ] sub sub1() end sub msgbox "VBScriptはCOM " & typename(getref("sub1")) & "ですけど" 775 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 14:57:00 ] MORE.COMはEXEですけど 776 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 19:23:16 ] 結局勘違いして大法螺吹いてるだけだったわけだ。 何か俺等の知らない高いスキルでも持ってるのかと少しは期待したが 出てきた物は糞の足しにもならない言い訳がましい勘違い屁理屈ばかり。 格下と解りゃ煽っても踊らせても何も得る物は無いわけだから あとは玩具として楽しめれば上等って話だな。 777 名前：デフォルトの名無しさん mailto:sage [2009/03/04(水) 19:52:55 ] 「ググレカス」は 大見得切ってみせたものの出す物出せない忍者ハッタリくんの 隠れ身の術の呪文なんだよ＾＾ 778 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 20:32:59 ] 真珠を投げないでください 779 名前：771 mailto:sage [2009/03/05(木) 20:53:21 ] >772 　 　ホントだ、試してみたら >>745 の CurrentViewMode を使う方が 　便利だわ。収穫だった、thx 780 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 23:21:47 ] >>778 "真珠"は投げられてない 781 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 02:31:06 ] >>745の中にキラッと光るものが、、、あっ真珠だ！ 782 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 02:45:52 ] 自分で垂れ流した糞を褒め称えてりゃ世話無いぜw 783 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 02:57:38 ] ヒントを与えすぎたかと思ったがわからんかったようやね？よかったよかった 784 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 03:10:25 ] ヒントどころかズバリ書いちゃってるじゃん アレでわかんない奴なんて居ないよ 785 名前：ショートカット mailto:sage [2009/03/17(火) 22:58:26 ] ショートカットの指してる先のファイルをNTFSパーティーション上で 移動したりすると 元のショートカットそのものも次にダブルクリックしたときに 自動的に更新するよね？ （知らなかった人は試してみ？） そんでこの自動更新を一個一個ダブルクリック等せずに WSHでやる方法ないですか？ 画像のショートカットが大量にあって リンクが外れてサムネイルがみれなくなってしまって困ってるんだ （もちろんダブルクリックすれば見れるようになるんだけど、数がおおくてめどい） これじゃおちおち画像の整理もできやしないよ！ 786 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 23:03:03 ] WshShotcut Resolve 787 名前：ショートカット mailto:sage [2009/03/18(水) 00:03:00 ] Resolveてなに？ 788 名前：ショートカト mailto:sage [2009/03/18(水) 00:48:35 ] WshShortcutオブジェクトでResolve試してみたけど オブジェクトでサポートされていないプロパティまたはメソッドです XXX.Resolve てなっちゃったよ XXX.Resolve 4 XXX.Resolve = 4 両方同じ 具体的にどうやってResovlveすんの？ 一応WSHは5.7でVBScript 789 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 00:56:33 ] shell.application folderitem.getlink.resolve 790 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 01:00:56 ] 元ファイルのフォルダごとリンク先を変えたのなら、 Shortcut Director　というツールで一括変更できる。 WshShortcut の　Resolve　はリファレンスにあるけど、存在しない。 791 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 01:03:08 ] saveし直せばいいんじゃね 792 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 01:55:45 ] ショートカットファイルを複数D&D。 でも当方Vistaで削除しますか？っていわれちゃう。 ----------------------------- Option Explicit Dim shellapp Dim fso Dim fc Dim fcItem Dim lnkFile Dim objlnk Dim e Set shellapp = CreateObject("Shell.Application") Set fso = CreateObject("Scripting.FileSystemObject") For Each lnkFile In WScript.Arguments Set fc = shellapp.NameSpace(fso.GetParentFolderName(lnkFile)) Set fcItem = fc.Items For Each e In fcItem If e.Path = lnkFile And e.IsLink Then Set objlnk = e.GetLink objlnk.Resolve(4) objlnk.Save End If Next Next WScript.Echo "Done." Set fso = Nothing Set shellapp = Nothing 793 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 03:41:20 ] set e=fcItem.item(fso.GetfileName(lnkFile)) 794 名前：ショートカット mailto:sage [2009/03/18(水) 07:36:45 ] みんなありがとう 今日帰ったら早速試してみるよ >>789-793 795 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 15:29:21 ] 自宅のXPマシンだと出来た。 OSの追跡機能をOFFってるとそもそもだめなのね。 >>793反映版。 Set shellapp = CreateObject("Shell.Application") Set fso = CreateObject("Scripting.FileSystemObject") For Each lnkFile In WScript.Arguments Set fc = shellapp.NameSpace(fso.GetParentFolderName(lnkFile)) Set fcItem = fc.Items Set e = fcItem.Item(fso.GetFileName(lnkFile)) Set objlnk = e.GetLink objlnk.Resolve(4) objlnk.Save Next WScript.Echo "Done." 796 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 14:26:34 ] 俺は追跡はウザイだけなので切ってるよ。 797 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 14:54:30 ] そもそもショートカットっていらなくね？ 798 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 16:28:11 ] つかえないやつにかぎってそういうんじゃね？ 799 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 17:58:52 ] データに対するショートカットって使わないな。 ハードリンク使うし。 800 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 18:10:22 ] うん。ランチャとジャンクション使うよ普通は 801 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 18:52:59 ] .wshのショートカットって使わないな。 .lnkのショートカット使うし。 802 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 18:54:51 ] WSHって使わないな。 PowerShell使うし。 803 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 19:37:41 ] PowerShellって使わないな。 AppleScript使うし。 804 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 19:56:04 ] > AppleScript どこら辺を笑えばいいの？ 805 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 20:21:43 ] あまりの滑りっぷりの寒さ 806 名前：デフォルトの名無しさん [2009/03/21(土) 11:46:27 ] #!/bin/bash hostname who is god hostname | sed 's/^[^\.]*\.//' # VBSでやるとしたら #Option Explicit # #Dim WSHNetwork #Set WSHNetwork = WScript.Createobject("WScript.Network") # #WScript.Echo "ドメイン名　　：" & WSHNetwork.UserDomain #WScript.Echo "ユーザー名　　：" & WSHNetwork.Username #WScript.Echo "コンピューター：" & WSHNetwork.ComputerName 807 名前：デフォルトの名無しさん [2009/03/21(土) 11:47:47 ] #!/bin/bash sed 's/ようこそ/Welcome/g' youkoso.txt > welcome.txt # VBSでやるとしたら #Set fso = CreateObject("Scripting.FileSystemObject") #Set regEx = New RegExp #Set inFile = fso.OpenTextFile("C:\TechEzo\Round23.txt") #Set outFile = fso.CreateTextFile("C:\TechEzo\Round23_2.txt") # #regEx.Pattern = "ようこそ" #repStr = "Welcome" #Do Until inFile.AtEndOfStream # tempLine = inFile.ReadLine # repLine = regEx.Replace(tempLine, repStr) # outFile.WriteLine repLine #Loop # #inFile.Close #outFile.Close 808 名前：デフォルトの名無しさん [2009/03/21(土) 11:52:56 ] MSがWSHを半ば見限ってPowerShellを開発したのは当然のこと。 上記二例からわかる通り、WSHでは 非開発者の管理者やエンドユーザには負担が大きくなるからだ。 809 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 13:13:07 ] わかってないなぁ Ｍ＄は普通の人にＰＣを便利に使ってもらう必要はない 直感的に操作できるようにして便利だと錯覚させればＯＫだから それに、一般人に簡便なスクリプト言語与えたら、簡単なツールで金取ってるような無能が失業するだろ 色んな意味で、馬鹿にはコンビューティングに目覚めないでもらったほうが都合がいいのさ 810 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 14:12:53 ] PowerShellなら (cat youkoso.txt) -replace "ようこそ","Welcome">welcome.txt でいいんだもんな。リダイレクションだとUnicodeになっちゃうからOut-Fileを使う方がいいんだろけど。 WSHはエディタの補完機能がないと全く書く気になれない。 811 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 14:24:17 ] > 上記二例からわかる通り そんな不適切な例で、何が解るって言うつもりだ？ 君がやってるのは、「四則演算は電卓の方が手軽だからPCはこの世に必要ないものです」と同じ事。 電卓側が手軽になる例だけ挙げて、その逆やましてや電卓で不可能なことには触れていない。 本気で書いてるなら「視野が狭い」と言うべきだが、きっと故意にやってるので「頭が悪い」と言った方が正しいな。 812 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 15:41:01 ] > 上記二例からわかる通り 「頭が悪い」 813 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 15:47:49 ] 実にくだらない争いを見た。 814 名前：デフォルトの名無しさん [2009/03/21(土) 16:57:26 ] PowerShellやbashより簡単になる例ってどんなのがあるの？ 815 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 17:01:31 ] すれ違い 816 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 17:02:57 ] しつこい 817 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 19:00:47 ] >>807 Set fso = CreateObject("Scripting.FileSystemObject") fso.CreateTextFile("C:\TechEzo\Round23_2.txt").Write Replace(fso.OpenTextFile("C:\TechEzo\Round23.txt").ReadAll,"ようこそ","Welcome") 818 名前：デフォルトの名無しさん [2009/03/21(土) 21:19:05 ] >>817 それでもbashより面倒なのがイタいな 819 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 21:25:09 ] そんなに行数、文字数減らしたかったら、 sed win32版を使えばいいだけ。あとはcygwinでも使え。 比較すること自体が嫌がらせ。荒らすなよ。 820 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 22:00:41 ] >>818はsedをbashだと思ってるのかな？

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef