タグ

vbsに関するharchill79のブックマーク (13)

  • VBScript のループ制御

    このブラウザーはサポートされなくなりました。 Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。 ステートメントのブロックを繰り返し実行するには、ループのステートメントを使用します。ループのステートメントには、条件の評価が真 (True)、または偽 (False) になるまでステートメントを繰り返し実行するループや、指定した回数だけステートメントを繰り返し実行するループなどがあります。 Microsoft® Visual Basic® Scripting Edition (以下 VBScript) には、次に示すループのステートメントが用意されています。 Do...Loop:条件の評価が真 (True) の間、または真 (True) になるまで、ステートメントを繰り返し実行します。 While...Wen

    VBScript のループ制御
  • 第11回 WScriptオブジェクトを利用する(2)

    このように、1つ目のメッセージ・ボックスを閉じてから10秒後に2つ目のメッセージ・ボックスが表示される。Sleepメソッドで10000ミリ秒(10秒)で中断するようにしているためである。 なお、Sleepメソッドを使ってスクリプトを中断している間はCPUを占有することはなく、CPU使用率は低い状態になる。また、中断しているとき、ほかのオブジェクトでイベントが発生した場合、そちらに処理が移るので、イベントの発生を待つために空ループを回すときに使える。この例は後ほどオブジェクトを扱うメソッドのところで述べる。 さて、ここで1つ例題を出そう。先ほどのスクリプトでは10秒間何も表示されないので何が起こっているか分かりにくかったので、今度はStdOutプロパティとSleepメソッドを使ってプログレス・バーのようなものを表示させたタイマーとして動作するスクリプトを組んでみよう。 マーカーで隠れたところ

    第11回 WScriptオブジェクトを利用する(2)
  • 第6回 VBScriptの配列を極める

    For ~ Nextステートメント 先ほどの例のように、配列を操作するときは似たような行が連続することが多い。このような繰り返し(ループ)をまとめて記述するためのステートメントが、VBScriptにはいくつか用意されている。そのうち、For ~ NextステートメントおよびFor Each ~ Nextステートメントをここで紹介しよう。 まずはFor ~ Nextステートメントを用いて先ほどのスクリプトを書き直すと次のようになる。 Option Explicit Dim intNumbers(4) 'サイズ5の配列を宣言 '配列の各要素に値を代入 Dim intCounter 'ループカウンタ用変数 For intCounter = 0 To 4 Step 1 '0から4まで、1ずつ変化させる '配列に、インデックスの倍の値を代入 intNumbers(intCounter) = intC

    第6回 VBScriptの配列を極める
  • クレジットカード現金化の高還元率の優良店を選ぶためには

    クレジットカード現金化の高還元率の優良店を選ぶためには クレジットカード現金化の優良店を選ぶポイントは、換金率やスピードもありますが、そのほかにも見ておきたいポイントもあります。 お金に厳しい人が利用しますので、手数料やキャンペーンの有無、価格交渉ができる業者ということは見ておきたいところです。 それぞれどのような内容なのでしょうか。 手数料が無料であるクレジットカード現金化の業者には、手数料をすべて無料でしてくれるところがあります。 業者によっては、単純に手数料という名目で業者側の利益がとられていたり、振込手数料、事務手数料という名目で少額ながらお金がかかることがあります。 せっかく高い換金率が記載されていても、手数料の分が差し引かれることで、損をしたような気持ちになったり後から気づくこともあります。 これらの手数料は最初から公式ホームページに記載がある場合は了承したうえで申し込みもでき

  • VB ファイル操作

    【サンプルリスト】 Private Sub Sample() Dim fs As New Scripting.FileSystemObject 'ファイルを移動する1 If (fs.FileExists("c:\work\test.txt")) Then 'コピー元ファイルあり fs.CopyFile "c:\work\test.txt", "c:\temp\" '上書きファイルコピー fs.DeleteFile "c:\work\test.txt", True 'コピー元ファイル削除 End If 'ファイルを移動する2 If (fs.FileExists("c:\work\test1.txt")) Then '移動元ファイルあり If (fs.FileExists("c:\temp\test1.txt")) Then '移動先ファイルあり fs.DeleteFile "c:\temp

  • VBScript のエラー

    このブラウザーはサポートされなくなりました。 Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。

    VBScript のエラー
  • VBScript ランゲージ リファレンス - VBScript のエラー メッセージ

    Microsoft&Reg; Visual Basic&Reg; Scripting Edition VBScript のエラー メッセージ

    harchill79
    harchill79 2011/02/07
    エラー一覧
  • On Error ステートメント

    エラー処理を有効または無効にします。 On Error Resume Next On Error GoTo 0 解説 コード内で On Error Resume Next ステートメントを使用していない場合に実行時エラーが発生すると、エラー メッセージが表示され、コードの実行が停止されます。ただし、エラー処理の正確な機能はコードを実行するホストによって決まります。ホストは、場合に応じてさまざまなエラー処理を選択できます。エラー発生時にスクリプト デバッガを呼び出すようにしたり、エラー メッセージを表示せずユーザーにエラーの発生を通知しないようにすることもできます。これらは、ホストによるエラー処理の方法に過ぎません。 プロシージャの中には、呼び出し適用範囲内でエラー処理が行われている限り、エラーの発生が致命的でないものもあります。プロシージャ内でローカルのエラー処理が無効な場合にエラーが発生

    On Error ステートメント
    harchill79
    harchill79 2011/02/07
    エラー処理
  • try〜catchを実装するには - 城陽人の本棚

    最近仕事でvbsをゴリゴリ書いていたのだけど、vbsにはtry〜catchなんて言語仕様がない。ランタイムエラーが出るとその場でスクリプトエンジンの実行が停止して落ちる。落ちるのはまぁ仕方ないとして、問題はそのときコマンドラインでcscript.exeのリターンコードを%ERRORLEVEL%でチェックしたらなんとcscript.exeは0を返す。ありえない!!!!!! というわけで、ランタイムエラーで0以外がきちんと返るようtry〜catchの作り方を考えたのだけど、実は同じことを考えてる人が既にいた。 On Error Resume Nextの正しい使い方: Windows Script Programming的な構造は以下のようになる。 Option Explicit Sub Main() Err.Raise(1) End Sub Sub Try() Call Main() E

    try〜catchを実装するには - 城陽人の本棚
    harchill79
    harchill79 2011/02/02
    エラーハンドリング
  • On Error Resume Nextの正しい使い方 - Windows Script Programming

    よく、On Error Resume Nextを先頭に置いたスクリプトを見かけますが、 まるで、Option Explicitをスクリプトの先頭に置くような感覚で、 「適当にエラーをリカバるオプション」のような誤解があるのではないでしょうか。 On Error Resume Nextの意味は、言わば、 「エラーがあっても無視して、どうなってもいいから暴走しろ」ですから、 そんな、自暴自棄に走らなくても、と思ってしまいます。 では、どう書くのが清く、正しく、安全か、というと、 例えば、リネーム、 Set fo=fso.GetFile(filename) fo.Name=newName は、同じ名前があるとエラーになります。 そこで、まず、 Set fo=fso.GetFile(filename) Sub Rename(fo,newName) On Error Resume Next fo.N

    On Error Resume Nextの正しい使い方 - Windows Script Programming
    harchill79
    harchill79 2011/02/02
    エラーハンドリング
  • VBScriptのオブジェクトを使いこなす − @IT[エラー処理]

    第9回 VBScriptのオブジェクトを使いこなす:基礎解説 演習方式で身につけるチェック式WSH超入門(2/4 ページ)

    VBScriptのオブジェクトを使いこなす − @IT[エラー処理]
    harchill79
    harchill79 2011/02/02
    エラーハンドリング
  • イベント・ログに任意の文字列を出力する

    解説 Windowsマシン上で定期的に実施するシステム管理上のタスクは、可能な限りバッチ・ファイルやWSHを利用して自動化したい。また自動化を行うならば、動作の確認や障害発生に備えて、処理結果をログに出力したり、メールで送ったりしたい。 自前でログを作成するのはさほど難しい話ではない。だがログ・ファイルを格納する場所や書式が統一されていないと、事後確認が行いづらくなってしまう。 TIPSでは、ログとして残したい内容をコマンドラインからイベント・ログに出力する方法をいくつか紹介する。Windows OSの標準機能であるイベント・ログに出力することにより、管理が容易になるというメリットがある。 操作方法 ●イベント・ログに書き込む方法 イベント・ログにユーザーがイベントを書き込む方法としては、次のような手段が利用できる。 WSH(Windows Script Host) Eventcreat

    イベント・ログに任意の文字列を出力する
    harchill79
    harchill79 2011/02/02
    イベントログにエラーを出す方法
  • TextStreamオブジェクトとDictionaryオブジェクトを使う[最終回] - @IT

    連載目次 第16回から3回にわたって、FileSystemObjectオブジェクトの解説をしてきた。最終回となる今回は、FileSystemObjectオブジェクトを含んでいる、Microsoft Scripting Runtimeに含まれるTextStreamオブジェクトおよびDictionaryオブジェクトを取り上げ、テキスト・ファイルの読み書きの方法および辞書(連想配列、ハッシュ)の使い方について解説する。 テキスト・ファイルを読み出す WSHでテキスト・ファイルを扱うには、まずCreateObject関数もしくはメソッドでFileSystemObjectオブジェクトを生成し、これに含まれるOpenTextFileメソッドを呼び出し、TextStreamオブジェクトを取得し、利用するのが基となる。TextStreamオブジェクトを使用すると、テキスト・ファイルを読み出して変数に代入

    TextStreamオブジェクトとDictionaryオブジェクトを使う[最終回] - @IT
    harchill79
    harchill79 2011/01/27
    参考になった!
  • 1