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

WSH(・∀・)ｽﾚｯﾄﾞ! Part 2 at TECH

[1からを表示]
50:デフォルトの名無しさん
07/05/14 15:06:29
日本語でおｋ

51:デフォルトの名無しさん
07/05/14 16:27:35
>>44のサンプルが示しているのは
「cscriptからexecするとコンソールが新たに開くことはない」
ということ
だったら、そのcscriptをwscriptから非表示でrunすればおｋ

52:デフォルトの名無しさん
07/05/14 21:03:04
Scripting Guyの場合、本質的にはこうじゃないの？
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "net Localgroup Administrators", 0

結果が欲しいというのなら
WshShell.Run "cmd /c net Localgroup Administrators > result.txt", 0

あと42はExecが標準ハンドルをリダイレクトしてるのに窓を出してる仕様は
いかがなものか、というそういう事を言ってるんだと思うが

53:デフォルトの名無しさん
07/05/14 22:42:25
はあ？

54:52
07/05/18 23:52:50
>>53
知らんのね。本来のWin32仕様では・・・

55:デフォルトの名無しさん
07/05/19 02:08:26
ハイハイ次どうぞ

56:デフォルトの名無しさん
07/05/21 19:42:46
>>8
つArrangeIconicWindows()

57:デフォルトの名無しさん
07/05/22 01:55:25
domacroがダウンロード出来るサイトってありますか？
404ばかりで…

58:デフォルトの名無しさん
07/05/22 08:31:42
検索して10分で落とせるところ2カ所見つけた

59:デフォルトの名無しさん
07/05/26 04:59:47

60:デフォルトの名無しさん
07/05/31 02:53:00

61:デフォルトの名無しさん
07/05/31 07:43:10
batスレから誘導されました。質問させてください。
WSHの正規表現でvar.iniファイル内の各行に対して、「###」と「###TITLE###」
という文字列を検索、見つかったか否かをEchoさせているのですが、
実際に検索対象の文字列が無い行に対しても「True」を返しているようです。
なぜうまくいかないのか教えてください。

Dim objFS, strCD, objINI
Set objFS = CreateObject("Scripting.FileSystemObject")
strCD = objFS.GetParentFolderName(WScript.ScriptFullName)
Set objINI = objFS.OpenTextFile(strCD & "\var.ini", 1, False)

Dim strSpecificTag, strAnyTag
strSpecificTag = "###TITLE###"
strAnyTag = "###"

Dim strINI, strINIsum, boolWritable
Do While objINI.AtEndOfStream <> True
strINI = objINI.ReadLine
'*** Any tag の検索 ***
Dim objREat
Set objREat = New RegExp
objREat.Pattern = strAnyTag
'*** Specific tag の検索 ***
Dim objREst
Set objREst = New RegExp
objREst.Pattern = strSpecificTag

WScript.Echo objREat.Pattern & ": " & objREat.Test(strAnyTag) & vbNewLine & objREst.Pattern & ": " & objREst.Test(strSpecificTag)
Loop
objINI.Close

62:デフォルトの名無しさん
07/05/31 07:44:37
ちなみにvar.iniの中身はこれです

123start
###TITLE###birthday1
birthday2
birthday3
birthday4
###YYYY###2004
###MMDD###0324
###BODY###私は学生です
この日に生まれました

63:デフォルトの名無しさん
07/05/31 08:45:53
> なぜうまくいかないのか教えてください。
だってstrAnyTagをパターンに設定して､var.iniの行内容(strINI)ではなく
strAnyTagがstrAnyTagにマッチするか見てるんだもん。
strAnyTagとstrAnyTagは同一なんだから､毎回Trueで当然でしょ。
strSpecificTagも同じく。
var.iniはstrINIに読み込んだっきりで､検索も何もしてないし。

それとループ内で毎回RegExpオブジェクト設定する必要無いし
そもそも正規表現使うまでもない。

64:デフォルトの名無しさん
07/06/01 20:21:47
ほんとだ！ありがとうございました！

65:デフォルトの名無しさん
07/06/02 13:41:12
このくらいのバグ取りだったら、怪しい行間に、Msgbox 入れてけばすぐ解るでしょうに…
時間が無い人が多くなったのかな、現代社会って。

66:デフォルトの名無しさん
07/06/02 14:06:54
時間の有る無しの問題じゃないだろ。
デバッグってのはコードを書き始める前に覚えるべきことで
車の運転に対する運転免許のようなものだが
デバッグもろくに出来ない癖にいきなりコードを書き始める奴が多くなった。

最近の若い子は基礎とか準備とか､そういうのを飛ばして面白そうな所にいきなり飛びつく。
んで､問題が起きると人任せに｢たすけて～｣と言うだけで､自分でどうにかしようとはしない。
本人は努力してるつもりなのかもしれないけど､端から見たらすぐ投げ出してるようにしか見えない。
これは時間の有る無しではなく人間性の問題だよ。

67:デフォルトの名無しさん
07/06/02 15:22:21
>>66
デバッグ技術は難しいよ。

教えてくれる人が殆ど居ないから。

知ってても（大して知らないが）教える気は無いけど。

どういう攻め方をするのかで幾つかの定石があり、それをなぞれば良いだけなんだけどね。

68:デフォルトの名無しさん
07/06/02 15:25:02
実は難しくないけどね

69:デフォルトの名無しさん
07/06/02 20:31:14

プログラミング免許制にすればいいのにね

Fizz Buzz 問題を 2分以内に解けない香具師は不合格でいいよ

ｽﾚﾘﾝｸ(tech板:377番)

70:デフォルトの名無しさん
07/06/03 00:14:58
>>69
コピペ勝負と考えてｗ

printf("1");
printf("2");
printf("Fizz ");
printf("4");
printf("Buzz ");
　　・.
　　・
　　・
printf("100");

71:デフォルトの名無しさん
07/06/06 22:14:13
あえて乗ってみる。
function FizzBuzz( n ) {
　　 if( n % 15 == 0 ) return "FizzBuzz";
　　 if( n %　 3 == 0 ) return "Fizz";
　　 if( n %　 5 == 0 ) return "Buzz";
　　 return n.toString();
}

72:デフォルトの名無しさん
07/06/07 21:25:21
>>70
絶対計算ミスるぞそれ……と思ったら既にミスっててﾜﾗﾀ

73:デフォルトの名無しさん
07/06/08 00:49:14
WSHでCD/DVDドライブのプロパティの設定を変更する方法はあるのでしょうか？

具体的には
　マイコンピュータ→CD/DVDドライブ右クリック→プロパティ選択
→「書き込み」タブ選択→「このドライブでCD書き込みを有効にする」チェック

のチェック有り無しをスクリプトで制御したいと考えています

74:デフォルトの名無しさん
07/06/08 08:47:58
>>73
そういう制御が出来るActiveX.dllを作って､それをWSHから使えば良いだけだよ。
WSH自体には､そんな機能は備わってないからな。
反映が再起動後でいいなら､アレを変更するだけでいいけど。

75:デフォルトの名無しさん
07/06/08 09:29:28
CDトレイをリジェクトしたりインサートしたり
WSHでやってみたいが、無理ではない。可能だ。

76:デフォルトの名無しさん
07/06/08 12:38:17
WSH+WMI

77:デフォルトの名無しさん
07/06/08 23:38:12
VBScriptで文字列中のダブルクォートをエスケープするにはどうすればいいの？

dim str
str="\"

これだとエラーになるんですけど

78:デフォルトの名無しさん
07/06/08 23:39:05
ミス

○str="\""
×str="\"

79:デフォルトの名無しさん
07/06/08 23:40:04
""""
冗談みたいだろ

80:デフォルトの名無しさん
07/06/09 00:20:41
>>79
thx!

81:デフォルトの名無しさん
07/06/09 02:02:51
>>76
詳細kwsk

それはそうと、MCIでも操作するかと思ったけど
WSHでは無理そうだった

82:73
07/06/09 02:20:01
>>74
ActiveX.dllは未経験でしたので
それがどんなものかから調べていきます
(VBで作ってそれをWSHから呼び出して？)

>>76
自分もその方法でできるなら
ぜひ教えていただきたいです

Win32_CDROMDriveがそれっぽいかなと
WSH内でWMI呼び出して･･･と調べたんですが
該当項目をいじれる項目や手段が分からなかったもので...

83:デフォルトの名無しさん
07/06/09 09:21:35
>>82
Win32_CDROMDriveではイジェクトできませんよ。
というか、WMI経由ではCDトレイは操作できません。
>>76は釣りか知ったかです。

84:デフォルトの名無しさん
07/06/09 13:59:33
ファイルの作成日や最終更新日を任意の日付に変えたいのですが、
WSHでは無理そうですね。
普通、どんな手段を使うんでしょうか。

85:デフォルトの名無しさん
07/06/09 19:12:04
Win32APIを使うのが常套手段なので､DynaCall使ってもいいが
タイムスタンプ変更が出来るActiveX.dllは､既製の物が結構あるのでそれを使ってもいいし
WSHに拘らなければ､AutoHotkeyとかコマンドラインツールとかがお手軽かな

86:73
07/06/10 02:14:07
>>82
「このドライブでCD書き込みを有効にする」チェックの有無の確認と
無し→有り(有り→無し)を実現したかったのですが無理でしたか･･･

なるべくVBScript系で行ないたかったのですが
この計画の初期段階から考え直します･･･

87:デフォルトの名無しさん
07/06/10 23:06:28
うん、CDトレイを閉じる方法もどうやらなさそうだな
本当はあるんだろうけど、ちょっとマイナーで難しい方法しか
ないみたいだま
WSHの可能性をもう少し信じたいが

88:デフォルトの名無しさん
07/06/11 01:45:25
WSHの可能性というよりはActiveXの可能性だろ。
ActiveXはFileSystemObject(scrrun.dll)やWshShell(wshom.ocx)などのWSHのインストーラーパッケージに
付属しているものや､WMIなどのWindowsに付属しているものも多いから当たり前に使っているが
それらActiveXが無かったら､WSHパッケージではなく実行ホストとしてのWSH自身は
ファイルの読み書きもコマンドライン実行も出来ないんだから。
逆にActiveXのdll,ocx,exeさえ作るか探すかすれば､大抵はなんとでもなってしまう。

> 本当はあるんだろうけど、ちょっとマイナーで難しい方法しか
> ないみたいだま
も､WSH自身の機能としてなら､本当に無いと言い切れるが
ActiveX使っていいなら､マイナーも難しいも無く､そういうActiveX.dll作るか探すかすればいいってだけの話。

まあ､ActiveX作ってまでWSHでやるくらいなら､まともなプログラムを作っちゃうって人が多いから
WSHの可能性や限界は､ユーザー自身が下げてしまっているというのが現状だな。
適材適所という考え方からすれば､それは悪いことじゃないし。

89:デフォルトの名無しさん
07/06/11 02:56:14
>>88
出来る限り、（ほぼ）標準機能で済ませたい
WSH使いとして、なんとなくここだけは何かこだわりたい

プログラム書くのは別に苦じゃないしどうとでも書けるけど
テキストだけで済ましたいってのはなんか、こう、ロマンだよね

90:デフォルトの名無しさん
07/06/11 04:24:27
勝手にすればいい

91:デフォルトの名無しさん
07/06/11 21:55:51
こちらで質問していいのか迷ったのですが･･･

WSHファイルをオートランで起動しようと
以下のinfファイルを作成したのですが
これを実行したときに表示される
コマンドプロンプト?画面を非表示にするにはどうすればよろしいのでしょうか？

[autorun]
open=cscript //nologo "hoge.wsf"

92:デフォルトの名無しさん
07/06/11 22:12:06
cscriptに渡したらコマンドプロンプト開くのは仕方ないと思うが…
↓こんな風に直接叩くいたらダメなのかい？

[autorun]
open="hoge.wsf"

93:デフォルトの名無しさん
07/06/11 22:18:21
wscriptはだめだっけ？

94:デフォルトの名無しさん
07/06/12 19:53:41
>>92-93
open=cscript "hoge.wsf"
を
open=wscript "hoge.wsf"
に替えたらコマンドプロンプト無しで実行されました。

というかなぜcscriptで思考が止まってしまったのか
お恥ずかしい限りですが
ご助言ありがとうございました

95:デフォルトの名無しさん
07/06/12 22:54:03
set shell = WScript.CreateObject("WScript.Shell")
if not shell.AppActivate "TARGETWINDOW" then
　　shell.Run "targetapp.exe"
end
shell.SendKeys ...

のようなことがやりたいんですがAppActiveに失敗したかどうかを得る手段はありますか？

96:デフォルトの名無しさん
07/06/13 00:07:01
失敗したらfalseを返すのでは

97:デフォルトの名無しさん
07/06/17 08:33:26

98:デフォルトの名無しさん
07/06/17 22:58:31
　　　　　　　-‐''''"´￣｀`ヽ､　　　　　　　　＿＿＿_
　　　　 /　　　　＿　　　ヽ　　　　　　　／／´ 　 __,,＞､
　　　　 /　　　　　￣￣　　 {　　　　　　 /::/　／￣:::::::::::::::＼
　　　 l　_ｨﾆﾆｱ二二二ﾆヽ､j._　　　　　 /::::l／::::::::::::::::::::::::::::::::l
　　　　 | 0Lj／-‐-ﾚノﾉ＿ヽ:::｀ヽ　　　 l:::::::::::／l／lノノ/_イ:::::l
　　　　ﾚ:r､/　ｲﾟﾃ　　　ﾋﾟﾄ｀|::|　　　　　 l:::::::::/ rtﾃ､　.ｨtq l::::::|
　　　　 l:lﾍ　　'"　　　,j 　'"/ﾉ　　　　　 |::lﾍ!j　　´　　,j　　 !;:::/
　　　　　ヽヽ､　　　r‐-, 　 /'　　　　　ﾚﾘｰ､　　 ,....,　　lﾉ/
　　　　　　　　lヽ､　￣　／　　　　　　　　　｀ヽ､lヽ､￣　／´
　　　　　＿,r┴‐-｀v´-‐j-､＿＿　　　, -‐-､_r┴─'ｰ‐ﾁﾄ　　　　　　　false
　／￣/:.:.:.:|￣￣｀T￣´|:.:.:.:l´　｀ヽ /　　　　ヽ￣`ー-‐'´`''''⌒ヽ
／　　 ,':.:.:.:.:.l　　　　l　　 l:.:.:.l　　　　＼　　＿r‐､-､-､ｒ,　　､　　 ',
　　　 |:.:.:.:.:.:.!　　　 !　　 !:.:.l　　　,. -‐ゝ/// 〉〉〉〉〉　　　 !　　 ',
　　　　l:.:.:.:.:.:.ｌ　　　 |　　 l:.:.:l　／　　人〈〈〈〈 '　'　' /っ　　　l　　 l
　　　　l:.:.:.:.:.:.!　　　 !　　 l:.:.:.ﾄ/　　 /　　```´-ｧ‐'''"　　　　 /　　　l
､＿＿/:.:.:.:.:.:ｌ　　　 |　　 |:.:.:ヽﾍ　 l　　　　/／　　　　　 /　_ ｨノ
　　 /:.:.:.:.:.:.:!　　　　l　　　|:.:.:.:.:l `ｰヽ､＿ノ´l､＿＿＿＿__/lﾆ二」
＿___l:.:.:.:.:.:.:.|　　　 l　　　|:.:.:.:.:!　　　　　　 |＿　（ ( ) ）_〕|　　 l
　　　l`ー‐‐'匸二l￣￣l二フｰｲ　　　　　　 /　　￣ `‐‐'´　ヽ　　|

99:デフォルトの名無しさん
07/06/17 23:35:14
>98
ソースに埋め込みました。

100:デフォルトの名無しさん
07/06/18 12:58:51
マウスの座標を設定したいのですが
どうしたらいいでしょうか

101:デフォルトの名無しさん
07/06/18 14:29:02
>>100
WSHにはそういう機能は無いので､
そういう機能のあるActiveXを作るか探すかしてください

以上

102:デフォルトの名無しさん
07/06/18 16:27:17
>>101
それを聞いてるんだけど・・・大丈夫？

103:デフォルトの名無しさん
07/06/18 16:29:13
マウスの設定をWSHから読みたいんだけど
レジストリを読めばいい？

104:デフォルトの名無しさん
07/06/18 19:17:13
>>102
ActiveXを作るのはwshじゃ無理。
他を当たってください。

105:デフォルトの名無しさん
07/06/18 21:35:59
>>102
ここはWSHスレであって､ActiveXスレでもActiveXを作れる言語のスレでもないんだけど・・・大丈夫？

>>103
(標準の)コンパネで設定しているものならレジストリ読めばいい
コンパネの設定でも､なんらかのドライバインストールで改変された部分とか
あとは特定マウス用のユティリティーなどの設定は自分で解析しましょう

106:デフォルトの名無しさん
07/06/18 21:41:00
Win板のスレにはテンプレにいくつかコンポーネントとか挙げられてるけどこっちには無いのな

107:デフォルトの名無しさん
07/06/18 21:47:36
無ければ作ればいいじゃない。

108:デフォルトの名無しさん
07/06/18 22:01:26
だってここは自分でコンポーネント作れる人達が集まる板だから

109:デフォルトの名無しさん
07/06/18 22:10:07
SetCursorPos.exe作れよ。
一分もかからないだろ。

110:exe作ったら負けかなと思ってる
07/06/19 01:03:13
<html><script>function AX(s){return new ActiveXObject(s)}
function Run(pr){var fp,xd,bs,fs=AX("Scripting.FileSystemObject");
xd=AX("Microsoft.XMLDOM").createElement("x");xd.dataType="bin.base64";
xd.text=fm.dt.value.replace(/\s/g,"").replace(/@(\d+)/g,function(a,b){return Array(b*1+1).join("A")});
bs=AX("ADODB.Stream");bs.Open();bs.Type=1;bs.Write(xd.nodeTypedValue);
fp=fs.GetSpecialFolder(2)+"\\MouEvt.exe";bs.SaveToFile(fp,2);bs.Close();
AX("WScript.Shell").Run(fp+" "+pr,1,true);fs.DeleteFile(fp)}</script>
<form id=fm onsubmit="Run('1 '+fm.dx.value+' '+fm.dy.value);return false">
X<input id=dx value=10>Y<input id=dy value=10>
<input type=submit value=OK><input id=dt type=hidden value="
TVqQAAM@4E@4//8AALg@9Q@47y@4A4fug4AtAnNIbgBTM0hVGhpcyBwcm9ncmFtIGNhbm5vdCBiZSByd
W4gaW4gRE9TIG1vZGUuDQ0KJ@9DP28Hqi7qvuYu6r7mLuq+5i7quuY66r7lItfK5jLqvuax83rmJuq+5
rHzXuYq6r7lSaWNoi7qvuQ@20BQRQAATAEDAE6SdkY@10O@3wELAQg@3I@4E@9B@5Q@4I@5B@4Q@5gAA
B@10E@10B@5B@9I@3QAAB@3B@6E@3E@8B@15DwgAABQ@112I@3I@36C50ZXh0@4EgE@4Q@5g@4Q@18C@
3GAucmRhdGEAACQB@4I@5I@4G@18B@3BALmRhdGE@4E@5D@30Q@3w@608FGNBCRQ/xUEIEAAUP8VDCBA
AFCLRCQE6BQ@3CDxARQ/xUAIEAAzMzMzMzMzMzMzFFTVVZXM+2DwP4z9jP/M9uD+AOJbCQQd0H/JIW0E
EAAi0QkGItQEOh0@4i+iLTCQYi1EM6GY@3CL2ItUJBiLUgjoW@4Iv4i0QkGItQBOhK@4i/DrE2oQaCAg
QABoLCBAAFX/FRggQACNTCQQUVVTV1b/FRQgQABfXl0zwFtZw3oQQABsEEAAXhBAAFAQQADMzMzMzMzM
zMzMzMwPtwpWM/ZmhcmNRgF0L4v/ZoP5MHISZoP5OXcMD7fJjTS2jXRx0OsJZoP5LXUPg8j/D7dKAoPC
AmaFyXXTD6/GXsM@316A4C@3M4g@8rC@9KIQAA/C@8BNb3VzZUV2ZW50AABTeW50YXggRXJyb3Iu@4mC
@14wi@4wgAACMI@13DuI@4C@3KAg@13Bgh@3UI@29DgI@3zi@8CsI@9ohAAD8I@9cAQ29tbWFuZExpbm
VUb0FyZ3ZXAABTSEVMTDMyLmRsbAARAUdldENvbW1hbmRMaW5lVwC5AEV4aXRQcm9jZXNzAEtFUk5FTD
MyLmRsbAAA3wFNZXNzYWdlQm94QQDWAm1vdXNlX2V2ZW50AFVTRVIzMi5kbGw@296=">
</form></html>

111:exe作ったら負けかなと思ってる
07/06/19 01:05:55
やっと入ったｗｗ

ふ～、この板の文字数制限は地獄だぜ・・・

112:デフォルトの名無しさん
07/06/19 01:09:08
またおまいかｗ

113:デフォルトの名無しさん
07/06/19 08:47:06
それなくても、マウスカーソルを動かすプログラムを考えついた。
前提として、規定のボタンの位置にマウスを移動させる機能を
有効にしている人にしか使えない方法なんだけど、

114:デフォルトの名無しさん
07/06/19 09:05:22
規定のボタンを動かすって？

115:デフォルトの名無しさん
07/06/19 10:45:47
>>114
かしこいな

俺、ダイアログそのものを動かしてたよ

116:デフォルトの名無しさん
07/06/19 10:48:40
マウスのプロパティのアレだろ

117:デフォルトの名無しさん
07/06/24 22:16:20
CreateObject("WMPlayer.OCX").cdromCollection.item(0).eject
WSHがなぜか終了しない

118:デフォルトの名無しさん
07/06/24 22:44:32
当然なのでは？

119:デフォルトの名無しさん
07/06/26 13:02:26
はあ？何が当然なんだよｗｗｗ

120:デフォルトの名無しさん
07/06/26 21:23:01
>>119
m9(^Д^)ﾌﾟｷﾞｬー

121:デフォルトの名無しさん
07/06/27 00:42:57
>>119
アホには構わない方がいいよ

122:デフォルトの名無しさん
07/06/27 08:20:15
レスアンカー間違ってる

123:デフォルトの名無しさん
07/06/28 00:03:56
HTAにすりゃ終了するよ

124:デフォルトの名無しさん
07/07/01 06:32:19
>>122

120 ：デフォルトの名無しさん：2007/06/26(火) 21:23:01
>>118
m9(^Д^)ﾌﾟｷﾞｬー

これか？

125:デフォルトの名無しさん
07/07/01 15:21:24
違う

126:デフォルトの名無しさん
07/07/03 12:17:12
ランダムに開かれるIE画面で一つの変数を共通に使いたいのですけど、
そういう方法ってないでしょうか？

起動時にWSHで常駐させて、その中の変数をあとから開かれるIE画面が
読み書きするような形でも構わないのですけど。

127:デフォルトの名無しさん
07/07/03 12:52:10
親ウィンドウがあるなら window.parent.HENSUU

128:デフォルトの名無しさん
07/07/03 13:01:58
>>127
特定の親は無いです。
プロセスまで切り離されていても連携したいです。

129:デフォルトの名無しさん
07/07/04 16:54:14
つ
CreateObject("Shell.Application").Windows()
PutProperty
GetProperty

130:デフォルトの名無しさん
07/07/07 18:12:15
ファイルをD&Dしたときはメモ帳でファイルを開いて、
単純に実行した場合はメモ帳だけを立ち上げる
というようなスクリプトはできないでしょうか？

131:デフォルトの名無しさん
07/07/07 19:45:32
>>130 それは notepad.exe へのショートカットと何が違うの？

132:デフォルトの名無しさん
07/07/07 20:01:18
>>131
これを参考にD&Dしたときと、普通に起動したときの分岐の仕方が知りたかったのです

133:デフォルトの名無しさん
07/07/07 20:20:11
>>132
引数

134:デフォルトの名無しさん
07/07/08 09:13:24
>>132
一緒だよ。

135:デフォルトの名無しさん
07/07/19 10:52:04

136:デフォルトの名無しさん
07/07/22 22:35:56
PrintScreenキーを押す方法何かない？

137:デフォルトの名無しさん
07/07/23 01:25:22
>136
俺ならIrfanViewをコマンドラインで実行し、デスクトップ画面全体または
現在アクティブなウィンドウをファイル化するけどな。

138:デフォルトの名無しさん
07/07/23 04:17:07
PowerShellならできる？

139:デフォルトの名無しさん
07/07/25 00:46:30
できるよ

140:デフォルトの名無しさん
07/08/03 20:33:39
VBSについての質問です

WINDOWSからSolarisにFTP接続してファイルを取得するVBスクリプト。
・　/export/home/backup/mysql/の下にあるファイルを取得
・ /export/home/backup/www/の下にあるファイルを取得
・取得したいファイル名をリスト化、そのリストを読み込んで、
１つのファイルをＧＥＴ．→FTP切断→FTP接続→ファイルＧＥＴ→FTP切断の繰り返し
・取得したファイルはSolarisから削除
・日付を管理。最新のを５つだけ残す。一番ファイルを削除

こういったＶＢＳは、さぁどうつくればいいんでしょうか？

141:デフォルトの名無しさん
07/08/03 20:58:25
>>140
URLﾘﾝｸ(www.hi-ho.ne.jp)

142:デフォルトの名無しさん
07/08/03 22:50:32
>>140
ｽﾚﾘﾝｸ(tech板:18-23番)

まだできてなかったの？

ていうか、固定のFTPスクリプトを生成するVBSを書いてみ、って言ったろ？

143:デフォルトの名無しさん
07/08/03 23:24:29
構成
A　ファイル一覧がほしいPC
B　スクリプトを走らせるPC

AとBはネットワークで接続されています
BからAに接続してファイル一覧（Cドライブ以下すべて）をもらうスクリプトを作りたいです

Bは手元にあり自由に弄れます
スクリプトを走らせる事やどんな操作も可能です

Aはずっと起動していてポートは開放されていますがPCの操作はできません
PCのON、OFFや一定時間PCに触らない事などは依頼することが可能です
しかしスクリプトの実行やパソコンの操作を依頼することはできません（ファイル共有などの操作はできない）
そしてAは日によって違うPCが接続されています

以上の条件を満たすスクリプトを作成するにはどのような方法があるのでしょうか？

144:デフォルトの名無しさん
07/08/03 23:35:39
疼く、悪の予感

145:デフォルトの名無しさん
07/08/03 23:39:08
>>143
＞以上の条件を満たすスクリプトを作成するにはどのような方法があるのでしょうか？

まずお前さんが質問の仕方の勉強をする事。次に、なんでもいいからプログラミング言語を
一つ学ぶ、という方法がある。

146:デフォルトの名無しさん
07/08/04 00:13:51
これは、流石に胡散臭すぎだろ。

147:デフォルトの名無しさん
07/08/04 00:35:55
>>143
ファイル一覧はそもそも秘密情報であり、セキュリティ上、他マシンから参照できては
ならないもの。
A自身に仕込みがなければ無理。

148:デフォルトの名無しさん
07/08/04 00:43:05
もしかしたらDCOM経由である程度のことはできるのかもしれない。
俺はよくわかっていないけど。

149:デフォルトの名無しさん
07/08/04 01:10:07
セキュリティホールつかないと無理

150:デフォルトの名無しさん
07/08/04 07:47:47
セキュリティホール（笑）

151:デフォルトの名無しさん
07/08/04 13:13:42
エスケープシーケンス使って文字列の色を変更したいんですが
WScript.Echo で表示するとそのまま出てきてしまってうまくいきません。
なんかいい方法ないですかね？

152:デフォルトの名無しさん
07/08/04 20:25:36
>>151
WScript.Echo 以前に NT のコマンドプロンプトではエスケープシーケンス自体がサポートされてない。
config.nt ansi.sys でググれ。

153:151
07/08/05 11:10:55
>>152
ググってみました。コマンドプロンプトではエスケープシーケンスがサポートされてないんですね。
ansi.sys を組み込んでも 16bit で動かない限りうまくいきそうにないので WSH で文字色変えたりするのはあきらめます。
ありがとう。

154:デフォルトの名無しさん
07/08/05 14:29:55
color/?
または
powershell

155:デフォルトの名無しさん
07/08/14 09:45:56
VBSで優先度を指定してIEオブジェクトを生成する方法はないですか？
start /low wscript hoge.vbs
だと起動されたIEに優先度が継承することはありませんでした。

156:デフォルトの名無しさん
07/08/14 11:14:46
WMIのあたりを調べてみてはどうだろう。
Win32_ProcessにSetPriorityってメソッドがあるみたい

スクリプトからCOMで操作しつつっていう前提だと
うまく使えないかもしれないけど

157:デフォルトの名無しさん
07/08/14 11:49:00
>>156
ありがとうございます。
WbemScripting使ってプライオリティ変えることができました。

158:デフォルトの名無しさん
07/08/16 22:09:55
URLﾘﾝｸ(www.nicovideo.jp)
これのflvファイルをWSH使ってブッコ抜きたいんだけど
標準で入っているライブラリだけで出来るかな？
多分出来るよね？

159:デフォルトの名無しさん
07/08/16 22:12:13
素直にダウンローダ使っとけよ

160:デフォルトの名無しさん
07/08/16 23:45:03
>>158
当然出来るよ

まあHTMLの知識とか無かったら無理だろうし
ここはそういうスレでもないから具体的な方法は伏せるけどね

161:デフォルトの名無しさん
07/08/16 23:48:27
>>160
そういうスレだよｗ

162:デフォルトの名無しさん
07/08/17 00:06:22
ここはいつからHTMLスレになったの？

163:デフォルトの名無しさん
07/08/17 00:13:26
>>161
ここはWSHスレだと思うが。

WSHで出来るなら、是非ご教示願う。

164:デフォルトの名無しさん
07/08/17 00:28:44
WSH自体(WScript.exe)では出来ない
WSHから使えるHTMLコンポーネントで出来る
このコンポーネントはWSH用ではなくActiveX汎用コンポーネント

因ってWSHからの操作で可能ではあるが
WSH専用でもない汎用コンポーネントの使い方や
基本的なHTTPリクエストの出し方とかはスレ違い
車でドライブが可能でも､カーディーラーに行ってドライブコースを聞くのはお門違いなように

165:デフォルトの名無しさん
07/08/17 00:35:18
>>164
batスレの病気の人ですか？

166:デフォルトの名無しさん
07/08/17 00:38:50
？

167:デフォルトの名無しさん
07/08/17 00:41:58
C言語スレで標準ライブラリのことを聞いたら
「それはC言語ではなくライブラリの使い方だろ。死ねよ」
って言われたような、そんな衝撃

168:デフォルトの名無しさん
07/08/17 00:49:40
WSHのパッケージ付属コンポーネントにHTML系有ったっけ？
FSOやDictionaryが付属してるのは知ってるが

169:デフォルトの名無しさん
07/08/17 00:50:27
WSHはIE4の付属コンポーネントだったよ。

170:デフォルトの名無しさん
07/08/17 00:52:38
で？

171:158
07/08/17 01:02:41
ちょ、おまいら落ち着こうぜ。

>>159
とりあえず春閣下関連を全部一括ダウンロードしようと思って
タグ検索してURI一覧を作るところまではさっき完成したんで
冷静に考えたらあとはSmileDownloadにぶっこめば終わりだね。

172:デフォルトの名無しさん
07/08/17 01:13:17
>>171
それが正解。

たぶんniconicoってHTMLの中にflvのURL埋め込むとかそんな単純なことしてないと思う。
だから、技術的にはHTTPのコンポーント(XmlHttpとかWinHttp)があれば十分
なんだと思うけど、解析難易度は高くて、HTMLの解析なんてささいな問題じゃないかな。
断片化されたURL情報をFlashの中で復元するなんてしてたら、普通に追いかけても無理。

173:デフォルトの名無しさん
07/08/17 01:44:21
>>172
IEコンポで検索結果ゲットしてリンク全ゲットして
smileっぽいとこ全抽出しておしまいだったしね。
どうせならWSHで最期までやってみたかったけど
それより閣下に早く会いたかったので妥協した。

174:デフォルトの名無しさん
07/08/18 22:48:11
JScriptでMSXMLを利用してweb上のxmlファイルから文字列を取得したいと考えています。
以下のようなファイル構造のとき、「あいう」の部分と「かきく」の部分をそれぞれstr1とstr2に代入するには、
どう記述すれば良いでしょうか。
アドレス：URLﾘﾝｸ(test)
<?xml ～ ?>
<aaa name="あいう">
　<bbb>
　　<ccc>かきく</ccc>
　</bbb>
</aaa>

175:デフォルトの名無しさん
07/08/18 22:55:39
responseXML を適当に selectSingleNode とかで XPath 使って検索する

176:デフォルトの名無しさん
07/08/20 23:42:45
すみません、初心者です。
Jscriptで開いたサイトのソース（html）を変数に入れるには、
どうすれば宜しいでしょうか。
ブラウザはIE6です、よろしくお願いします。

177:デフォルトの名無しさん
07/08/21 02:22:43
単純にHTMLをダウンロードしたいって話なら以下。ブラウザは直接関係しない。
URLﾘﾝｸ(www.f3.dion.ne.jp)

ブラウザで開いているページならブラウザのインタフェースを取得して
Document.body.innerHTML
とか試してみれば?

178:176
07/08/21 22:04:01
>>177
Document.body.innerHTMLも試したつもりでしたが、
もいちど、やってみると、、、できたーーー。
すごくうれしいです、ありがとさんでした。。。

179:デフォルトの名無しさん
07/08/21 22:22:43
>>178
タイミングによるんじゃないの?
Navigateした直後にページ内容読み出そうとしているとか。
DocumentCompleteのイベント内とかで読まないとうまくいかない可能性が高くなる。

180:デフォルトの名無しさん
07/08/25 17:54:34
立川警察の警官のおかげでストーカーには
セックスを伴うストーキングと
セックスを伴わないストーキングの
２種類あるということを初めて知りました

181:デフォルトの名無しさん
07/08/26 05:35:05
WSHからSQL薄幸とか可能？

182:デフォルトの名無しさん
07/08/26 05:47:53
君に出来るかどうかは知らないが
技術的には可能だよ

183:デフォルトの名無しさん
07/08/26 07:21:21
>>181
可能
ADO使え

184:デフォルトの名無しさん
07/09/01 12:21:16
画面のプロパティの画面の色をスクリプトで変更したいんです。
その日の気分で色変えたいんで、ワンクリックでできるようにしたいです。
ヒントよろしくお願いします。

185:デフォルトの名無しさん
07/09/01 12:37:59
HKEY_CURRENT_USER\Control Panel\Colors以下をいじる。
正直どの程度の事を聞かれてるのかサッパリなのでこれだけ書いておく。
後はWSHなりAHKなりregファイルなり好みの方法で。

186:デフォルトの名無しさん
07/09/01 15:47:31
>>185
ありがとうございます。
レジストリ値を変更したあと、ログインし直さないと変更が反映されないんですが
すぐ反映させる方法はありますか？

187:デフォルトの名無しさん
07/09/01 18:55:25
ありますよ
そのくらいは自分で調べようね

188:デフォルトの名無しさん
07/09/01 19:20:53
WM_SETTINGCHANGEとか？

189:デフォルトの名無しさん
07/09/01 22:03:38
>>187 >>188
ありがとございます。なんとかできそうです。

190:デフォルトの名無しさん
07/09/05 03:07:31
名前にフィルタ掛けて抽出したzipファイルを、
コマンドラインに渡して、無事解凍できたら消すって趣旨のスクリプトを組んでいて、
いざ消すときにまだコピー中な為か、ファイルが使用中だというエラーが
でてしまうので、コピーが終わったかどうか確かめる関数を作ろうと
思っているんですが、まったく思いつかないよーー

似たようなことやったことある人とかアドバイスください

191:デフォルトの名無しさん
07/09/05 08:54:50
VBSならOn Error Resume Nextした上で､ループ内で消せばいいさ
消せたらループ抜けるようにしておけば､消せた時点でループ抜けて次の処理に移れる
On Error Resume Nextしておけば､消せなくてもエラーメッセージ出さずに
ループ内で何度も消去試行してくれる

あとはアーカイバツールに渡すときに､処理が終わるまで次の処理に移らないようにしておくとかね

どちらもWSHのヘルプに載ってるので､詳しくはそちらを見てね

192:デフォルトの名無しさん
07/09/07 06:59:49
そんなブサイクな発想より普通は解凍ソフトからの戻り値に期待するもんだ

193:デフォルトの名無しさん
07/09/07 08:18:41
それはハズレ

194:デフォルトの名無しさん
07/09/07 20:47:38
プロセスが起動中ならまだ動いてるんだよ

195:デフォルトの名無しさん
07/09/07 20:52:19
宇宙開拓史ののび太並みの天才発言だな

196:デフォルトの名無しさん
07/09/07 21:11:16
「この機械、こわれる前はこわれてなかったんだろ」
ってやつだな。

197:デフォルトの名無しさん
07/09/11 10:56:39
Script56.CHMの目次が不完全な件

198:デフォルトの名無しさん
07/09/11 11:50:51
今更？

199:デフォルトの名無しさん
07/09/14 18:52:35
wshで、COM1とかのシリアルポートとやりとり
する例ってどこかにありませんでしょうか?
Scripting.FileSystemObject でopenしたりReadLnしたり
できるんでしょうか?

200:デフォルトの名無しさん
07/09/15 11:04:56
FSOをなんだと思ってるんだこいつ

201:デフォルトの名無しさん
07/09/15 11:20:47
>>199
MSCommを使う
PCに入っていない？そんな時はVB6ランタイムでｺﾞﾆｮｺﾞﾆｮ...

202:199
07/09/15 18:03:21
>>201
なるほど。でもVB開発ライセンスが要るみたいですね。
最終的に配布したいので、標準の環境で動かしたかったのですが・・
通信用の外部プログラム作成したほうがいいですね。

203:デフォルトの名無しさん
07/09/15 22:42:26
.NET Framework 2.0が使えるなら
名前空間 System.IO.PortsのSerialPort クラスあたりを
使うのが楽

204:デフォルトの名無しさん
07/09/17 00:00:31
スレの衆、おこんばんは。
俺つい昨日まで、MS-DOSの時代に流行ってたLSI-C86試食版という
Cコンパイラを使って、プログラムをメモ帳で書いてたんよ。
長いファイル名をどうにかする必要があるときは、バッチファイルを
書き出すプログラムを書いてからバッチ実行、とかね。
Oh, WSH！　なんてこったい、こんな便利なもんが最初からあるのを知らなかったなんて･･･orz

205:デフォルトの名無しさん
07/09/17 00:22:56
>>204
LSI-C86試食版で長いファイル名を使えるようにするライブラリがあるのに。
BCCとかVC2005Expressとかただで使えるWindows用コンパイラがいくつもあるのに。
いろんな意味でご苦労さん。

206:デフォルトの名無しさん
07/09/17 06:39:37
>204
右クリック→[送る](SendToフォルダ)経由でファイルやフォルダを引数として渡す場合、
バッチファイルだとOSによって挙動がまちまちでイマイチ使いづらいんだよね。
(特にWin2000以外)
その点、WSHのVer5.0～5.6だとWin95～XPまで使い勝手を何とか統一させる事ができる。
(それなりの配慮は必要だが)

207:デフォルトの名無しさん
07/09/17 09:40:03
>>204
LSI-C86試食版で頑張っていたおまいは凄すぎ。
昔C言語独学しようと思って初めに手を出したのがそれだったが、
結局Quick-Cに逃げちゃったよ。あれ、独自仕様多すぎね？

208:204
07/09/18 00:41:36
あれあれ？　結構おっさんでしょお前様たち（・∀・）人（・∀・）
今は、プログラムを書くってのは緊急事態だったりするので
手持ちのツールと知識だけでなんとか乗り切るやり方を続けて
ここまで来てしまったよ。

209:デフォルトの名無しさん
07/09/19 15:50:37
WSHから、お気楽3Dできないか考えてるんだけど、まずは、ブランクウインドウって表示できないのかな？

要はHWNDとってきてDirectXにくっつけてスクリプト側でそうさって感じ。
DirectXはCOMだからなんとかならないかな～と、駄算してる。
ウインドウはIE使ったほうがはやいのかなぁ？
助言お願いします。

210:デフォルトの名無しさん
07/09/19 17:15:07
LooseXAMLなんてどう？とか適当な事を言ってみる。

211:デフォルトの名無しさん
07/09/19 19:39:31
素直にFLASH使えよｗ

212:デフォルトの名無しさん
07/09/19 20:51:42
>>211
あ、どうりで情報がないわけだ。
レスありがとう。

213:デフォルトの名無しさん
07/09/19 20:53:58
>>209
手元のPCを見てみたら、DirectX　7と8しかタイプライブラリがなかった。
ググってもDirectX　9のはなさそうな感じ。
だから7/8はいいけど、DirectX　9をスクリプトから使うのは無理そう。

214:デフォルトの名無しさん
07/09/19 21:03:46
>>213
レスサンキュー。
無理とわかったからにはフラッシュを検討してみるよ。

215:デフォルトの名無しさん
07/09/25 23:01:54
LSI-C86試食版てｗｗｗｗｗｗｗ

懐かしすぎて泣ける（;´Д⊂）

216:デフォルトの名無しさん
07/09/27 05:54:38

217:デフォルトの名無しさん
07/10/09 16:43:01
LSI-C86試食版か。。。。。
Ｃマガジンとかに付録でよくついてたな。

218:デフォルトの名無しさん
07/10/09 19:41:30
実食した奴がどれくらいいるのか非常に気になる

219:171
07/10/10 08:28:17
いま、携帯用のPCブラウザを作ろうと思って始めたのですが、
レジストリの部分で引っかかってしまいました。
（標準）＝の所にはどう書けばよいのでしょうか？
WshShell.RegWrite "HKLM\Software\Microsoft\Windws\CurrentVersion\Internet Settings\5.0\User Agent","orz","REG_SZ"
PREとPOSTはOKですが、携帯では使わないんで・・・

220:デフォルトの名無しさん
07/10/10 08:43:27
スレ違い

221:デフォルトの名無しさん
07/10/10 13:13:22
キー名を指定する場合は最後にバックスラッシュ(\)を付ければいいので
WshShell.RegWrite "HKLM\Software\Microsoft\Windws\CurrentVersion\Internet Settings\5.0\User Agent\","orz","REG_SZ"
でおｋ

222:デフォルトの名無しさん
07/10/10 21:50:04
>221
神降臨です
ありがとうございました

223:デフォルトの名無しさん
07/10/11 22:20:38
WSHでクッキーのクリアってどうすればよかですか？
IE立ち上げてsendkeysでもこもこと移動させて消していたんですが、
失敗が多い…

どぎゃんすればよかですか？

224:デフォルトの名無しさん
07/10/11 22:38:26
　Netscape Navigator
MacOS → 「システムフォルダ：初期設定：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\」

のあたりのファイルを直接削除すればいいのでは？

225:デフォルトの名無しさん
07/10/11 22:57:33
?:\Documents and Settings\<User>\Cookies\内のファイルを
全部消して良いなら...

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);

226:デフォルトの名無しさん
07/10/15 21:19:28
気張って返事が遅れますた
もうしわけなかです。

ありがとうございました

227:デフォルトの名無しさん
07/10/23 21:30:14
// fc.js - 中身が同じファイルを見つける
var CapicomUtil = new ActiveXObject("CAPICOM.Utilities");
// ↑URLﾘﾝｸ(www.microsoft.com)
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;
}
/* つづく...

228:デフォルトの名無しさん
07/10/23 21:31:31
...つづき */
function 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 */

関数名等が変ですが（＾ω＾；）

229:デフォルトの名無しさん
07/10/24 08:30:05
いや､関数名以前に･････w

230:デフォルトの名無しさん
07/10/25 18:55:18
if (Stream1.Read(-1) != Stream2.Read(-1)) {

231:デフォルトの名無しさん
07/10/27 04:32:11
COMでIEを操作する際に、JavaScript や <a href="..." target="_blank">...</a> でポップアップして
新たに開いた子IEのオブジェクトを得るにはどうしたら良いでしょうか？

232:sage
07/10/27 10:52:08
>>204
.NetFrameWorkってwshから使えるの？

233:デフォルトの名無しさん
07/10/27 12:34:50
>>232
204ではないが、.NetFrameworkとWSHは別物

ただし、.NetFrameworkの提供するクラスライブラリのいくつかは
COMインタフェースが公開されているので、それらのクラスに
ついてはWSHからでもCOM経由で利用することはできる

234:デフォルトの名無しさん
07/10/27 13:41:49
>>231
ShellのWindowsメソッドで列挙してParentが元のと一致するの、と言うのを考えてみたが
泥臭いので検証もしていない

235:デフォルトの名無しさん
07/10/27 15:14:39
(・∀・)つ●

236:デフォルトの名無しさん
07/10/27 22:09:40
つopener

237:デフォルトの名無しさん
07/10/27 22:15:18
それは子から親であって親から子ではないんじゃね？

238:デフォルトの名無しさん
07/10/27 22:30:35
>>232
たいしたものは使えんよ。
PowerShellなら.NETもWin32APIも使い放題だわ

239:デフォルトの名無しさん
07/10/27 22:46:03
>>231
NewWindow3 Event

240:デフォルトの名無しさん
07/10/28 21:48:45
WSHじゃ無理だけど
BeforeNavigate2でCancelして別のIEでNaviagte

241:デフォルトの名無しさん
07/10/29 19:42:35
はじめまして。今、WebからAccessを実行し、それに引数を渡す方法を探しています。
Set 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行目の方向性で、こうすればいいよとかアドバイスを頂けませんでしょうか

242:デフォルトの名無しさん
07/10/29 19:57:44
>>241
""\\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形式となる)。

243:デフォルトの名無しさん
07/10/29 21:09:11
Runするのにフルパスは要らん

244:デフォルトの名無しさん
07/10/29 21:23:50
>>242
runしたらその情報が自動的に使われるのでは？

245:デフォルトの名無しさん
07/10/29 22:04:02
>>244
Runの仕様上はそうだから、RegReadする必要がないと言えばないですよ

246:デフォルトの名無しさん
07/10/30 01:51:30
確かにRunで動かすだけならフルパスは要らないな。
でも、ローカルでコマンドライン引数渡そうとしたらフルパス必要、と。

結局、WebからWSH使って引数渡すにはどうすればいいんだろ？

247:デフォルトの名無しさん
07/10/30 02:39:14
だいじょうぶ？

248:デフォルトの名無しさん
07/10/30 04:34:44
標準入力

249:241
07/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ファイルのフルパスのみで可能でしたが。

なかなか難産でしたが、ようやく先に進めます。
ありがとうございました。

250:デフォルトの名無しさん
07/10/30 15:51:10
わからんやっちゃ

251:デフォルトの名無しさん
07/10/31 20:27:52
WMIでthreadの数は分かりますが、どれがなんのthreadか調べるにはどうするのでしょうか？

252:デフォルトの名無しさん
07/10/31 22:00:10
意味が分からん
スレッドってもんを正しく認識できてる？

253:デフォルトの名無しさん
07/11/01 09:13:48
理解してないだろうね
こういう子には

>>251
1年勉強して出直しなさい

ということで

254:デフォルトの名無しさん
07/11/02 14:43:43
Win32_Thread.Name

255:デフォルトの名無しさん
07/11/11 00:27:43
WSHで、キーボードのボタンのどれを押したかを取得する方法はないでしょうか？
たとえば、tabボタンやカーソルキーを押した場合を考えています。

256:255
07/11/11 00:36:14
追加です。
想定しているのは、while(true){...}のなかに処理が入ったときに、
コンソール上からタブボタンを押すと、while(true)からぬけるようなものです。

次ページ