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

WSH(・∀・)ｽﾚｯﾄﾞ! ..

97:デフォルトの名無しさん
04/11/18 01:18:26
ウィンドウの無いプロセスを終了→起動させたいのだけど、
終了のさせ方がわかりません。ウィンドウがあれば、
>>72でできそうなんですが。

98:デフォルトの名無しさん
04/11/18 02:34:30
>>97
WMI を使う。
URLﾘﾝｸ(www.microsoft.com)

99:97
04/11/20 01:43:21
>>98 有難う！　と言いたいのですが、WSHでないのが残念！です。

100:デフォルトの名無しさん
04/11/20 03:18:16
そいつは残念だ。

101:デフォルトの名無しさん
04/11/22 15:07:28

102:デフォルトの名無しさん
04/12/27 21:23:04
　

103:デフォルトの名無しさん
05/01/12 07:48:35
msgbox("新年あけましておめでとうございます")

104:デフォルトの名無しさん
05/01/12 17:42:38
質問ｽﾏｿ。WSHでIEオブジェクトを扱った時、ページ内のJavaScript Functionって
呼べないのかな・・

105:デフォルトの名無しさん
05/01/12 23:23:14
IEオブジェクトはWindows 2000である条件のもとだと使えネェな。
といってもその条件が特殊だからあんま意味ないか。

106:デフォルトの名無しさん
05/01/12 23:37:41
>>104
ページ内のスクリプト各関数は
大抵ボタンやリンクのonClickなんかに関連づけられてるから
そのイベントをfireEventするってのは？

107:デフォルトの名無しさん
05/01/21 00:49:26
すみません、全くの初心者なんですが、Wordのマクロから、
別のところに保存してある.vbsファイルを実行したいのです。
（要はWordで今選択している単語を、
コピーして別のアプリのウインドウに貼付けしたい）
Wordのマクロでとりあえず
Selection.Copy
でコピーはできたのですが、その後、
（１）別のアプリの起動
（２）そのアプリへの貼付け
がどうやるかわかりません。
どなたかどうぞよろしくお願いします。

108:デフォルトの名無しさん
05/01/21 00:57:43
shell
sendkey

109:デフォルトの名無しさん
05/01/21 00:58:57
>107
WScript.Run
Sendkey

110:デフォルトの名無しさん
05/01/21 01:15:59
WSHがマルチスレッドに対応！
かと思って
ぅぉ
っと声を上げてクリックしてしもたorz

111:デフォルトの名無しさん
05/02/25 06:44:32
ｽﾚﾘﾝｸ(hosp板:14-番)
このスレッドの１４番、１５番は、
URLﾘﾝｸ(www.roy.hi-ho.ne.jp)
ここで、公開されているスクリプトです。
このスクリプトを変形して、
フォルダ内(１層でいい)のファイル名＋サイズをテキストに書き出したいです。
ツリー構造はいりません。
私は、シェルうんぬんでわけがわからなくなりました。
虫のいい話ですが、どなたかお助け下さい。

112:デフォルトの名無しさん
05/02/25 07:05:15
>111
ややこしいと思うならshellを使わずにD&Dのみで作ればいいんじゃない？
ツリー構造いらないならそんなに難しいものでもないが。

113:１１１
05/02/25 07:18:11
>>112
これを機会にWSHを身に着けたいんです。

114:デフォルトの名無しさん
05/02/25 07:27:01
|д・）つC:\>tree TARGET_DIR /a /f > OUT_FILE

115:１１１
05/02/25 08:00:18
どうも有り難うございます。　>>114
つーか、私が最終的にやりたい事は、
ターゲットのフォルダに、
なっち.jpg 2.100 KB
あやや.mp3 45.777KB
つんく.txt 300KB
　‥‥
とあったら、別のフォルダに、
なっち.jpg 2.100
あやや.mp3 45.777
つんく.txt 300
　‥‥
とゆう名の0KBのテキストファイルを作りたいんです。
これを１発でやるには、WSHが最適だと思うのですが、どうでしょう？

116:デフォルトの名無しさん
05/02/25 10:02:49
>>115
そうですね。そう思います。

117:114
05/02/25 10:07:24
ちゃんと読んでなかった。流して。
そんなに難しいことじゃないので、そのうち自己解決するでしょう。
あと、どこがわからないのかを書くといいと思う。

118:１１１
05/02/25 10:08:13
URLﾘﾝｸ(www.roy.hi-ho.ne.jp)
Dim WSHShell
Set WSHShell = CreateObject("WScript.Shell")
これは、１行目でWSHShellの変数の宣言をしてから、セットしてるのに、

ｽﾚﾘﾝｸ(hosp板:14-番)
Dim sLine,sRootDir,sOutFile
Set Fs = WScript.CreateObject("Scripting.FileSystemObject")
Set Shell = WScript.CreateObject("Shell.Application")
これは、Fs、Shellを変数の宣言をしないでセットしてるのが疑問です。

119:１１１
05/02/25 11:08:25
ｽﾚﾘﾝｸ(hosp板:14-番)

Search oRootDir.Items.Item 'oRootDir.Self 'Win2000の場合

'はレム文の始まりだと思うけど、何で１行に２つあるのか、わかりません。

120:１１１
05/02/25 11:24:41
つーか、大昔にクイックCをちょこっとだけ、かじった事があるんですが、
始めから、
WScript.Echo "終了"
ここまでが、メイン関数
Sub Search(obj)
ここから最後までが、呼ばれる関数ですよね？
で、
Search oRootDir.Items.Item 'oRootDir.Self 'Win2000の場合
ってことは、Win2000以外の場合は、Search(obj)を使わない、って事ですか？

121:デフォルトの名無しさん
05/02/25 12:36:50
>>118
BASICは変数宣言しなくてもいいのです。

>>119-200
Win2000の場合は
Search oRootDir.Self
にしろって意味です。

122:４０１
05/02/25 23:26:19
>>121
そうですか、レス有り難うございます。

ｽﾚﾘﾝｸ(hosp板:14-番)
つーか、誰かこのスクリプトを削って、
フォルダ内(１層でいい)のファイル名＋サイズをテキストに書き出すのみのスクリプトを書いてくれないかな？
複雑すぎてわかりません。

123:デフォルトの名無しさん
05/02/26 00:02:25
>>122

Set fso = CreateObject("Scripting.FileSystemObject")
Set src = fso.GetFolder(InputBox("コピー元フォルダ"))
Set dest = fso.GetFolder(InputBox("コピー先フォルダ"))
For Each f In src.Files
Set ts = dest.CreateTextFile(f.Name & " " & f.Size, False)
ts.Close
Next

124:１１１
05/02/26 01:49:25
>>123
うわあー、すばらしい、有難うございます。　感謝感謝です。
これで、HDDの整理に取り掛かれます。　感激です。

125:１１１
05/02/26 22:00:52
すみません、更なるお願いです。
>Set src = fso.GetFolder(InputBox("コピー元フォルダ"))
コピー元フォルダを自分で入力するのが面倒。マウスだけで入力したい。

>Set dest = fso.GetFolder(InputBox("コピー先フォルダ"))
これも面倒。自動で、C:\COPYフォルダ作りそこに入れて欲しい。
あと、ターゲットのフォルダに、
なっち.jpg 2.100 KB
あやや.mp3 45.777KB
つんく.txt 300KB
　‥‥
とあったら、別のフォルダに、
なっち 2.100
あやや 45.777
つんく 300
　‥‥
と、元のファイルの拡張子は省略して欲しい。
どうでしょうか？

126:デフォルトの名無しさん
05/02/26 22:57:43
>>125
「自分で入力するのが面倒。マウスだけで入力したい。」という君に
URLﾘﾝｸ(www.vector.co.jp)

「これも面倒。自動で、C:\COPYフォルダ作り」という君に
URLﾘﾝｸ(www.vector.co.jp)

127:１１１
05/02/26 23:09:58
URLﾘﾝｸ(www.roy.hi-ho.ne.jp)

Set Shell=Wscript.CreateObject("Shell.Application")
Set f=Shell.BrowseForFolder(0,"フォルダを選んでください")
MsgBox f.Items.Item.Path '選択したフォルダ名を表示

これを試してみると、２行目、文字１で、引数の数が一致していません。または不正なプロパティをしていしています。
'Shell.BrowseForFolder' 　コード、800A01C2　ソース、VBScript 実行時エラー
となってしまいます。

128:１１１
05/02/26 23:11:45
WSHで、お願いします。　>>126

129:１１１
05/02/26 23:21:27
つか、>>127は解決しました。２行目が間違いでした。
Set f=Shell.BrowseForFolder(0,"フォルダを選んでください",0)
引き続き、>>125をお願いします。

130:１１１
05/02/26 23:50:16
>>123さんのソースをいじって、
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Set Shell=Wscript.CreateObject("Shell.Application")
Set MOTOf=Shell.BrowseForFolder(0,"コピー元フォルダを選んでください",0)
Set dest = fso.GetFolder(InputBox("コピー先フォルダ"))
For Each f In MOTOf.Files
Set ts = dest.CreateTextFile(f.Name & " " & f.Size, False)
ts.Close
Next
とやってみました。コピー先フォルダの入力までは出来るんですが、
それ以後、エラーが出ます。
行５、文字１、オブジェクトでサポートされていないプロパティまたはめそっどです。
'MOTOf.Files'　コード、800A01B6　ソース、VBScript 実行時エラー
となってしまいます。

131:デフォルトの名無しさん
05/02/27 00:02:07
>111
つか、これを機会にWSHを身に着けたい、と言うなら、
1日ぐらいは自分で悩んで手を動かしてぐぐってトライアンドエラーを繰り返してみなさい。
それでどうしてもわからなければ聞きに来れば誰か教えてくれるかも知れない。

132:デフォルトの名無しさん
05/02/27 00:04:24
copyFolder = "C:\COPY"
Set objShell = CreateObject("Shell.Application")
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(copyFolder) Then
fso.CreateFolder(copyFolder)
End If
Set objFolder = objShell.BrowseForFolder( 0, "フォルダ選択", 0 )
If objFolder is nothing Then
WScript.Quit
End If
Set file = fso.CreateTextFile( copyFolder & "\FILES.TXT", True )
Set objFolderItems = objFolder.Items
For Each f In objFolderItems
If Not f.IsFolder Then
file.WriteLine( f.Name & vbTab & f.Size )
bname = fso.GetBaseName(f.Path)
name = copyFolder & "\" & bname & " " & f.Size
fso.CopyFile f.Path, name
fso.DeleteFile(f.Path)
End If
Next

133:１１１
05/02/27 00:11:18
>>132
おお、有難うございます。ちゃんと動きました。　感謝します。

134:デフォルトの名無しさん
05/02/27 00:53:13
>>111
・・・勉強しろよ

135:１１１
05/02/27 02:02:36
>>134
へぇ、勉強します。　つか、なんで>>130がエラーになるのか説明出来ますか？

136:デフォルトの名無しさん
05/02/27 02:23:55
>135
ぐぐってる？
BrowseForFolderで取得できるFolderオブジェクトと
FileSystemObjectのFolderオブジェクトとは別のものだから。
BrowseForFolderのFolderオブジェクトにはFilesコレクションがない。

137:デフォルトの名無しさん
05/02/27 03:00:10
ここは111様にみんなで貢献するスレッドです。
勉強しろとかぐだぐだ言わずに、111様がお聞きになられたことに素早く答えましょう。

138:１１１
05/02/27 03:54:04
>>136
要するに、２つの系列の異なるオブジェクト間でのデータのやり取りが出来ない、ってことですか？
だから、>>132のプログラムは
苦肉の策として、テキストファイルにデータを書き出し、それを再読してる、と。
これってビジュアルベーシックの仕様ですか？

139:１１１
05/02/27 04:00:31
とはゆうものの、>>123さんと>>132さんには非常に感謝してます。

140:デフォルトの名無しさん
05/02/27 04:17:52
>138
違う。
Shell.ApplicationとScripting.FileSystemObjectにはたまたま同じ「Folder」という
名前のオブジェクトがあってよく似た構造をしてるけど、実際には全く違うもの。
だから当然使い方も違う。
BrowseForFolderのFolderオブジェクトはFilesというプロパティはない。
BrowseForFolderのFolderオブジェクトからはItemsというコレクションで取得して
FileかFolderかを判別する必要があるの。

FileSystemObjectから取得したFolderオブジェクトであれば>130でOKだった。

141:デフォルトの名無しさん
05/02/27 10:20:02
>>111
(ry

142:デフォルトの名無しさん
05/02/27 12:54:11
>>111
早く死ねよお前

143:デフォルトの名無しさん
05/03/01 06:12:31
WSHか…
仕事中にコソーリ、トランプゲーム組む時に使う程度かな
一見エディタ開いてコード書いてるわけだが、
んなことしてるなんざ、周りに言えないな…ｗ

144:１１１
05/03/02 11:56:42
>>132
つか、これ俺の希望とは違うわ。

ターゲットのフォルダに、
なっち.jpg 2.100 KB
あやや.mp3 45.777KB
つんく.txt 300KB
　‥‥
とあったら、別のフォルダに、
なっち 2.100
あやや 45.777
つんく 300
　‥‥
と、拡張子のない、0BYTEのテキストファイルを作って欲しい
あと、元ファイルは消さない
です。

145:デフォルトの名無しさん
05/03/02 12:07:36
>>144
あなたの主張は理解できました。

がんばってくださいね

146:デフォルトの名無しさん
05/03/02 13:33:44
@echo off
for %%I in (%1\*.*) do type nul>"%2\%%~nI %%~zI"

147:デフォルトの名無しさん
05/03/02 19:38:35
ここは111様にみんなで貢献するスレッドです。
勉強しろとかぐだぐだ言わずに、111様がお聞きになられたことに素早く答えましょう。

148:デフォルトの名無しさん
05/03/02 23:27:09
132は111が戻ってこれないよう元ファイルだけじゃなくて
全てのファイルを消すようにしておきゃよかったのに。

149:デフォルトの名無しさん
05/03/03 01:26:38
どっかに「リクに答えてスクリプトを作るスレ」って無かったっけ？

150:デフォルトの名無しさん
05/03/03 02:22:33
ソフト板にあったような。スクリプト限定じゃないけど

151:デフォルトの名無しさん
05/03/03 02:51:37
「こんな」でスレ検索するとごろごろ引っかかるな。

152:デフォルトの名無しさん
05/03/03 04:52:36
ｽﾚﾘﾝｸ(tech板)
ｽﾚﾘﾝｸ(tech板)

153:デフォルトの名無しさん
05/03/05 06:11:22
すみません。Irvineスレで聞くべきなんですが、全く、反応が無いんです。
IrvineのRegistDateやSuccessDateのフォーマットって何なのかご存知の方、いらっしゃいますでしょうか？

154:デフォルトの名無しさん
05/03/11 03:28:55
ここ何のスレだっけ？

155:デフォルトの名無しさん
05/03/11 07:33:15
ソフト起動は以下のコマンドでやっているのですが。
ソフトを終了させるのは、どのように記述すればいいのでしょうか。

set ws = CreateObject("WScript.Shell")
ws.Run "　　　"

初歩的な質問で恐縮なんですが、よろしくお願いします。

156:デフォルトの名無しさん
05/03/11 07:44:47
>155
終了を待つことはできるけど、終了させることはできない。
SendkeysでALT+F4とか。

157:デフォルトの名無しさん
05/03/11 08:12:13
RunでなくてExec使えば？
Terminateあるよ。

158:デフォルトの名無しさん
05/03/11 10:34:44
>>156
>>157
ありがとうございます。それでやってみます。

159:デフォルトの名無しさん
05/03/12 03:31:39
IISでCGIの処理にWSHを使おうと思っているのですが、
スクリプトは正常に動いているのにURLから実行すると

CGI Error
The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:

CScript エラー: 設定の読み込みに失敗しました。 (アクセスが拒否されました。
)

というエラーが出てきてしまいます。
IIS側の設定でスクリプトマッピングは

拡張子 .XXX
実行ファイルのパス C:\winnt\system32\cscript.exe //nologo %s

みたいにしているのですが・・・

160:デフォルトの名無しさん
05/03/12 07:04:38
IUSR_XXXX
IWAM_XXXX
をAdministratorsに汁
URLﾘﾝｸ(www.users.gr.jp)
URLﾘﾝｸ(www.roy.hi-ho.ne.jp)

161:153
05/03/12 09:20:14
>154
どうもすみません。それでは質問を少し変えさせていただきます。
RegistDateというのは、ダウンロードの開始日時を表すdouble値なのですが、例えば、
38387.3075909722
というのが、Irvineの画面では
2005/02/04 07:22:55
と表示されています。
38394.2332972222
の場合が
2005/02/11 05:35:56
と表示されます。
おそらく、いつか特定の年月日からの経過秒数とかそういう値だと思うのですが、longでなくdoubleだというのが私には謎です。
日時を扱ったことのあるプログラマの方々、double形式が出てくることに何か心当たりはないでしょうか・・・？

162:デフォルトの名無しさん
05/03/12 09:34:35
(02/11 05:35) - (02/04 07:22) = 6日と22時間
(38394.23329) - (38387.30759) = 6.927

163:デフォルトの名無しさん
05/03/12 09:45:56
>161
date型は内部的にはdouble型で扱ってる。

dbldate=38387.3075909722
call msgbox(CDate(dbldate))

164:デフォルトの名無しさん
05/03/12 22:41:56
>>162-163
「何でdoubleを使ってるのか？」
という質問の答えになっていないと思う。

165:デフォルトの名無しさん
05/03/13 01:00:37
>>164
long だと 2038年1月18日までしか数えられないから。

こんなカンジの答えを希望？

166:161
05/03/13 06:08:57
CDate()で変換できるのですか！
うーん、奇妙！
ビット数の関係でdoubleなのでは、とは思っていましたが・・・
WSH(VBScript?)のdoubleって何バイトでしたっけ？
どうもありがとうございました。

167:デフォルトの名無しさん
05/03/13 10:28:55
>166
64bit

168:デフォルトの名無しさん
05/03/13 18:28:40
>>166
8バイト

169:デフォルトの名無しさん
05/03/16 05:41:48
自分で作ったアプリを WSH で制御しようとおもったら，
あらかじめ決められたインターフェイスを持った COM オブジェクトにしないとダメってことですか？
ってことは， C# で作っているアプリを WSH で制御できるようにするのは難しい？

170:デフォルトの名無しさん
05/03/16 05:55:19
HWNDを元に考えられる限りの窓遠隔操作機能を持ったCOMを誰か作ってくれないかな。

171:デフォルトの名無しさん
05/03/17 09:34:26
DynaCall

172:デフォルトの名無しさん
05/03/20 05:27:53
私、VBSしかわからないんですが、DateオブジェクトってどうしてJSでしか使えないんですか？

173:デフォルトの名無しさん
05/03/20 10:38:22
>>172
使えますよ。

<job>
<script language="JScript">
dt = new Date();
</script>
<script language="VBScript">
MsgBox dt.toUTCString()
</script>
</job>

174:デフォルトの名無しさん
05/03/20 16:02:18
>>43
XULのこと？HTAとは激しく別物かと思いますよ

HTAは通常のDHTMLを使ったWebページと同じくscriptタグ中に埋め込まれた
JScriptやVBSを呼び出すことで動作を表現する。

XULはそれ自体がXML準拠の構文でプログラムの動作を記述したもので
Mozillaのコアエンジンを通して実行される

と解釈してるが

175:デフォルトの名無しさん
05/03/26 14:25:44
>>173
同じ例に汁。

176:デフォルトの名無しさん
05/04/03 14:18:22
>>173
1年前の書き込みにレスしてどうする

177:デフォルトの名無しさん
05/04/03 14:19:04
アンカーミス>>733→>>734

178:デフォルトの名無しさん
05/04/03 23:39:59
>177
いつへのアンカーなんだよｗ

179:デフォルトの名無しさん
05/04/04 08:56:57
このペースだと6年後くらいだな。

180:176
05/04/04 17:04:29
はずぃ>自分

181:デフォルトの名無しさん
05/04/05 23:58:34
取得した文字列の中身が全部 US ASCIIかどうかチェックしたいのですが、何かいい方法ないでしょうか？
CだとIsAscii()があるのですがWSHだとないので。。。。

182:デフォルトの名無しさん
05/04/06 13:13:55
>>181
アルファベットまたは数字、いくつかの記号
にマッチするか調べればいいんじゃない？

183:デフォルトの名無しさん
05/04/07 01:05:54
181だけど事故解決しました
面倒くさがらずに自分で作らないとだめだね
CHRつかうのとREGEXP使うのとどっちがパフォーマンスいいのかなあ
どぴゅ

184:デフォルトの名無しさん
05/04/09 00:02:19
　(　ﾟдﾟ)ノ　ハイ！質問です！

msgbox　2^64
を実行すると

1.84467440737096E+19
と表示されます。

１５桁を超えるものは指数を使って表示されるようですが、整数で表示する事は出来ますか？

185:デフォルトの名無しさん
05/04/09 00:45:39
文字列に変換

186:184
05/04/09 00:50:30
>>185

文字列に変換は、Cstr()　ですか？
Cstrは試して見ましたが、表示に変化はありませんでした。

それとも他の方法でしょうか？

187:デフォルトの名無しさん
05/04/09 01:43:09
多倍長整数使えよ

188:デフォルトの名無しさん
05/04/09 11:05:17
変換したら加工せにゃ

189:デフォルトの名無しさん
05/04/16 15:48:13
質問です。
あるﾌｫﾙﾀﾞ２つのファイルを比較します。
２つのﾌｫﾙﾀﾞの拡張子は例としてtxtとvbsです。
拡張子がちがう同じファイル名のファイルの
最終更新日時を比較します。ファイル名は大量の為特定できません。
比較してvbsのほうが日付が古ければ
ｴﾗｰとしてﾃｷｽﾄファイルに書き出す
という、vbsを作りたいのですがどなたかわかりますか？

190:デフォルトの名無しさん
05/04/16 16:23:36
>189
１．フォルダAとフォルダBがある。
　　（フォルダAには拡張子vbsのファイルが、フォルダBには拡張子txtのファイルが入っている）
２．フォルダAからファイルをひとつ取り出す
３．フォルダBから拡張子を除いた部分の名前が同じファイルを探す
４．フォルダAとフォルダBのファイルの更新日時を比較して、
　　フォルダAのファイルが古ければテキストファイルにエラーを出力。
５．フォルダAのファイルが無くなるまで２～４を繰り返す

こういうフローでいいならできる。

191:デフォルトの名無しさん
05/04/16 17:52:35
>>190
できたら作ってくれませんか？m(__)m

192:デフォルトの名無しさん
05/04/16 17:56:50
>>191
逝ってよし。

193:デフォルトの名無しさん
05/04/16 21:48:46
　　　　　　　　　　　 _,ノ‐''''''^^^¨¨¨⌒￣⌒^^''￢-､,_
　　　　　　　　._v-''¨｀　　 .,,vｰ─-､　　　 .,,vｰ─-､ .¨'ｰu_
　　　　　　_ノ'″　　　　./′　　　 ¨┐ .／　　　　ﾞ┐　 .ﾞ'┐
　　　　 ,／′　　　　　 ./￣''''-￢,,,,__.ﾐ .i |,,,,＿＿_　..）　　　ﾞ＼
　　　 ,/′　　　　 λ 　|　　　　（･ )|　｝　.¨'ｰu,,　　|　　　　　＼
　　 ./′　　　　　八,､-ﾐ.ノ‐''''''^^￣./¨ﾚ　　　　　 .人,_　　　　　ミ
　 .,ﾉ′　　　　._ノＵ'　　＼_　　 ._,rlﾄ冖へy　　　_／　 ¨'‐u　　　.ﾞlr
　.,i′　　　　　／ｰ-v､.,,_　　 ¨^^¨´〔　　　〕.¨^^¨′　　__.,､ﾞ＼.　｛
　〕　　　　　 ./′　　　　.⌒'''''　　　＼,,,,,,ノ′　 v-ｰ'''¨　.λ　　ﾞ┐ ｝　　　　＿＿＿＿＿＿＿＿＿＿
　|　　　　　ﾉ　 .λ──ｰ　　　　　　｝　　　　　 __,,.,､v;（_）ｰ''　｛..］　　／
　|　　　　　:|　　 | |　　　　　　　　　　　　.!　　　　　｀　　　　　　　 .｝｝＜　きがるにいってくれるなあ。
　｝　　　　 .|　　 .Ｕ-:;:冖^￣　　　　　　 .|　　　　　 ¨¨¨¨¨￣¨¨′ ﾐ｝　　＼
　.|　　　　.｝　　　　　　　_,,,,,ｖｖl''''¨¨|^^⌒|¨¨''''lｖｖ,_　　　　　　　　｝　　　　￣￣￣￣￣￣￣￣￣￣
　 ).　.　　　〕　　　 ,,､-v~|　　 .|　　　|　　 |　　|''Ｔ＾i-,,_　　　　　　/
　 .｛　　　　). ., r'z::''''~ﾞ(~~￣￣￣￣￣￣~~~`^^^^''''￢;;;＿　　ﾉ
　　ﾐ.　　　 `i,　　　　　　　　　　　　　　　　　　　　　　　 ,　`''　/
　　　ﾞ).　　　 `i,　　　　　　　　　　　　　　　　　　　　　　　　.,ﾉ　　λ
　　　　＼　　　 },　　　　　′　　　　　　　　　　　　　　　.　　／　　　| |
　　　　 .　＼　　＼　　　　　　　　　　　　　　　　　　.　　,／　　　　 ∪
　　　　　　（¨¨¨¨¨¨¨¨¨¨¨¨¨¨ﾞソ冖干ｱ^^^^^^^^^^^^^ｒ'′
　　　　　／~~~~~~~~i￢冖'''''7′　　　∨￢ｰｰz─-―「＼
　　　　　/　　　　　_ﾉ　　　　　厂¨丁¨¨ﾌ　　　　.ﾐ､　　　　ﾞ＼

194:デフォルトの名無しさん
05/04/17 16:22:30
質問です。
XPを使っているのですが、デスクトップからスタンバイに移行するのに
Dim objShell
Set objShell = WScript.CreateObject("Shell.Application")
objShell.Suspend
というコードを使えばできると書いてあったんですが、
スタンバイに移行できません。
このコードはXPでは使えないのでしょうか?

195:デフォルトの名無しさん
05/04/18 02:05:49
>>191
せっかくアルゴリズムまでは教えてくれてるんだからヘルプファイル読みながらでも
自分で作んなさいよ

196:191
05/04/20 11:13:48
行き詰まってつい・・・・。でも、なんとかできました。
190さん、ありがとう。

197:191
05/04/21 06:45:27
できたのですが、ファイルがたくさんある場合に今どれくらい
進んでいるのか進捗状況を表示させられたらいいと思っているのですが、
今何％進んでいるか(プログレスバー？)を表示させるには
どうすればいいですか？検索とかしてるんですが、みつかりません。
無理なんでしょうか？

198:デフォルトの名無しさん
05/04/21 07:12:56
>>197
プログレスバーは無理な希ガス

cscriptから起動させて、文字列出力させたら？

199:191
05/04/21 07:37:13
>198氏
朝早くありがとうございます。無理ですか・・・。
しかたないのであきらめます。

200:デフォルトの名無しさん
05/04/24 23:25:02
この文なんですが

mLocation = FindFromText( pos, html, "<td valign=""top""><strong>■", "</strong><br>", "" )
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　↑　　　　　　　　　↑
矢印で示した部分のコンマに当てはまる文字列を変数posとhtmlにそれぞれ返すいうことですか？

201:デフォルトの名無しさん
05/04/24 23:53:46
>>200
書いたやつに聞けよ・・・

"<td valign=""top""><strong>■" と、 "</strong><br>" にはさまれている文字を
mLocation に返すみたいだが・・・

202:デフォルトの名無しさん
05/04/25 01:17:55
>201
そうだな
サンクス

203:デフォルトの名無しさん
05/05/08 14:40:39
すいません，VBScriptでレジストリ操作をしたいんですが，
あるレジストリキーが存在するかどうかを確認する方法はありますか？
RegReadで存在しない値を参照してエラーが出てしまうんですが
回避方法がわからないんです．

204:キー列挙ならWMIの方が楽だよ
05/05/08 15:02:33
>>203
On Error Resum Nextじゃダメ？

205:204
05/05/08 15:02:56
Resum→Resume

206:デフォルトの名無しさん
05/05/08 15:06:25
>>204
それはアレですよね，エラー無視．
最初はそれにしてたんですが
他の部分でエラー出たりすることもあるしどうかなぁ　と．

というか，エラー無視で強引に進めるのって怖くありません？

207:デフォルトの名無しさん
05/05/08 15:09:39
ちなみにHTAを使って割りと複雑な操作をするんで
VBScript+HTAじゃないとダメっぽいです．

RegDeleteもサブキーがあるとエラーとかいう意味不明な仕様ですが
あれも何とかならんでしょうか。
今は　oWsh.Run("reg delete "HKCR\.dat" /f)　とこんな事をしてます．
でもreg.exeを使うと動作にタイムラグが・・・＿|￣|○

208:デフォルトの名無しさん
05/05/08 19:03:25
URLﾘﾝｸ(www.microsoft.com)

209:デフォルトの名無しさん
05/05/09 02:20:54
>>203
>>208 の手段でも良いし、条件分岐させれば良いだけじゃないのか。

210:デフォルトの名無しさん
05/05/09 03:00:18
>>208，209
そうですね，208ので全部消していくかな．
条件分岐っていうのは？
レジストリキーが存在するかどうかが調べられないのに
どう条件分岐させるんですか？

211:デフォルトの名無しさん
05/05/09 20:16:32
>>210
当初 >>203 で言っていた「あるレジストリキー」というのがいくらかでも
特定されたものであれば、レジストリキーの有無で条件分岐できるだろうと
いうこと。今回言っているように、どのようなキーが存在するかさえ不明で
あれば >>208 の示した手段がベター。

212:デフォルトの名無しさん
05/05/09 20:56:52
>206
エラーの出そうな操作の直後に
if err<>0 then
　～
end if
でエラーの場合の動作を（msgboxとかexit doとか）。

213:デフォルトの名無しさん
05/05/09 23:32:34
>>211
すいません、レジストリキーの有無ってどうやって調べるんですか？

214:デフォルトの名無しさん
05/05/11 21:46:18
キーをオープンしてみれば分かる

215:デフォルトの名無しさん
05/05/11 21:46:36
>>213
そのくらい調べりゃすぐ分かるだろ
自分で調べろよ

216:デフォルトの名無しさん
05/05/14 10:59:37
すいません、キーはどうやってオープンすればいいのか…

217:デフォルトの名無しさん
05/05/14 18:33:51
キーを読み取ってみてエラーが発生したら分岐させる？

218:デフォルトの名無しさん
05/05/16 18:58:29
急速にスレの質が低下してまいりました

219:デフォルトの名無しさん
05/05/17 14:07:51
急速という割には、ペース遅すぎな希ガス

220:デフォルトの名無しさん
05/05/20 13:45:42
スレッドストッパーの俺様が来ましたよ

221:デフォルトの名無しさん
05/05/20 22:35:57
そこでｽﾚｯﾄﾞﾘﾊﾞｲﾊﾞｰの漏れ様の登場ですよ

222:デフォルトの名無しさん
05/05/20 23:09:32
そこでﾊｲﾊﾟｰｽﾚｯﾃﾞｨﾝｸﾞな俺様の登場ですよ！！

223:デフォルトの名無しさん
05/05/23 01:18:56
おまいらちっとはwsh使へ

224:デフォルトの名無しさん
05/05/23 23:05:05
いやぷぅ(~o~)

225:デフォルトの名無しさん
05/05/24 23:12:11
バッチファイルと違って、タスクマネージャくらいからしか強制終了できないのが辛い。
あとは時間指定ぐらいですかね？
でも、環境によって実行時間が違ってくるから時間による終了は入れたくないなぁ。

226:デフォルトの名無しさん
05/05/25 02:25:23
バッチで強制終了させりゃいいじゃん。
バッチでできんことはWSHにやらせて。

227:デフォルトの名無しさん
05/05/25 19:59:47
向き不向きを考えて使えって事か。
そりゃそうか。

バッチファイルで何行も同じようなこと書きたくないなぁと思って
vbsならスマートかな、と思ってやってみたんですた。
まぁコマンドプログラム呼び出すたびにアクティブなウインドウがそっちに移るんで
それも困ってたﾄｺなんでやっぱバッチのほうが向いてるかも

228:デフォルトの名無しさん
05/05/26 05:03:19
>225-227 cscript.exe もちゃんと使おうな

229:225=227
05/05/26 19:59:30
URLﾘﾝｸ(www.atmarkit.co.jp)
コマンドラインスクリプトのことかーーーー！！！
初めて知りました。
多謝でつ。

230:デフォルトの名無しさん
05/05/27 12:38:44
WSHは略だけど
CScriptも略してCSHとは言わんな

231:デフォルトの名無しさん
05/05/27 22:27:43
wshはwscript.exeの略じゃないし

232:デフォルトの名無しさん
05/06/01 13:26:13
JScriptでショートカットのファイルを吐き出したいです
どうすれば出来ますか？

233:デフォルトの名無しさん
05/06/01 14:11:25
>>232
URLﾘﾝｸ(www.microsoft.com)

234:デフォルトの名無しさん
05/06/01 15:51:26
>>233
ありがとう

235:デフォルトの名無しさん
05/06/01 18:24:40
一定の間隔をおいて標準入力をテキストファイルに出力するにはどーしたらいい？
おしえてー

236:デフォルトの名無しさん
05/06/01 22:30:52
>235
一定の間隔とは行間のことだと勝手に想像して書いてみる
んでもって言語の指定ないから勝手にJScript

var ROW_SPACES=1;
var a=WScript.StdIn.ReadAll().split("\r\n");
var f=new ActiveXObject("Scripting.FileSystemObject").CreateTextFile("outfile.txt");
for(var i=0;i<a.length;i++){
f.WriteLine(a[i]);
for(var c=0;c<ROW_SPACES;c++)f.WriteLine();
}
f.Close();

237:デフォルトの名無しさん
05/06/02 01:45:36
間隔っつったらやっぱ時間じゃねえの？

while (!WScript.StdIn.AtEndOfStream) {
WScript.StdOut.Write(WScript.StdIn.ReadAll());
WScript.Sleep(10000);
}

238:236
05/06/02 02:20:20
>237
標準入力→テキストファイル、ってあるから
多分行間じゃないかなあと予測した
逆なら劣化ページャみたいな物と予測したのだけど

あと StdIn.AtEndOfStream() は試したら
存在しないみたいでエラー出たから ReadAll()

239:デフォルトの名無しさん
05/06/02 03:24:38
時間だとすると標準入力をテキストファイルに出力するのに一定の間隔を空ける意味が良く分からん

240:236
05/06/02 15:24:26
>239
そう、私もそれが言いたかった、ごめん＿|￣|○

てか、StdIn.AtEndOfStream てプロパティだから
括弧付けると駄目なのね…逝って来る＿|￣|○

241:デフォルトの名無しさん
05/06/03 17:59:10
ひょっとしてこういうことがしたいのかも

do while True
do while (not WScript.StdIn.AtEndOfStream)
WScript.StdOut.Write(WScript.StdIn.ReadAll())
loop
WScript.Sleep(5000)
loop

242:デフォルトの名無しさん
05/06/05 17:59:02
>241
ReadAllなのにAtEndOfStreamを待つのか？

243:デフォルトの名無しさん
05/06/05 20:51:29
tail -f
みたいな動きをさせるためじゃないかな

244:デフォルトの名無しさん
05/06/10 09:57:18
「デヴァイスマネージャ」の
「USBルートハブ」を無効にして
再度，有効にするという操作を
WSH にしてみてください

245:デフォルトの名無しさん
05/06/10 12:35:24
msgbox "USBハブのコード抜け"
msgbox "抜いたらもう一回挿せ"

246:デフォルトの名無しさん
05/06/10 12:50:41
>>245
【ご主人様】メイドさんスクリプト【ご命令を】
ｽﾚﾘﾝｸ(tech板)

247:デフォルトの名無しさん
05/06/10 14:01:26
Private Sub Command1_Click()

Dim UsbSet As SWbemObjectSet
Dim Usb As SWbemObject
Dim Locator As SWbemLocator
Dim Service As SWbemServices
Dim MesStr As String

Set Locator = New WbemScripting.SWbemLocator
Set Service = Locator.ConnectServer
Set UsbSet = Service.ExecQuery("Select * From Win32_USBHub")

For Each Usb In UsbSet

MesStr = MesStr + "USBハブの名前：" + Usb.Description + vbCrLf + _
"USBハブのデバイスID：" + Usb.DeviceID + vbCrLf

Next

MsgBox "USBハブの情報です。" + vbCrLf + _
vbCrLf + MesStr + vbCrLf + "ですよ。"

Set UsbSet = Nothing
Set Usb = Nothing
Set Locator = Nothing
Set Service = Nothing

End Sub

248:デフォルトの名無しさん
05/06/10 14:03:22
Private Sub Command1_Click()

Dim UsbSet As SWbemObjectSet
Dim Usb As SWbemObject
Dim Locator As SWbemLocator
Dim Service As SWbemServices
Dim MesStr As String

Set Locator = New WbemScripting.SWbemLocator
Set Service = Locator.ConnectServer
Set UsbSet = Service.ExecQuery("Select * From Win32_USBController")

For Each Usb In UsbSet

MesStr = MesStr & Usb.Name & vbCrLf

Next

MsgBox "USBコントローラの一覧です。" & vbCrLf & _
vbCrLf & MesStr & vbCrLf & "ですよ。"

Set UsbSet = Nothing
Set Usb = Nothing
Set Service = Nothing
Set Locator = Nothing

End Sub

249:デフォルトの名無しさん
05/06/10 14:10:00
URLﾘﾝｸ(www.microsoft.com)

250:デフォルトの名無しさん
05/06/10 14:44:59
>>244
UWSC使ってみ

URLﾘﾝｸ(www.h7.dion.ne.jp)

251:デフォルトの名無しさん
05/06/15 10:03:13
ご存知の方いらしたらご指導お願い致します

var oShell = WScript.CreateObject("Shell.Application");
var oFolder = oShell.NameSpace("fURLﾘﾝｸ(192.168.*.**)保存/");

var desktop = oShell.NameSpace(0);
var objFolderItems = desktop.Items();
for(var i = 0; i < objFolderItems.Count; i++) {
var ofitem = objFolderItems.Item(i);
if(ofitem.Name == "日報.xls") {
oFolder.CopyHere(ofitem);
WScript.Sleep(6000);
break;
}
}

日報.xlsをサーバーにFTPを使ってコピーするプログラムを作成しました
前日の同名ファイルに上書きして毎日保存しているのですが
ファイルの上書き確認ダイアログが出てしまうの非表示にして自動的に
上書きしたいのですが、よろしくお願い致します。

252:デフォルトの名無しさん
05/06/15 10:17:31
ふつうにftpコマンド使った方がよくね？

253:デフォルトの名無しさん
05/06/15 10:47:54
>>252
というと確認ダイアログをちゃんと出したほうが良いということでしょうか？
一応、転送終了後にファイルの更新日時や内容を軽くchkしていますので
サーバー側で定期的に別フォルダにバックアップしているので、間違いで
上書きしてもとりあえず問題ないのです

objFolder.CopyHere vItem, [vOptions]
FOF_NOCONFIRMATION 0x0010 上書きしますかとか聞いてこなくなる

oFolder.CopyHere(ofitem, 0x0010);
oFolder.CopyHere(ofitem , 0x0010);
こんなのを見つけて直してみても直りませんね

254:252
05/06/15 11:35:37
>>253
いあ、ftpでファイルをアップするだけの用途なら、
-sオプション付けて、動作指定したファイル記述するだけで良さそうだなー

と思っただけ

255:デフォルトの名無しさん
05/06/15 12:30:00
なるほどそういう事でしたか、コマンドプロンプトでやるのでしょうか
wshで記述できるのでしょうか？
勉強不足でして、バッチファイルの作り方も危ういので
>>251
で晒したソースもよそ様のサンプルを使って作成したので理解度0に近いのです

256:デフォルトの名無しさん
05/06/15 13:08:51
コマンドプロンプトでもwshでも可能

ftpの-sオプションについては↓みれば大体分かると思う
URLﾘﾝｸ(www.atmarkit.co.jp)

257:デフォルトの名無しさん
05/06/15 20:02:10
その前に、ftpコマンドの成功、失敗の判定をスクリプトやバッチファイルでできるのか？

258:デフォルトの名無しさん
05/06/15 20:20:50
もう一回アクセスしてファイルの日付がアップロードした日時になってるかとか
サイズがローカルのものと同じになっているかとかをチェックすれば出来なくはない

259:251
05/06/16 10:07:09
報告遅くなりまして申し訳御座いません
それと皆様に助言頂き感謝しております。
ftpの-sオプションについて教えて頂いたサイトを目下勉強中ですが
構文エラーが出てしまいうまくいかない状況です。しばらくサンプルを
作成して試してみますので、どうしても分からなかったら又ご助言を
よろしく御願い致します

260:デフォルトの名無しさん
05/06/16 14:20:45
おしごとでWSH使ってるんですが、
WSHのファイルインクルードって vbs しかインクルードできんのですか？

<script langage=VBScript src="aaaaaaa.vbs"/>

これでWSHスクリプトをインクルードしようとすると最初のJOBタグでエラーになってこのやろうちくしょう。

vbsでファイルインクルードがあればいいんですが・・・。

261:デフォルトの名無しさん
05/06/16 18:48:58
langage

262:デフォルトの名無しさん
05/06/16 18:58:11
で、vbsのインクルードはできたのか？
日本語で質問してくれると助かる。

263:デフォルトの名無しさん
05/06/16 19:19:11
JScriptはほぼ同じ方法で取り込める
だがwsfを取り込むってのは出来ないハズ

wsfにコードを書くと再利用するときに困るから
私の場合、コードは全てvbsに書き、wsfは取り込むのみで使う

264:260
05/06/16 23:55:51
>>261
ちょっとあせってたのさ。

>>262
おいっす。落ち着きます。で。対象のvbsファイルをFileSystemObjectで開いて、
ReadAllメソッド使ってソースをひとつの変数に突っ込んでExecute関数で実行っていう方法なら見つかった。
vbsには正式なインクルードはないみたい。wsfにはあるけど。

↓詳しくは見てください。
URLﾘﾝｸ(www.trickpalace.net)

>>263
やっぱりそうなるのね orz
再利用できる共通コードの中で、別の共通コード使いたい場合で困りますよね。

265:デフォルトの名無しさん
05/06/17 05:46:46
まずはここの情報は全て押さえとくとヨロシ。
MS社員の有志というか暇というか。一応純正だからｗ
URLﾘﾝｸ(groups.msn.com)
FAQやDOWNLOADに情報満載。

266:デフォルトの名無しさん
05/06/17 13:24:19
>>265
Σ（ﾟдﾟlll）ｽﾞｶﾞｰﾝ。英語！？ｗｗｗ
（´∀｀；）ゝいやぁ。漏れ純正の日本人だから英語ﾀﾞﾒｽｗｗｗ

と思ったけど、FAQはクリックすればサンプルコード出てくるだけだからわかりやすいね。ｱﾘｶﾞﾀｽ

267:デフォルトの名無しさん
05/07/18 02:39:27
ﾎｽ

268:デフォルトの名無しさん
05/07/20 01:42:04
ﾎｼｭﾎｼｭ

269:デフォルトの名無しさん
05/07/25 22:41:51
ﾎｼｭﾎｼｭ

270:デフォルトの名無しさん
05/07/27 16:45:29
Windows2000にて
WSH使って、タスクスケジューラへ
自動的にタスクを追加するには
どうすればいいか御存知の方いますか？

昔、どこかで出来るような発言してる人がいたので
結構ググッたけど、見つからなかった・・・

271:デフォルトの名無しさん
05/07/27 17:22:24
XPだったらschtasks使えば楽そう
Win32_ScheduledJobはATコマンドと同等だったはずだし、

IScheduledWorkItemとかITaskScheduler辺りを使えばどーだろ・・・

272:270
05/07/28 15:13:25
>271

調べてみたけど、使い方よくわかんなかったので
ATコマンドで妥協しました。('A`)

XPはschtasksがあるからいいですね。

273:デフォルトの名無しさん
05/07/28 15:29:52
ATコマンドってモデムのアレですか？

274:デフォルトの名無しさん
05/07/28 15:36:55
>>273
釣りなのか、マジなのか、なんかの揚げ足取りなのか知らないけど

コマンドプロンプト開いて、「at /?」と入力してみれ

275:デフォルトの名無しさん
05/07/28 15:41:41
ああ、UNIXのat相当なんですね。大文字で書かれると分からんもんですね。

276:デフォルトの名無しさん
05/07/28 15:55:30
>>274
いや、モデムの方だろ

277:デフォルトの名無しさん
05/07/29 02:35:30
ｓｃｈｔａｓｋｓはユーザー権限でログオンしている時
管理者アカウントでタスクを実行しようとしても
拒絶されるから嫌いだ。

そのくせ10回に1回うまくいったりするあたり、
単なるバグなんじゃねぇかと。

278:デフォルトの名無しさん
05/07/31 12:46:54
>>277

うほっタイムリーなネタ
だから実行できなかったのか！
なんかいい解決方法ないのかな。
XPでATコマンドってまだ使えたっけ？

279:デフォルトの名無しさん
05/07/31 14:39:24
>>278
そう実行できない。
2002年から2003年にかけて死ぬほど検証したし
海外までググったしMSプレミアムサポートに問い合わせもした。
結局使えそうで使えないコマンドなんだわ。＜schtasks

XPでもATコマンドは使える。
ただ管理者アカウントでログオンしてないと
コマンドが受け付けられないので注意。
これはNT4時代からずっとそうなので諦めるしかない。
管理者アカウントでログオンするなら
schtasksだって使えるんだよね。。。

> なんかいい解決方法ないのかな。

これまで携わったプロジェクトでは
配布ソリューション(SMSやその類似品)を使って
バッチを配布して管理者権限でキックしたり、
管理端末から(ドメインAdminでログオン)から
目的の端末にリモート実行させたりしてた。
あとはスタートアップスクリプトに仕掛けたりとかそういう感じ。

あとはサーバーに「特定のテキストファイルがあれば
ファイル名と同名のユーザーの端末上でコマンド実行」
という趣旨の定期監視タスクを仕掛けておいて、
ユーザーがバッチを起動すると、
サーバー側で監視してるフォルダに
テキストファイルが作られるみたいな構成とか。
わずかな事やるのに結構遠回りしてるなぁ。orz

280:デフォルトの名無しさん
05/07/31 16:07:05
>>279
>海外までググったし
そうか。プログラミングのノウハウは国内にはあまり無いから
ググる時にも必ず「ウェブ全体」を選んでたけど
まだそういう時代じゃないんだな

281:デフォルトの名無しさん
05/07/31 16:26:33
>>280
や、失礼。
ググった結果(主に英語サイト)から
海外サイトを延々見てまわり、の方が正確。
お詫びして訂正します。ｺﾞﾒﾝﾁｬｲ。

どうでもいいがヘブライ語みたいなサイトも見たよ。
チンプンカンプンだっつーの。

282:デフォルトの名無しさん
05/08/04 22:35:08
（・∀・）ｱｹﾞ!!

283:デフォルトの名無しさん
05/08/06 22:53:34
WSHで起動中の特定の名前のウィンドウの
存在の有無を確認する方法ってありますか？

284:デフォルトの名無しさん
05/08/07 09:40:02
>>283
WMIでWin32_Processをクエリーするしかないんじゃねーの？
でもこの方法、WindowsXP以外はWMICoreのインスコが必要だったと思うが。

285:283
05/08/07 13:10:15
>>284
レスありがとうございます。自己解決しました。
VBScriptのappactivate("ウィンドウ名")=Falseで
判定することができました。

286:デフォルトの名無しさん
05/08/08 14:53:27
リンクリストみたいなコレクションありませんか？
ハッシュ(Scripting.Dictionary)と配列はあったのですが･･･。

やりたいことは、文字列をコレクションに溜め込んで、最後にJoinで一つの文字列にしたいのですが、
ハッシュだと溜め込むことはできそうですが、最後にJoinしたときに順番がバラバラになりそうで利用できません。

要素の追加にコストが掛からず、最後に文字列結合できるコレクションなどはないでしょうか。

287:デフォルトの名無しさん
05/08/08 16:55:07
>>286
Arrayではコストがかかりすぎるのでしょうか。

288:デフォルトの名無しさん
05/08/08 17:53:42
>>286
そりゃあデータ構造を考えれば普通に不可能だろう。

289:デフォルトの名無しさん
05/08/16 20:39:16
みんなデバッグ環境はナニを使ってる?

290:デフォルトの名無しさん
05/08/16 21:56:50
jsファイルダブルクリックして
テキストファイル出力で変数の値みる

291:デフォルトの名無しさん
05/08/21 01:11:37

var WShell = new ActiveXObject("WScript.Shell");
WShell.Run("c:\\******\\hoge.exe");
のように実行ファイルを動かし、hoge.exeからJScriptの変数に何らかの値を代入することは可能でしょうか？

292:デフォルトの名無しさん
05/08/22 13:25:15
>>291
こんな感じでしょうか。
この例ではHello, world!の後の改行までsに代入されてしまってますが。

----------
D:\>type hello.js
print("Hello, world!");

D:\>type hello2.js
var WshShell = new ActiveXObject("WScript.Shell");
var oExec = WshShell.Exec("d:\\hello.exe");
var s = oExec.StdOut.ReadAll();
WScript.StdOut.Write("[" + s + "]");

D:\>jsc /nologo hello.js

D:\>hello.exe
Hello, world!

D:\>cscript //nologo hello2.js
[Hello, world!
]

D:\>
----------

293:デフォルトの名無しさん
05/08/22 13:49:53
>>289
//X オプション + VSでデバグ。

次ページ