コマンドプロンプトで処理時間をカウント - OKWAVE
どうしてもBATファイルでやらなきゃダメ？ 自分ならWSHを使いますが。。。 以下をテキストエディタにペーストして、ファイル名を例えばrun.vbsで保存 ------- ここから ------------------------------------------ Dim WshShell, oExec, t0 Set WshShell = CreateObject("WScript.Shell") Set oExec = WshShell.Exec("あるexe") t0 = Timer Do While oExec.Status = 0 if (Timer - t0) > 1.0 then t0 = Timer WScript.StdOut.Write "." End If Loop WScript.StdOut.Write vbCr ------- ここまで -----------
クレジットカード現金化の高還元率の優良店を選ぶためには
クレジットカード現金化の高還元率の優良店を選ぶためには クレジットカード現金化の優良店を選ぶポイントは、換金率やスピードもありますが、そのほかにも見ておきたいポイントもあります。 お金に厳しい人が利用しますので、手数料やキャンペーンの有無、価格交渉ができる業者ということは見ておきたいところです。 それぞれどのような内容なのでしょうか。 手数料が無料であるクレジットカード現金化の業者には、手数料をすべて無料でしてくれるところがあります。 業者によっては、単純に手数料という名目で業者側の利益がとられていたり、振込手数料、事務手数料という名目で少額ながらお金がかかることがあります。 せっかく高い換金率が記載されていても、手数料の分が差し引かれることで、損をしたような気持ちになったり後から気づくこともあります。 これらの手数料は最初から公式ホームページに記載がある場合は了承したうえで申し込みもでき
FileSystemObjectオブジェクトを利用する（1） － ＠IT
連載目次 前回までは、WSHのオブジェクト（WScriptオブジェクト、WshShellオブジェクト、WshNetworkオブジェクト）について解説してきた。 今回からは、主にファイル操作を行うためのオブジェクトであるFileSystemObjectオブジェクトと、そこから呼び出し可能な各オブジェクトについて解説していく（これらのオブジェクトは、WSH 5.6が含まれるWindows Script 5.6のパッケージに含まれている）。 FileSystemObjectオブジェクトとは FileSystemObjectオブジェクトは、WSH 5.6やVBScript 5.6などを含むWindows Script 5.6パッケージの中の1つ、Windows Script Runtime 5.6ライブラリに含まれるオブジェクトである。WSH 5.6には、スクリプト・ホスト実行ファイルwscrip
第1回 WSHを始めよう
WSHの情報源 WSHが登場した当初は、マイクロソフトの公式サイトにすらヘルプもドキュメントもサンプルも満足なものがなかったうえに、その多くが英語だったが、ここ数年でその状況は大きく改善された。いまではマイクロソフトのサイトや外部サイトで多数の日本語化されたドキュメントやサンプルが入手、あるいは閲覧できるようになっている。 Windows Scriptのページ WSH 5.6のダウンロード・ページとして冒頭でもご紹介したが、これはWSHの総本山ともいうべきサイトである。ここではWSH（Windows Script）本体と、ヘルプ・ファイルがダウンロードできるほか、WSHやVBScriptのリファレンスを読むことができる。ヘルプ・ファイルはWSHスクリプト作成では必須となるので、忘れずにダウンロードしておこう。 スクリプト センター ここには、VBScriptで書かれた、分野別の900本以上
クレジットカード現金化の高還元率の優良店を選ぶためには
クレジットカード現金化の高還元率の優良店を選ぶためには クレジットカード現金化の優良店を選ぶポイントは、換金率やスピードもありますが、そのほかにも見ておきたいポイントもあります。 お金に厳しい人が利用しますので、手数料やキャンペーンの有無、価格交渉ができる業者ということは見ておきたいところです。 それぞれどのような内容なのでしょうか。 手数料が無料であるクレジットカード現金化の業者には、手数料をすべて無料でしてくれるところがあります。 業者によっては、単純に手数料という名目で業者側の利益がとられていたり、振込手数料、事務手数料という名目で少額ながらお金がかかることがあります。 せっかく高い換金率が記載されていても、手数料の分が差し引かれることで、損をしたような気持ちになったり後から気づくこともあります。 これらの手数料は最初から公式ホームページに記載がある場合は了承したうえで申し込みもでき
ファイルをひとつ上の階層へ移動::ビューティーラボ
Set Fso = CreateObject("Scripting.FileSystemObject") Set Arg = WScript.Arguments For i = 0 to Arg.Count - 1 Fso.MoveFile Arg(i),Fso.GetParentFolderName(Fso.GetParentFolderName(Arg(i))) & "¥" & Fso.GetFileName(Arg(i)) Next 上記のコードをコピーして、SendToフォルダに「1つ上へ.vbs」みたいな名前で保存しておくと、ファイルの右クリックメニュー「送る」で、ファイルを一階層上へ移動できるようになる。 このサイトは、こういう感じで、例外処理を万全にしたりかっこいい方法を考えたりすることなく、「自分の手元でだけ動けばいい」と思って書いたような、完成度の低いスクリプトとかを貼っ
逆引きVBScript関数一覧｜VBScript関数リファレンス
ASP の開発や SQLServer の DTS を作成する際、ど忘れしたVBScript関数を簡単に探せるように構成し直しました。 VBScript関数名は分かっていて、使い方や引数が思い出せない時などは普通のVBScriptヘルプで調べられますが、VBScript関数名が出てこない、○○をするVBScript関数ってあったっけ？、という場合はとても便利です。
トラストメモ＠ブログ [VBScript] 他のvbsファイルをインクルードする
VBScriptファイル毎に全処理を記述するとファイルサイズが大きくなり、同じ関数をそれぞれのVBScriptファイルに記述するのはスマートではない。 VBScript標準では外部ファイルをインクルードする機能はないのでインクルードする関数を作成した。 ただし、このインクルードの関数は共通化できない。 例えば先に記載したEncode.vbsをインクルードする場合は以下のように記述する。 Dim objFSO Dim objStream Dim strPath Dim strDir '自身のファイルパスを取得 strPath = WScript.ScriptFullName '親ディレクトリを取得 Set objFSO = WScript.CreateObject("Scripting.FileSystemObject") strDir = objFSO.GetFile(strPath).P
Snap Note 開発記 from ソフトウェアデザイン館 Sage Plaisir 21:無料で使える WSH(VBScript, JavaScript) のデバッガー - livedoor Blog（ブログ）
Sage Plaisir 21 で開発しているツールの開発状況を公開するページです。試行錯誤している様子が伺えるかも。 Windows はスクリプトが弱いと言われていますが、地味に WSH が使えることが分かっています。 WSH(VBScript) と vbslib 4 と Visual Studio 2008 （有料版）を使えば、最強のスクリプト環境ができます。 ただ、問題は、無料で使える WSH のデバッガーが無かったことでしたが、実はあることが、ようやく分かりました。 無料なだけに機能は少ないですが、無いよりは遥かにデバッグがしやすくなります。 ダウンロード詳細 Windows Script Debugger （scd10jp.exe） http://www.microsoft.com/downloads/ja-jp/details.aspx?FamilyID=e606e71f-ba
＠IT：基礎解説(管理者必須スキル)
最新Intelプロセッサ「第2世代Core iシリーズ」は何が変わった？ デジタルアドバンテージ 小林 章彦
WSHスクリプトからのファイル操作（2） － ＠IT
これまではファイルの操作について説明してきた。次に以下では、フォルダの操作方法について説明しよう。フォルダに対しても、ファイルの処理と同様に、コピー、移動、削除、作成、情報取得ができる。処理方法もファイルに対するものと同様に、FSOオブジェクトを直接利用する方法と、Folderオブジェクトを作成して利用する方法の2種類が提供されている。まずはFSOオブジェクトを使用する方法を述べてから、Folderオブジェクトを使用する方法について述べることにする。 以下はFSOオブジェクトのメソッドのうち、フォルダに関係するものの一覧である。 メソッド 機能 CopyFolderメソッド
WScriptオブジェクトを利用する（1） － ＠IT
連載目次 前回から少し時間がたったが、皆さんいかがお過ごしだろうか？ その間、筆者は、Windowsスクリプティングの世界に新たに加わったWindows PowerShellと、この連載で取り上げているWSH（Windows Script Host）を比較し、両者の使い分けを考察する趣旨の記事を書いたので、新しいPowerShellに興味のある方はぜひ読んでいただきたいと思う。 Windowsスクリプティング環境比較：PowerShell vs WSH（Windows Server Insider） さて、前回まではVBScriptの文法について述べてきた。今回から数回にわたって、VBScriptを用いてWSHの提供するオブジェクトを使いこなす方法について解説する。 WSHの提供するオブジェクト――WScriptオブジェクト WSHの提供するオブジェクトは数多く存在するが、その中からまずは
PriMoreソースコード公開 - PDFとたわむれる
PriMoreはVBScriptで動いていますが今まで難読化した上で公開しておりましたが、多忙につき今後もなかなかメンテナンス出来ないと思うので、ソースを公開します。 VBScriptですのでVBAをやったことが有る方であれば、書き換える事は 出来ると思いますので、自分の好みに書き換えて使って下さい。 （とは言ってもPostScriptとPDFMarkがどんなものか知らないと書き換えは難しいかも知れません） ■PriMore V4.22 (PrimoPDF V4.x用)ソースコード http://www.ne.jp/asahi/hey.to/expo/pdf/PriMoreV4.22.vbs.txt ■PriMore V0.85 (PrimoPDF V3.x用)ソースコード http://www.ne.jp/asahi/hey.to/expo/pdf/PriMoreV0.85.vbs.tx
asp(vbscript)でエクセルシートのデータを読込み、そのデータをデータベースにインサートさせたいと思ってます。 - 現在... - Yahoo!知恵袋
aspを実行するマシンにExcelがインストールされていますでしょうか？ 1) 答えがYesの場合 ExcelのOLEオブジェクト経由でアクセスできます。 例） Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False Set objWorkbook = objExcel.Workbooks.Open ("C:\fuga.xls") set objWorksheet = objWorkbook.sheets[0] intRow = 2 Do Until objWorksheet.Cells(intRow,1).Value = "" data = objExcel.Cells(intRow,1) // このデータをデータベースにインサート intRow = intRow + 1 Loop objExce
三流君VBA:Outlookを操作してメールを送りたい
'アプリケーションオブジェクトの作成 Set oApp = CreateObject("Outlook.Application") Set objMAIL = oApp.CreateItem(0) 'olMailItem=0 strMOJI = "こんにちは" & vbCrLf _ & "プログラマーの愚痴、教えまっせ？" & vbCrLf _ & "http://www.ken3.org/ よろしく（笑）" objMAIL.To = "test@ken3.org" '宛先 objMAIL.Subject = "件名" '件名 objMAIL.Body = strMOJI '本文の代入 objMAIL.Send '直接送信箱行き ※警告メッセージ出ます。 こんな感じで、単純なテストをしてみました。。。 動作イメージの動画を貼りました。↓ヒマなら見て笑ってください。。。 [テスト VBA O
第5回 WshShellオブジェクトの詳細（1）
COMオブジェクトとして利用できる外部Windowsプログラムは、WSHスクリプトから直接操作できるが、そうでないWindowsプログラムをスクリプトで操作するには、プログラムを起動しておき、スクリプトからキー・ストロークを送信して、擬似的にプログラムがキーボードから操作されたように制御する。これに使えるのがWshShellオブジェクトのSendKeysメソッドとAppActivateメソッドである。 SendKeysメソッドは起動されているプログラムにキー・ストロークを送信するメソッドである。SendKeysメソッドを利用してキー操作をエミュレートすれば、ほとんどのWindowsプログラムを操作できる。ただし問題は、制御の可否が時間的なタイミングに大きく影響を受けることだ。 これは例えば、プログラムからダイアログ・ボックスをポップアップ表示して、［OK］ボタンを押すという操作を考えればす
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Tips - （小技にも満たない）微ワザ集
WindowsコマンドとVBScriptでファイルバックアップ・世代管理②
はてなブログ | 無料ブログを作成しよう
using vbscript in asp to import excel into access