Windows バッチに JScript・VBScript・Oracle SQL スクリプトを混在させてバッチ処理の中で実行する - Corredor
2016年も終わりに近付いている昨今、今更ですが Windows バッチの黒魔術的な挙動にハマっていて、レガシーな職場で培ったレガシーな知識の総決算をしておこうかなと思うなど。 Windows バッチスクリプトを置いておく GitHub リポジトリを作っていますので、よかったらご覧ください。 GitHub - Neos21/windows-batch-scripts: ちょいと便利な Windows バッチ製のスクリプトやスニペット集 今日はその中から、Windows バッチファイル1つの中に、別の言語のスクリプトを混在させて実行する手法をいくつか紹介する。 JScript を混在させる Shebang VBScript を混在させる技 Oracle DB に渡す SQL ファイルを混在させ SQL*Plus を起動する 別の書き方 より実践的な使い方 WSH (JScript・VBScr
VBAでJSONファイルをパースする - SO NOTE そうのて (；^ω^)
COMオブジェクトのScriptControlを使うと、VBA上でJScriptが実行出来ます。って事は、VBAでもJSONファイルのパースが出来るんじゃね？と前々から思ってたのを試してみたところ、拍子抜けするくらい簡単に出来ました。 ソース Option Explicit Sub VBA_de_JSON() Const cnsJSONString As String = "{ ""familyname"":""yamada"", ""personalname"":""tarou"" }" Dim sc As Object Dim strFunc As String Dim objJSON As Object Set sc = CreateObject("ScriptControl") sc.Language = "JScript" 'jsonにパースする関数文字列 strFunc = "
VBScript: WMIを使ったサービスの状態取得、開始、停止 - 推定無題
WMIを使ってサービスのオブジェクトを取得する。 クエリはサービス名と一致するものを指定。表示にする時は、DisplayName= にする。 Dim Services Set Services = GetObject("winmgmts:").ExecQuery("Select * from Win32_Service Where Name='サービス名'") 上記を踏まえて、サービスの状態取得、開始、停止するFunctionプロシージャ。 ' WMI, Win32_Serviceのヘルパを提供 ' サービスの状態を返す ' サービス名で検索し、取得できなければ表示名で検索し、最初に見つかったサービスの状態を返す ' 停止：Stopped ' 開始：Running ' サービスが見つからない：(Empty) Function GetServiceState(strServiceName)
vbscriptを利用してサービスの状態を表示する - hiyoudの日記
Windows XPでサービスの状態をコマンドラインから簡単に参照するには sc query servicename で可能だが、サービスの状態以外の情報も表示されてしまう。 >sc query eventlog SERVICE_NAME: eventlog TYPE : 20 WIN32_SHARE_PROCESS STATE : 4 RUNNING (NOT_STOPPABLE,NOT_PAUSABLE,ACCEPTS_SHUTDOWN) WIN32_EXIT_CODE : 0 (0x0) SERVICE_EXIT_CODE : 0 (0x0) CHECKPOINT : 0x0 WAIT_HINT : 0x0そこでvbscriptでサービスの状態のみを表示するスクリプトを書いてみた。 Option Explicit ' コマンドライン引数を取得 Dim objArgs Dim serv
（VBA・SSIS）VBAからSSISを実行する : topotopopitapo
2011年10月27日16:30 カテゴリSSISExcelVBA （VBA・SSIS）VBAからSSISを実行する 調べて一番最初に出てきた方法がDTS.Packageを使う方法だったんだけど、 「指定ファイルはパッケージではありません」みたいなエラーで実行できなかった（なんでだ） というわけで別の方法を考えました。 （１）VBAからSSIS実行用のバッチをたたく （２）VBAコード上でSSIS実行コマンドを送信する どっちもほぼおなじじゃないかーということで（２）を採用。 以下コード例。 Dim wsh As Object Set wsh = CreateObject("WScript.Shell") Dim pkgpath As String 'パッケージの絶対パス Dim command As String command = "dtexec /File " & pkgPath
VBScript : ADO で Excel2007(Excel 2010、Excel 2013) にアクセスする( シートをテーブルとして読み込む ) : logical error
Excel2007(Excel 12.0) と Excel2010 と Excel2013で確認しました。 ※ Excel 2010 は、Excel 14.0 だそうですが、接続文字列は Excel 12.0 でのみ動作しました。 Excel 2013(Windows8) では、Microsoft Access データベース エンジン 2010 再頒布可能コンポーネントをダウンロードしてインストールする必要があります。( ※参考1、※参考2 ) ( 32ビット版と64ビット版があるので選択してダウンロードします ) IMEX=1 : 概要としては、予期しない列の値の変化を抑制してくれます。仕様的には、「intermixed」で、データ行を常にテキストとして読み取ることをドライバーに指示しています。こちらを参照して下さい 関連する Microsoft ドキュメント [HOWTO] Visua
VBScriptファイルをEXEファイルに変換、デスクトップアイコンを変更
VBScriptで作ったスクリプトをWindows上の実行ファイル(*.exe)に変換する方法を紹介します。またEXEファイルのデスクトップのアイコンの変更方法も紹介します。 例として、次のような「sample.vbs」を「*.exe」ファイルに変換してみます。 '********************************************************** ' Copyright (C) 2010 by pl_kyo '********************************************************** Option Explicit main() Sub main() MsgBox "Hello World!!" End Sub vbsファイルをexeに変換 VBScriptファイルを素早く・簡単に「*.exe」ファイルにするための
サンプルコードで学ぶASP
Page Counter コンポーネントは、Web ページが開かれた回数を数えて表示する PageCounter オブジェクトを作成します。PageCounter オブジェクトは、一定の間隔でヒット数をテキストファイルに書き込み、サーバーがシャットダウンした場合でもデータが失われないようにします。Page Counter コンポーネントは、内部の Central Management オブジェクトを使用して、アプリケーション内の各ページが開かれた回数を記録します。 Server.CreateObject メソッドを使用してページ上に PageCounter オブジェクトのインスタンスが作成されると、その PageCounter オブジェクトは、指定された Web ページの現在のヒット数を Central Management オブジェクトから取得します。その後は、PageCounter オ
ＣｕｌｔＣａｐｔｕｒｅ2008 レガシーASPでCrystalReportsXIを用いてPDF出力可能なのか
結論を先に述べますと可能です。 .PDF出力が出来ない人で、同じ苦境に立たされた人へアドバイスとして記載 ＜修正箇所：SimpleReportExport.asp＞ ＿①.doc記載２箇所を.pdfに置換 ＿②ExportType="14"の記載１箇所を"31"に置換 ＜日誌＞文章ボロボロ・・・ Crystal Reports XI 評価版と、サンプル(SimpleReportExport)で 確認をした所、どうしてもPDF出力が出来ず悪戦苦闘しました。 PDF出力できない物だから実行しても"ページが見つかりません"に なるばかりでした。 原因究明を検索しまくると、権限の話があったので自分の環境を 調べてみると、権限が足りない事がわかり、これが原因かぁ！ と喜び直しました。 ①権限の確認 ＿IISではなく、フォルダーのセキュリティ権限を確認します 以下３ユーザがフルコントロールで登録されて
VBS:コマンドの起動（リダイレクト指定）
VbScript(WSH)からコマンドを起動する方法の覚え書き。 ちょっとした処理の自動化をしたいとき、Windowsであればバッチファイルを作成するけど、すこし複雑なことを行おうと思うとWSHが便利。 WSHからDOSコマンドラインを起動する方法は以下になる。 ▼書式 WScript-Shellオブジェクト名.Run ( "実行コマンド記述", ウィンドウ表示モード指定, 同期モード指定 ) ▼ウィンドウ表示モード指定 コマンド実行時のウィンドウサイズを数値で指定する。 0 = 非表示 / 1 = 通常ウィンドウ / 2 = 最小化 / 3 = 最大化 ▼同期モード指定 通常はDOSコマンドをスクリプトから実行した場合は非同期モードとなり、実行したコマンドの終了を待たず、Scriptの次のコードが実行される。 DOSのコマンドの実行が終了するのを待って次のコードを実行したい場合は、同期指
FileSystemObject#GetStandardStreamなんてのがあるらしい。 - ITコンサルの日常
VBScriptでバイナリファイル扱えたらいいのになぁとか思って、MSDN＠USを見に行ってみたら、微妙にJPの内容と違うではありませんか。（っていうか、日本のやつ化けて見えると思ったら、IEじゃないからだった。。） JP: http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/script56/html/jsobjFileSystem.asp US: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/af4423b2-4ee8-41d6-a704-49926cd4d2e8.asp で発見したのが、FileSystemObject#GetStandardStreamっていうやつ。標準入力/標準出力/標準エラー
WScript.ShellのExec()で、コンソールアプリを非表示で実行するラッパー - Windows Script Programming
WScript.ShellのExec()で、コンソールアプリを実行すると、コンソールウィンドウが表示されて、鬱陶しいですね。 そこで、コンソールウィンドウを非表示にする、コンソールアプリのラッパーをVBScriptで作ります。 HideExec.VBS Option Explicit Dim fso Dim wStdIn Dim wStdOut Dim wStdErr Dim TempPath Dim pStdIn Dim pStdOut Dim pStdErr Dim StdIn Dim StdOut Dim StdErr Dim wShell Dim Command Dim arg Set fso=CreateObject("Scripting.FileSystemObject") Set wStdIn=fso.GetStandardStream(0) Set wStdOut=fso.
サーバでWebサイトにアクセスするには？ - seki-motoの日記
サーバ上で、異なるサーバへHTTPアクセスを行うことができる、ServerXMLHTTPを調べたのでメモ。チョットまとめ。 概要 ServerXMLHTTP は、サーバー間で HTTP アクセスを行うためのメソッドとプロパティを提供してくれます。 IServerXMLHTTPRequest-ServerXMLHTTP | Microsoft Docs 使い方 詳しくはMSDN参照。レガシーASPの記述方法が載っています(JScript)。Using ServerXMLHTTP Directly | Microsoft Docs ASP(VBScript)の場合の簡単な例 <% Dim objSrvHTTP Set objSrvHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0") Call objSrvHTTP.open("GET",
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://winofsql.jp/sqlserver/xpcmdshell.htm
http://winscript.jp/powershell/49
Excelシート集約ツール やじゅ＠アプリケーション・ラボ/ウェブリブログ
へたれたプログラマの憂鬱
untitled: [VBScript]俺俺コーディング規約
https://support.microsoft.com/ja-jp/help/289481/
WindowsにてCMDとWSHのスクリプトを同じBATの中に書くshebang記法というものがあるそうですが、なぜか、JSCRIP... - Yahoo!知恵袋
