08/06/17 22:24:08
すいません。スレ違いだった為、WSHのスレに移します。
179:デフォルトの名無しさん
08/06/19 14:20:45
vbsで、フロッピーのフォーマットを確認なしで実行
する命令ありますか？A:\固定で。
180:デフォルトの名無しさん
08/06/19 18:20:54
>>179 何で確認しなくていいのか？
181:デフォルトの名無しさん
08/06/19 20:40:04
VBSにはファイルにアクセスする命令すらありませんよ
182:デフォルトの名無しさん
08/06/21 07:38:22
それを言うならC言語にもファイルにアクセスする命令は無いな
183:デフォルトの名無しさん
08/07/19 09:45:08
ここまで便利そうなコードが殆どない件・・・
184:デフォルトの名無しさん
08/07/19 11:24:47
>>183が便利そうなコードを書きまくるそうです＞＜
185:デフォルトの名無しさん
08/07/27 01:18:22
とりあえずExcelAddinをインスコするコードとかlnk右クリックでリンク先ディレクトリ表示とか
あるけど需要あるか？
186:デフォルトの名無しさん
08/07/30 21:22:27
test1.bin
test2.bin
test3.bin
これらファイルを選択状態にして、VBSファイルにD&Dすると、
ファイル名順にソートして、１つのファイルに結合するには、どうしたら良いのでしょうか？
１つのファイルを、指定サイズに自動分割するVBSはできたのですが、
その逆のことができるVBSファイルを作りたい。。。
ADODB.Recordset
ADODB.stream あたりを使えば可能？
187:デフォルトの名無しさん
08/07/30 21:26:24
copy /b
188:デフォルトの名無しさん
08/07/30 21:38:44
>>185
参考にさせていただきた
189:デフォルトの名無しさん
08/08/13 09:09:42
CIM_DataFileクラスを用いて、ファイルの各種情報を取得したいのですが、
「説明」のプロパティを取得するときに指定するプロパティ名が分かりません。
具体的には、例えばソリティア（C:\WINDOWS\system32\sol.exe）を
右クリックして表示されるプロパティの「バージョン情報」タブの２行目に
「説明：Solitaire Game Applet」と表示されますが、この値を取得したいのです。
ファイルバージョンなどは、「Version」プロパティで取得できております。
ご存知の方、ご教示お願い致します。
190:デフォルトの名無しさん
08/08/13 18:30:02
189です。
カキコするところ間違えたみたいなので、移動します。スミマセン。
191:デフォルトの名無しさん
08/08/17 21:29:36
>>186-187
作ってみた。
sdir = "C:\temp\" '出力先フォルダ
soutfb = "output.bin" '出力ファイル名
set osh = createobject("wscript.shell") 'シェルオブジェクト
set ofs = createobject("scripting.filesystemobject") 'ファイルオブジェクト
set oarg = wscript.arguments '引数オブジェクト
stmpf1 = "temp1.txt" '一時ファイル
stmpf2 = "temp2.txt" '一時ファイル
'ドラッグ＆ドロップしたファイル名を一時ファイルに格納
set out = ofs.createtextfile(sdir & stmpf1, true)
for each s in oarg
out.writeline s
next
out.close
192:デフォルトの名無しさん
08/08/17 21:31:54
（つづき）
'ファイル名のリストをソートして一時ファイルに格納
osh.run "cmd /c sort " & (sdir & stmpf1) & " > " & (sdir & stmpf2), 0, true
set oin = ofs.opentextfile(sdir & stmpf2)
s = oin.readline
'バイナリファイルのコピー
ofs.copyfile s, (sdir & soutfb)
do until oin.atendofstream
s = oin.readline
osh.run "cmd /c copy /b " & (sdir & soutfb) & "+" & s & " " & (sdir & soutfb), 0, true
loop
oin.close
'一時ファイルの消去
ofs.deletefile sdir & stmpf1
ofs.deletefile sdir & stmpf2
msgbox "OK"
↑以上、実行時は行頭の空白を半角に。
193:デフォルトの名無しさん
08/08/17 22:04:23
copyは性能的にしょうがないかもしれんがsortぐらい自前でやれよｗ
194:デフォルトの名無しさん
08/08/21 21:13:21
VBSにて、SNMP情報の取得を考えてるんですが、
wsnmp32.dll を利用することはできないんでしょうか？
dynwrap.dll というラッパー？も使えないのでしょうか
195:デフォルトの名無しさん
08/08/31 18:59:35
set shell32 = createobject("shell.application")
set fso = createobject("scripting.filesystemobject")
function recyclebin(pathname)
> path = fso.getparentfoldername(pathname)
set there = shell32.namespace(path)
set submenus = there.items.item(fso.getfilename(pathname)).verbs
I = 0
for each method in submenus
if strcomp(method, "削除(&D)") = 0 then
submenus.item(I).doit()
end if
I = I + 1
next
end function
recyclebin wscript.arguments(0)
ファイルやフォルダをドラッグアンドドロップすると、
ごみ箱に移すスクリプト。deletefile とかは
永遠に消えちゃうので不安だ．．．。
196:デフォルトの名無しさん
08/08/31 19:01:10
すまん、> は、なし。
197:デフォルトの名無しさん
08/08/31 21:05:24
それ、ごみ箱のショートカットと比べてどう便利なの？
198:デフォルトの名無しさん
08/08/31 21:32:26
ファイルをドラッグアンドドロップていうのは
サンプル動作のためで、
関数をスクリプト内で
deletefile の代わりに使います。