WSH(・∀・)ｽﾚｯﾄﾞ! Part 2
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2007/04/16(月) 13:48:54●過去スレ
WSH(・∀・)ｽﾚｯﾄﾞ!
http://pc11.2ch.net/test/read.cgi/tech/1055075469/
●関連スレ
お前ら、wsh使ってますか? part6
http://pc11.2ch.net/test/read.cgi/win/1155040873/
【ｲｹﾒﾝ】阿龍スレ避難所＠自己紹介【彼女募集中！】
http://life8.2ch.net/test/read.cgi/intro/1171897814/
●個人サイト
Windows Scripting Host Laboratory
http://www.roy.hi-ho.ne.jp/mutaguchi/wsh/
Windows Script Wiki
http://winscript.s41.xrea.com/wiki/index.php
音楽
http://winscript.mine.nu/music/
キャラネタ板・なな板のための何か
http://charaneta.mine.nu/
0153151
2007/08/05(日) 11:10:55ググってみました。コマンドプロンプトではエスケープシーケンスがサポートされてないんですね。
ansi.sys を組み込んでも 16bit で動かない限りうまくいきそうにないので WSH で文字色変えたりするのはあきらめます。
ありがとう。
0154デフォルトの名無しさん
2007/08/05(日) 14:29:55または
powershell
0155デフォルトの名無しさん
2007/08/14(火) 09:45:56start /low wscript hoge.vbs
だと起動されたIEに優先度が継承することはありませんでした。
0156デフォルトの名無しさん
2007/08/14(火) 11:14:46Win32_ProcessにSetPriorityってメソッドがあるみたい
スクリプトからCOMで操作しつつっていう前提だと
うまく使えないかもしれないけど
0157デフォルトの名無しさん
2007/08/14(火) 11:49:00ありがとうございます。
WbemScripting使ってプライオリティ変えることができました。
0158デフォルトの名無しさん
2007/08/16(木) 22:09:55これのflvファイルをWSH使ってブッコ抜きたいんだけど
標準で入っているライブラリだけで出来るかな？
多分出来るよね？
0159デフォルトの名無しさん
2007/08/16(木) 22:12:130160デフォルトの名無しさん
2007/08/16(木) 23:45:03当然出来るよ
まあHTMLの知識とか無かったら無理だろうし
ここはそういうスレでもないから具体的な方法は伏せるけどね
0161デフォルトの名無しさん
2007/08/16(木) 23:48:27そういうスレだよｗ
0162デフォルトの名無しさん
2007/08/17(金) 00:06:220163デフォルトの名無しさん
2007/08/17(金) 00:13:26ここはWSHスレだと思うが。
WSHで出来るなら、是非ご教示願う。
0164デフォルトの名無しさん
2007/08/17(金) 00:28:44WSHから使えるHTMLコンポーネントで出来る
このコンポーネントはWSH用ではなくActiveX汎用コンポーネント
因ってWSHからの操作で可能ではあるが
WSH専用でもない汎用コンポーネントの使い方や
基本的なHTTPリクエストの出し方とかはスレ違い
車でドライブが可能でも､カーディーラーに行ってドライブコースを聞くのはお門違いなように
0165デフォルトの名無しさん
2007/08/17(金) 00:35:18batスレの病気の人ですか？
0166デフォルトの名無しさん
2007/08/17(金) 00:38:500167デフォルトの名無しさん
2007/08/17(金) 00:41:58「それはC言語ではなくライブラリの使い方だろ。死ねよ」
って言われたような、そんな衝撃
0168デフォルトの名無しさん
2007/08/17(金) 00:49:40FSOやDictionaryが付属してるのは知ってるが
0169デフォルトの名無しさん
2007/08/17(金) 00:50:270170デフォルトの名無しさん
2007/08/17(金) 00:52:380171158
2007/08/17(金) 01:02:41>>159
とりあえず春閣下関連を全部一括ダウンロードしようと思って
タグ検索してURI一覧を作るところまではさっき完成したんで
冷静に考えたらあとはSmileDownloadにぶっこめば終わりだね。
0172デフォルトの名無しさん
2007/08/17(金) 01:13:17それが正解。
たぶんniconicoってHTMLの中にflvのURL埋め込むとかそんな単純なことしてないと思う。
だから、技術的にはHTTPのコンポーント(XmlHttpとかWinHttp)があれば十分
なんだと思うけど、解析難易度は高くて、HTMLの解析なんてささいな問題じゃないかな。
断片化されたURL情報をFlashの中で復元するなんてしてたら、普通に追いかけても無理。
0173デフォルトの名無しさん
2007/08/17(金) 01:44:21IEコンポで検索結果ゲットしてリンク全ゲットして
smileっぽいとこ全抽出しておしまいだったしね。
どうせならWSHで最期までやってみたかったけど
それより閣下に早く会いたかったので妥協した。
0174デフォルトの名無しさん
2007/08/18(土) 22:48:11以下のようなファイル構造のとき、「あいう」の部分と「かきく」の部分をそれぞれstr1とstr2に代入するには、
どう記述すれば良いでしょうか。
アドレス：ttp://test/test.xml
<?xml 〜 ?>
<aaa name="あいう">
<bbb>
<ccc>かきく</ccc>
</bbb>
</aaa>
0175デフォルトの名無しさん
2007/08/18(土) 22:55:390176デフォルトの名無しさん
2007/08/20(月) 23:42:45Jscriptで開いたサイトのソース（html）を変数に入れるには、
どうすれば宜しいでしょうか。
ブラウザはIE6です、よろしくお願いします。
0177デフォルトの名無しさん
2007/08/21(火) 02:22:43http://www.f3.dion.ne.jp/~element/msaccess/AcTipsVbaXMLHTTP.html
ブラウザで開いているページならブラウザのインタフェースを取得して
Document.body.innerHTML
とか試してみれば?
0178176
2007/08/21(火) 22:04:01Document.body.innerHTMLも試したつもりでしたが、
もいちど、やってみると、、、できたーーー。
すごくうれしいです、ありがとさんでした。。。
0179デフォルトの名無しさん
2007/08/21(火) 22:22:43タイミングによるんじゃないの?
Navigateした直後にページ内容読み出そうとしているとか。
DocumentCompleteのイベント内とかで読まないとうまくいかない可能性が高くなる。
0180デフォルトの名無しさん
2007/08/25(土) 17:54:34セックスを伴うストーキングと
セックスを伴わないストーキングの
２種類あるということを初めて知りました
0181デフォルトの名無しさん
2007/08/26(日) 05:35:050182デフォルトの名無しさん
2007/08/26(日) 05:47:53技術的には可能だよ
0183デフォルトの名無しさん
2007/08/26(日) 07:21:21可能
ADO使え
0184デフォルトの名無しさん
2007/09/01(土) 12:21:16その日の気分で色変えたいんで、ワンクリックでできるようにしたいです。
ヒントよろしくお願いします。
0185デフォルトの名無しさん
2007/09/01(土) 12:37:59正直どの程度の事を聞かれてるのかサッパリなのでこれだけ書いておく。
後はWSHなりAHKなりregファイルなり好みの方法で。
0186デフォルトの名無しさん
2007/09/01(土) 15:47:31ありがとうございます。
レジストリ値を変更したあと、ログインし直さないと変更が反映されないんですが
すぐ反映させる方法はありますか？
0187デフォルトの名無しさん
2007/09/01(土) 18:55:25そのくらいは自分で調べようね
0188デフォルトの名無しさん
2007/09/01(土) 19:20:530189デフォルトの名無しさん
2007/09/01(土) 22:03:38ありがとございます。なんとかできそうです。
0190デフォルトの名無しさん
2007/09/05(水) 03:07:31コマンドラインに渡して、無事解凍できたら消すって趣旨のスクリプトを組んでいて、
いざ消すときにまだコピー中な為か、ファイルが使用中だというエラーが
でてしまうので、コピーが終わったかどうか確かめる関数を作ろうと
思っているんですが、まったく思いつかないよーー
似たようなことやったことある人とかアドバイスください
0191デフォルトの名無しさん
2007/09/05(水) 08:54:50消せたらループ抜けるようにしておけば､消せた時点でループ抜けて次の処理に移れる
On Error Resume Nextしておけば､消せなくてもエラーメッセージ出さずに
ループ内で何度も消去試行してくれる
あとはアーカイバツールに渡すときに､処理が終わるまで次の処理に移らないようにしておくとかね
どちらもWSHのヘルプに載ってるので､詳しくはそちらを見てね
0192デフォルトの名無しさん
2007/09/07(金) 06:59:490193デフォルトの名無しさん
2007/09/07(金) 08:18:410194デフォルトの名無しさん
2007/09/07(金) 20:47:380195デフォルトの名無しさん
2007/09/07(金) 20:52:190196デフォルトの名無しさん
2007/09/07(金) 21:11:16ってやつだな。
0197デフォルトの名無しさん
2007/09/11(火) 10:56:390198デフォルトの名無しさん
2007/09/11(火) 11:50:510199デフォルトの名無しさん
2007/09/14(金) 18:52:35する例ってどこかにありませんでしょうか?
Scripting.FileSystemObject でopenしたりReadLnしたり
できるんでしょうか?
0200デフォルトの名無しさん
2007/09/15(土) 11:04:560201デフォルトの名無しさん
2007/09/15(土) 11:20:47MSCommを使う
PCに入っていない？そんな時はVB6ランタイムでｺﾞﾆｮｺﾞﾆｮ...
0202199
2007/09/15(土) 18:03:21なるほど。でもVB開発ライセンスが要るみたいですね。
最終的に配布したいので、標準の環境で動かしたかったのですが・・
通信用の外部プログラム作成したほうがいいですね。
0203デフォルトの名無しさん
2007/09/15(土) 22:42:26名前空間 System.IO.PortsのSerialPort クラスあたりを
使うのが楽
0204デフォルトの名無しさん
2007/09/17(月) 00:00:31俺つい昨日まで、MS-DOSの時代に流行ってたLSI-C86試食版という
Cコンパイラを使って、プログラムをメモ帳で書いてたんよ。
長いファイル名をどうにかする必要があるときは、バッチファイルを
書き出すプログラムを書いてからバッチ実行、とかね。
Oh, WSH！ なんてこったい、こんな便利なもんが最初からあるのを知らなかったなんて･･･orz
0205デフォルトの名無しさん
2007/09/17(月) 00:22:56LSI-C86試食版で長いファイル名を使えるようにするライブラリがあるのに。
BCCとかVC2005Expressとかただで使えるWindows用コンパイラがいくつもあるのに。
いろんな意味でご苦労さん。
0206デフォルトの名無しさん
2007/09/17(月) 06:39:37右クリック→[送る](SendToフォルダ)経由でファイルやフォルダを引数として渡す場合、
バッチファイルだとOSによって挙動がまちまちでイマイチ使いづらいんだよね。
(特にWin2000以外)
その点、WSHのVer5.0〜5.6だとWin95〜XPまで使い勝手を何とか統一させる事ができる。
(それなりの配慮は必要だが)
0207デフォルトの名無しさん
2007/09/17(月) 09:40:03LSI-C86試食版で頑張っていたおまいは凄すぎ。
昔C言語独学しようと思って初めに手を出したのがそれだったが、
結局Quick-Cに逃げちゃったよ。あれ、独自仕様多すぎね？
0208204
2007/09/18(火) 00:41:36今は、プログラムを書くってのは緊急事態だったりするので
手持ちのツールと知識だけでなんとか乗り切るやり方を続けて
ここまで来てしまったよ。
0209デフォルトの名無しさん
2007/09/19(水) 15:50:37要はHWNDとってきてDirectXにくっつけてスクリプト側でそうさって感じ。
DirectXはCOMだからなんとかならないかな〜と、駄算してる。
ウインドウはIE使ったほうがはやいのかなぁ？
助言お願いします。
0210デフォルトの名無しさん
2007/09/19(水) 17:15:070211デフォルトの名無しさん
2007/09/19(水) 19:39:310212デフォルトの名無しさん
2007/09/19(水) 20:51:42あ、どうりで情報がないわけだ。
レスありがとう。
0213デフォルトの名無しさん
2007/09/19(水) 20:53:58手元のPCを見てみたら、DirectX 7と8しかタイプライブラリがなかった。
ググってもDirectX 9のはなさそうな感じ。
だから7/8はいいけど、DirectX 9をスクリプトから使うのは無理そう。
0214デフォルトの名無しさん
2007/09/19(水) 21:03:46レスサンキュー。
無理とわかったからにはフラッシュを検討してみるよ。
0215デフォルトの名無しさん
2007/09/25(火) 23:01:54懐かしすぎて泣ける（;´Д⊂）
0216デフォルトの名無しさん
2007/09/27(木) 05:54:380217デフォルトの名無しさん
2007/10/09(火) 16:43:01Ｃマガジンとかに付録でよくついてたな。
0218デフォルトの名無しさん
2007/10/09(火) 19:41:300219171
2007/10/10(水) 08:28:17レジストリの部分で引っかかってしまいました。
（標準）＝の所にはどう書けばよいのでしょうか？
WshShell.RegWrite "HKLM\Software\Microsoft\Windws\CurrentVersion\Internet Settings\5.0\User Agent","orz","REG_SZ"
PREとPOSTはOKですが、携帯では使わないんで・・・
0220デフォルトの名無しさん
2007/10/10(水) 08:43:270221デフォルトの名無しさん
2007/10/10(水) 13:13:22WshShell.RegWrite "HKLM\Software\Microsoft\Windws\CurrentVersion\Internet Settings\5.0\User Agent\","orz","REG_SZ"
でおｋ
0222デフォルトの名無しさん
2007/10/10(水) 21:50:04神降臨です
ありがとうございました
0223デフォルトの名無しさん
2007/10/11(木) 22:20:38IE立ち上げてsendkeysでもこもこと移動させて消していたんですが、
失敗が多い…
どぎゃんすればよかですか？
0224デフォルトの名無しさん
2007/10/11(木) 22:38:26MacOS → 「システムフォルダ：初期設定：Netscape：MagicCookie」
Windows → 「\Program Files\Netscape\Navigator\cookies.txt」
または「\Program Files\Netscape\Users\ユーザ名\cookies.txt」
Internet Explorer
Windows 95 → 「\Windows\Cookies\Windows\Temporary インターネット Files\」
Windows 98 → 「\Windows\Cookie\」
Windows XP → 「\Documents and Settings\ユーザ名\Cookies\」
のあたりのファイルを直接削除すればいいのでは？
0225デフォルトの名無しさん
2007/10/11(木) 22:57:33全部消して良いなら...
var Shell = new ActiveXObject("Shell.Application");
var Cookies = 0x21;
var CookiesFolder = Shell.Namespace(Cookies).Self.Path;
var CookieFilesPath = CookiesFolder + "\\*.txt";
var Fso = new ActiveXObject("Scripting.FileSystemObject");
Fso.DeleteFile(CookieFilesPath);
0226デフォルトの名無しさん
2007/10/15(月) 21:19:28もうしわけなかです。
ありがとうございました
0227デフォルトの名無しさん
2007/10/23(火) 21:30:14var CapicomUtil = new ActiveXObject("CAPICOM.Utilities");
// ↑http://www.microsoft.com/downloads/details.aspx?FamilyID=860ee43a-a843-462f-abb5-ff88ea5896f6&DisplayLang=ja
var Fso = new ActiveXObject("Scripting.FileSystemObject");
var Stream1 = new ActiveXObject("ADODB.Stream");
var Stream2 = new ActiveXObject("ADODB.Stream");
var StreamType = {Binary: 1, Text: 2};
var ReadSize = 64;
Stream1.Type = Stream2.Type = StreamType.Binary;
function CompareFiles(file1, file2) {
Stream1.Open();
Stream2.Open();
Stream1.LoadFromFile(file1);
Stream2.LoadFromFile(file2);
var rc = true;
while (! Stream1.EOS) {
if (CapicomUtil.BinaryToHex(Stream1.Read(ReadSize))
!= CapicomUtil.BinaryToHex(Stream2.Read(ReadSize))) {
rc = false;
break;
}
}
Stream1.Close();
Stream2.Close();
return rc;
}
/* つづく...
0228デフォルトの名無しさん
2007/10/23(火) 21:31:31function GetFileLists(folder) {
var lists = {};
for (files = new Enumerator(Fso.GetFolder(folder).files); ! files.atEnd(); files.moveNext()) {
var file = files.item();
var size = file.Size;
if (! (size in lists))
lists[size] = [];
lists[size].push(file.Name);
}
return lists;
}
function CompareFileList(folder, list) {
var len = list.length;
folder += "\\";
for (var i = 0; i < len; i++)
for (var j = i + 1; j < len; j++)
if (CompareFiles(folder + list[i], folder + list[j]))
WScript.Echo(list[i] + " == " + list[j]);
}
var folder = ".";
var lists = GetFileLists(folder);
for (var i in lists)
CompareFileList(folder, lists[i]);
/* End of File */
関数名等が変ですが（＾ω＾；）
0229デフォルトの名無しさん
2007/10/24(水) 08:30:050230デフォルトの名無しさん
2007/10/25(木) 18:55:180231デフォルトの名無しさん
2007/10/27(土) 04:32:11新たに開いた子IEのオブジェクトを得るにはどうしたら良いでしょうか？
0232sage
2007/10/27(土) 10:52:08.NetFrameWorkってwshから使えるの？
0233デフォルトの名無しさん
2007/10/27(土) 12:34:50204ではないが、.NetFrameworkとWSHは別物
ただし、.NetFrameworkの提供するクラスライブラリのいくつかは
COMインタフェースが公開されているので、それらのクラスに
ついてはWSHからでもCOM経由で利用することはできる
0234デフォルトの名無しさん
2007/10/27(土) 13:41:49ShellのWindowsメソッドで列挙してParentが元のと一致するの、と言うのを考えてみたが
泥臭いので検証もしていない
0235デフォルトの名無しさん
2007/10/27(土) 15:14:390236デフォルトの名無しさん
2007/10/27(土) 22:09:400237デフォルトの名無しさん
2007/10/27(土) 22:15:180238デフォルトの名無しさん
2007/10/27(土) 22:30:35たいしたものは使えんよ。
PowerShellなら.NETもWin32APIも使い放題だわ
0239デフォルトの名無しさん
2007/10/27(土) 22:46:03NewWindow3 Event
0240デフォルトの名無しさん
2007/10/28(日) 21:48:45BeforeNavigate2でCancelして別のIEでNaviagte
0241デフォルトの名無しさん
2007/10/29(月) 19:42:35Set objShell = CreateObject("WScript.Shell")
objShell.Run "\\hogehoge\hoge.adp /cmd Hello,World"
イメージとしてはこういう感じかなぁと思いコードを組んでいますが引数を渡す段階まで至っていません。
エラーは出ないのですが、引数がCommand$で受け取れないという状況です。
Accessをフルパスで指定する必要があるのかと思い
objShell.Run """C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE"" ""\\hogehoge\hoge.adp /cmd Hello,World"""
2行目を上記のように変更してみましたが、こちらはHello,Worldまでがファイル名と認識されてしまい、実行できません。
ローカルでなら
"C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" C:\hogehoge\hoge.adp /cmd Hello,World
というショートカットを作成する事でAccessに引数を渡すところまでは行っているのですが。
ただ、フルパスで指定するってのは、人によっては環境も違うわけで…
Officeのインストールパスを探す環境変数って無いですよねぇ
出来れば3行目の方向性で、こうすればいいよとかアドバイスを頂けませんでしょうか
0242デフォルトの名無しさん
2007/10/29(月) 19:57:44""\\hogehoge\hoge.adp /cmd Hello,World"" の前後の""は要らないのでは。
MSACCESS.EXEのフルパスは
objShell.RegRead "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\MSACCESS.EXE"
または
objShell.RegRead "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\MSACCESS.EXE\Path" & "MSACCESS.EXE"
で取得できます(上は8.3形式となる)。
0243デフォルトの名無しさん
2007/10/29(月) 21:09:110244デフォルトの名無しさん
2007/10/29(月) 21:23:50runしたらその情報が自動的に使われるのでは？
0245デフォルトの名無しさん
2007/10/29(月) 22:04:02Runの仕様上はそうだから、RegReadする必要がないと言えばないですよ
0246デフォルトの名無しさん
2007/10/30(火) 01:51:30でも、ローカルでコマンドライン引数渡そうとしたらフルパス必要、と。
結局、WebからWSH使って引数渡すにはどうすればいいんだろ？
0247デフォルトの名無しさん
2007/10/30(火) 02:39:140248デフォルトの名無しさん
2007/10/30(火) 04:34:440249241
2007/10/30(火) 14:17:39>>242さんの意見を参考に組んでみた所、引数を渡せる事を確認しました。
Set objShell = CreateObject("WScript.Shell")
strFile = "\\hoge\hoge.adp"
strPath = objShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\MSACCESS.EXE\Path") & "MSACCESS.EXE"
objShell.Run """" & strPath & """ """ & strFile & """ /cmd hoge"
どうも、引数を渡したい場合にはACCESSのフルパスを省略出来ないようで。
単純に実行したいだけならADPファイルのフルパスのみで可能でしたが。
なかなか難産でしたが、ようやく先に進めます。
ありがとうございました。
0250デフォルトの名無しさん
2007/10/30(火) 15:51:100251デフォルトの名無しさん
2007/10/31(水) 20:27:520252デフォルトの名無しさん
2007/10/31(水) 22:00:10スレッドってもんを正しく認識できてる？
■ このスレッドは過去ログ倉庫に格納されています